This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/68442] ICE on kind specification, depending on ordering of functions


https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68442

--- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The following patch

--- ../_clean/gcc/fortran/interface.c   2015-10-30 17:52:25.000000000 +0100
+++ gcc/fortran/interface.c     2015-11-21 23:48:11.000000000 +0100
@@ -3475,7 +3475,9 @@ gfc_arglist_matches_symbol (gfc_actual_a
   gfc_formal_arglist *dummy_args;
   bool r;

-  gcc_assert (sym->attr.flavor == FL_PROCEDURE);
+  /* gcc_assert (sym->attr.flavor == FL_PROCEDURE); */
+  if (sym->attr.flavor != FL_PROCEDURE)
+    return false;

   dummy_args = gfc_sym_get_dummy_args (sym);

replaces the ICE with the error

pr68442.f90:7:21:

       character(kind=gkind()) :: x
                     1

Error: There is no specific function for the generic 'gkind' at (1)

Is it possible to do better?

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]