[Bug fortran/14067] New: [gfortran] ICE when character data statement overflows declared size

[Bug fortran/14067] New: [gfortran] ICE when character data statement overflows declared size

[bdavis9659 at comcast dot net]

A character string provided in a data statement that is larger than declared
variable size causes an ICE.

This code is not standard conforming.  

gfortran should either:

a> Issue an error that the character string in the data statement cannot be
larger than the variable size.  { is smaller OK? or does it have to be exact for
character variables ? i dunno but it seems reasonable }

b> Issue a warning and truncate the string.


g77 does half of option (b). g77 misses the warning, but does not do any harm.


To duplicate:

$ cat bigstring.f
      PROGRAM GNEXDATA
      CHARACTER*31 GNCRMESS
C                             1         2         3         4
C                    1234567890123456789012345678901234567890
      DATA GNCRMESS/'   *** COASTAL RADAR    NOT LOADED *** '/
      PRINT*,GNCRMESS
      RETURN
      END
$ /usr/local/bin/gfortran -static bigstring.f
f951: ../../gcc/gcc/fortran/trans-const.c:109: gfc_conv_string_init: Assertion
`len >= slen' failed.
bigstring.f: In function `MAIN__':
bigstring.f:8: internal compiler error: Aborted
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$ g77 bigstring.f
$ ./a.out
    *** COASTAL RADAR    NOT LOA
$ /usr/local/bin/gfortran --version
GNU Fortran 95 (GCC 3.5-tree-ssa 20040207 (merged 20040126))
Copyright (C) 2003 Free Software Foundation, Inc.

-- 
           Summary: [gfortran]  ICE when character data statement overflows
                    declared size
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: bdavis9659 at comcast dot net
                CC: gcc-bugs at gcc dot gnu dot org


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

[Bug fortran/14067] [gfortran] ICE when character data statement overflows declared size

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-02-07 22:17 -------
Confirmed,

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
           Keywords|                            |ice-on-invalid-code
   Last reconfirmed|0000-00-00 00:00:00         |2004-02-07 22:17:34
               date|                            |
   Target Milestone|---                         |tree-ssa


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

[Bug fortran/14067] [gfortran] ICE when character data statement overflows declared size

[pinskia at gcc dot gnu dot org]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|3.5.0                       |---


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

[Bug fortran/14067] [gfortran] ICE when character data statement overflows declared size

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-05-30 15:07 -------
http://gcc.gnu.org/ml/gcc-patches/2004-05/msg01988.html

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |patch


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

[Bug fortran/14067] [gfortran] ICE when character data statement overflows declared size

[tobi at gcc dot gnu dot org]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2004-05-10 16:58:15         |2004-05-30 15:24:28
               date|                            |


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

[Bug fortran/14067] [gfortran] ICE when character data statement overflows declared size

[cvs-commit at gcc dot gnu dot org]

------- Additional Comments From cvs-commit at gcc dot gnu dot org  2004-05-30 16:33 -------
Subject: Bug 14067

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	tobi@gcc.gnu.org	2004-05-30 16:33:29

Modified files:
	gcc/fortran    : ChangeLog trans-const.c 

Log message:
	PR fortran/14067
	* trans-const.c (gfc_conv_string_init): Allow variable string
	length lower than initialization string length.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.53&r2=1.54
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/trans-const.c.diff?cvsroot=gcc&r1=1.4&r2=1.5



-- 


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

[Bug fortran/14067] [gfortran] no warning when character data statement overflows declared size

[tobi at gcc dot gnu dot org]

------- Additional Comments From tobi at gcc dot gnu dot org  2004-05-30 16:36 -------
The ICE is fixed, but this could still do with a warning.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|tobi at gcc dot gnu dot org |bdavis9659 at comcast dot
                   |                            |net
           Severity|normal                      |enhancement
           Keywords|ice-on-invalid-code, patch  |diagnostic
            Summary|[gfortran]  ICE when        |[gfortran] no warning when
                   |character data statement    |character data statement
                   |overflows declared size     |overflows declared size


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

[Bug fortran/14067] no warning when character data statement overflows declared size

[tobi at gcc dot gnu dot org]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
OtherBugsDependingO|                            |19292
              nThis|                            |


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

[Bug fortran/14067] no warning when character data statement overflows declared size

[pinskia at gcc dot gnu dot org]

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |pinskia at gcc dot gnu dot
                   |                            |org
   Last reconfirmed|2004-12-15 04:44:48         |2005-03-26 17:48:40
               date|                            |


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