diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2006-10-27 20:47:28 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2006-10-27 20:47:28 +0000 |
| commit | a9f6f1f27fd181ed18eab6a61a055ba8a55817b0 (patch) | |
| tree | 9d7bdaf4ce466133c4469aa04221cb3c9ad73d70 /gcc/fortran/misc.c | |
| parent | 95c0fb7a066b8f41723150b08e4aa3c08622bc2b (diff) | |
| download | gcc-a9f6f1f27fd181ed18eab6a61a055ba8a55817b0.zip gcc-a9f6f1f27fd181ed18eab6a61a055ba8a55817b0.tar.gz gcc-a9f6f1f27fd181ed18eab6a61a055ba8a55817b0.tar.bz2 | |
re PR fortran/27954 (ICE on garbage in DATA statement)
2006-10-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/27954
* decl.c (gfc_free_data_all): New function to free all data structures
after errors in DATA statements and declarations.
(top_var_list): Use new function.(top_val_list): Use new function.
(gfc_match_data_decl): Use new function.
* misc.c (gfc_typename): Fixed incorrect function name in error text.
From-SVN: r118084
Diffstat (limited to 'gcc/fortran/misc.c')
| -rw-r--r-- | gcc/fortran/misc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/misc.c b/gcc/fortran/misc.c index 4d94d7f..bafb698 100644 --- a/gcc/fortran/misc.c +++ b/gcc/fortran/misc.c @@ -193,7 +193,7 @@ gfc_typename (gfc_typespec * ts) strcpy (buffer, "UNKNOWN"); break; default: - gfc_internal_error ("gfc_typespec(): Undefined type"); + gfc_internal_error ("gfc_typename(): Undefined type"); } return buffer; |