diff options
Diffstat (limited to 'gcc/fortran/trans-decl.c')
| -rw-r--r-- | gcc/fortran/trans-decl.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 07fefd9..eefd9bc 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -1435,7 +1435,7 @@ gfc_get_symbol_decl (gfc_symbol * sym) } if (sym->attr.intrinsic) - internal_error ("intrinsic variable which isn't a procedure"); + gfc_internal_error ("intrinsic variable which isn't a procedure"); /* Create string length decl first so that they can be used in the type declaration. */ @@ -4418,8 +4418,8 @@ gfc_create_module_variable (gfc_symbol * sym) return; if (sym->backend_decl && !sym->attr.vtab && !sym->attr.target) - internal_error ("backend decl for module variable %s already exists", - sym->name); + gfc_internal_error ("backend decl for module variable %qs already exists", + sym->name); if (sym->module && !sym->attr.result && !sym->attr.dummy && (sym->attr.access == ACCESS_UNKNOWN |