[Bug fortran/27954] ICE on garbage in DATA statement

[kargl at gcc dot gnu dot org]

------- Comment #3 from kargl at gcc dot gnu dot org  2006-06-12 14:23 -------
I don't see the internal error.

laptop:kargl[205] cat > r.f90
      subroutine FOO

      character*20 X  0
      data X /'A'/    0

      end subroutine FOO
laptop:kargl[206] gfc -c r.f90
 In file r.f90:3

      character*20 X  0
                   1
Error: Syntax error in data declaration at (1)
 In file r.f90:4

      data X /'A'/    0
                 1
Error: Syntax error in DATA statement at (1)
 In file r.f90:4

      data X /'A'/    0
             1
Error: Incompatible types in assignment at (1), CHARACTER(1) to REAL(4)
laptop:kargl[208] gfc -c r.f
 In file r.f:4

      data X /'A'/    0                                                 
                 1
Error: Syntax error in DATA statement at (1)
 In file r.f:4

      data X /'A'/    0                                                 
             1
Error: Incompatible types in assignment at (1), CHARACTER(1) to REAL(4)
laptop:kargl[209] gfc --version
GNU Fortran 95 (GCC) 4.2.0 20060610 (experimental)
Copyright (C) 2006 Free Software Foundation, Inc.


-- 


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