+2007-08-01 Daniel Franke <franke.daniel@gmail.com>
+
+ PR fortran/32945
+ * expr.c (check_specification_function): Skip check if no symtree
+ is available.
+
2007-08-01 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31609
+2007-08-01 Daniel Franke <franke.daniel@gmail.com>
+
+ PR fortran/32945
+ * gfortran.dg/initialization_12.f90: New test.
+
2007-08-01 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31609
--- /dev/null
+! { dg-do compile }
+! PR fortran/32945 - ICE in init expressions
+!
+! Contributed by Florian Ladstaedter <flad AT gmx DOT at>
+!
+
+MODULE EGOPS_Utilities
+CONTAINS
+ FUNCTION dirname(fullfilename)
+ Character(LEN=*), Intent(In) :: fullfilename
+ Character(LEN=LEN(fullfilename)) :: dirname
+ dirname = ''
+ END FUNCTION
+END MODULE EGOPS_Utilities
+
+MODULE AtmoIono
+ CHARACTER(LEN=10), PARAMETER :: ComputeDryAtmModel = 'Dry Atm. '
+
+ type AtmModel
+ character (len=len(ComputeDryAtmModel)) :: moistDryStr
+ end type AtmModel
+END MODULE AtmoIono
+
+module AtmoIonoSphere
+ use EGOPS_Utilities
+ use AtmoIono
+end module AtmoIonoSphere
+
+! { dg-final { cleanup-modules "EGOPS_Utilities AtmoIono AtmoIonoSphere" } }