------- Comment #7 from dominiq at lps dot ens dot fr  2009-10-22 14:39 -------
(In reply to comment #5)
> Created an attachment (id=18865)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18865&action=view) [edit]
> A fix for the PR

If I add

@@ -4008,6 +4014,9 @@ load_derived_extensions (void)
          nuse = number_use_names (name, false);
          j = 1;
          p = find_use_name_n (name, &j, false);
+
+         if (p == NULL) continue;
+
          st = gfc_find_symtree (gfc_current_ns->sym_root, p);
          dt = st->n.sym;
          st = gfc_find_symtree (derived->f2k_derived->sym_root, name);

to this patch (borrowed from other places in module.c), comment #4 and comment
#1 are also fixed. 
The patch passes my tests, starting a full regtest.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41784

Reply via email to