[Bug fortran/18481] [g77 regression] ICE with assigned integer variable format

["Thomas dot Koenig at online dot de" <gcc-bugzilla@gcc.gnu.org>]

------- Additional Comments From Thomas dot Koenig at online dot de  2005-04-01 11:45 -------
No write or print statement is necessary:

$ cat assign.f90
      program main
      assign 1000 to i
 1000 format (A)
      end
$ gfortran assign.f90
$ gfortran -fdump-parse-tree assign.f90
 In file assign.f90:2

      assign 1000 to i
                     1
Warning: Obsolete: ASSIGN statement at (1)

        Namespace: A-H: (REAL 4) I-N: (INTEGER 4) O-Z: (REAL 4)
        symtree: i  Ambig 0
        symbol i (INTEGER 4)(VARIABLE UNKNOWN-INTENT UNKNOWN-ACCESS UNKNOWN-PROC
IMPLICIT-TYPE)

        symtree: main  Ambig 0
        symbol main (UNKNOWN 0)(PROGRAM UNKNOWN-INTENT UNKNOWN-ACCESS UNKNOWN-PROC)


      LABEL ASSIGN i 1000

assign.f90: In function 'MAIN__':
assign.f90:2: internal compiler error: in gfc_add_modify_expr, at
fortran/trans.c:152
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$
$ gfortran -v
Using built-in specs.
Target: ia64-unknown-linux-gnu
Configured with: ../gcc-4.1-20050327/configure --prefix=/home/zfkts
--enable-languages=c,f95
Thread model: posix
gcc version 4.1.0 20050327 (experimental)


-- 


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