[Bug fortran/30554] New: ICE in mio_pointer_ref at module.c:1945

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

> gfortran -c test.f90
test.f90:8: internal compiler error: Segmentation fault

Backtrace:
0x000000000043c85e in mio_pointer_ref (gp=0x28) at module.c:1945
1945          p = get_pointer (*((char **) gp));

#1  0x000000000043ccb7 in mio_symbol_ref (symp=0x28) at module.c:2174
#2  0x000000000043cd39 in mio_symtree_ref (stp=0xe44260) at module.c:2200

Test case:
------------------------------------
MODULE ATOMS
INTEGER :: NFREE = 0
END MODULE ATOMS

MODULE CONSTRAINT
USE ATOMS, ONLY: NFREE
CONTAINS
   SUBROUTINE ENERGY_CONSTRAINT ( HESSIAN )
   REAL , DIMENSION(1:(3*NFREE*(3*NFREE+1))/2):: HESSIAN
   END SUBROUTINE ENERGY_CONSTRAINT
END MODULE CONSTRAINT

MODULE POTENTIAL_ENERGY
USE ATOMS
USE CONSTRAINT,         ONLY : ENERGY_CONSTRAINT
END MODULE POTENTIAL_ENERGY
------------------------------------


-- 
           Summary: ICE in mio_pointer_ref at module.c:1945
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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