The following program: program write implicit none integer :: debuglevel = 1
if (0 < debuglevel) write (0, "('test == ', f0.3)") 0.75 end program write produces the following error at compile time: > gfortran foo.f90 In file foo.f90:5 if (0 < debuglevel) write (0, "('test == ', f0.3)") 0.75 1 Error: Expected VARIABLE at (1) Changing any of: * The program name * The if statement into an if then block * Removing the if statement leaving the write removes the problem. The problem was not exhibited on svn build 114142 but it is not known at which intervening version the problem arose. -- Summary: program name 'write' causes compiler crash on if statements containing write commands. Product: gcc Version: 4.2.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: David at ham dot dropbear dot id dot au GCC build triplet: Gcc 4.2.0 (svn 116183) of 20060816 on RHEL4 x86_64 GCC host triplet: Gcc 4.2.0 (svn 116183) of 20060816 on RHEL4 x86_64 GCC target triplet: RHEL4 x86_64 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28762