------- Comment #11 from hjl at lucon dot org 2007-12-11 20:16 ------- [EMAIL PROTECTED] 34427]$ cat foo.f90 IMPLICIT NONE real , DIMENSION(11) ::foo integer :: isfflx NAMELIST /nl/ foo NAMELIST /nl/ isfflx open (10, status="scratch") write (10,*) " &nl" write (10,*) " foo = 5, 5, 5," write (10,*) " isfflx = 1," write (10,*) " /" rewind (10) READ (10, NML = nl, ERR = 9200) CLOSE (10) STOP 9200 CALL abort () END [EMAIL PROTECTED] 34427]$ /export/gnu/import/svn/rrs/34427/usr/bin/gfortran -static -o new foo.f90 [EMAIL PROTECTED] 34427]$ ./new Aborted [EMAIL PROTECTED] 34427]$
-- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34427
