A module name outside a module ?

[Toon Moene]

L.S.,

Today gfortran fell for me over a hideously complex example - that I'll 
nevertheless will reduce to a simple testcase, if someone directs me to 
it - getting a Segmentation fault, unless I changed:

$ svn diff
Index: module.c
===================================================================
--- module.c    (revision 131105)
+++ module.c    (working copy)
@@ -3732,6 +3732,7 @@
               if (st && only_flag
                      && !st->n.sym->attr.use_only
                      && !st->n.sym->attr.use_rename
+                     && st->n.sym->module
                      && strcmp (st->n.sym->module, module_name) == 0)
                 st->name = gfc_get_string ("hidden.%s", name);

I.e., a module name without an accompanying module (brrr!).

Does this ring a bell with someone ?

Kind regards,

-- 
Toon Moene - e-mail: toon@moene.indiv.nluug.nl - phone: +31 346 214290
Saturnushof 14, 3738 XG  Maartensdijk, The Netherlands
At home: http://moene.indiv.nluug.nl/~toon/
GNU Fortran's path to Fortran 2003: http://gcc.gnu.org/wiki/Fortran2003