This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran 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]

another ICE


Hi all,
this is another ICE I just came across.

Please observe the duplicate END SUBROUTINE within the module. There
seems to be a relation to user defined types, replacing
TYPE(xml_parse) by INTEGER won't crash gfortran.

$> cat ice.f90
MODULE xmlparse
TYPE xml_parse
 INTEGER :: dummy
END TYPE
END MODULE

MODULE xmlwrite
USE xmlparse
CONTAINS
 SUBROUTINE xmlwrite_open()
 END SUBROUTINE

 END SUBROUTINE xmlwrite_element(info)
   TYPE(xml_parse), INTENT(inout) :: info
 END SUBROUTINE
END MODULE

PROGRAM test_fortran_xml
 USE xmlwrite
END PROGRAM

$> gfortran-4.2 -g -Wall ice.f90
In file ice.f90:13

 END SUBROUTINE xmlwrite_element(info)
   1
Error: Expecting END MODULE statement at (1)
ice.f90:0: internal compiler error: Segmentation fault
Please submit a full bug report,

$> gfortran -v
Using built-in specs.
Target: i686-pc-linux-gnu
Configured with: ../gcc/configure
--prefix=/home/daniel/nfs/packages/i686-pc-linux-gnu/gcc-4.2-svn
--enable-threads=posix --enable-shared --with-system-zlib
--enable-languages=c,c++,fortran
Thread model: posix
gcc version 4.2.0 20060914 (experimental)


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