[Bug fortran/39893] New: gfortran ICE on invalid program

[Bug fortran/39893] New: gfortran ICE on invalid program

[deji_aking at yahoo dot ca]

The attached program produce an internal compiler error when compiled with
gfortran-4.4.0.


-- 
           Summary: gfortran ICE on invalid program
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: deji_aking at yahoo dot ca


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

[Bug fortran/39893] gfortran ICE on invalid program

[deji_aking at yahoo dot ca]

------- Comment #1 from deji_aking at yahoo dot ca  2009-04-25 12:16 -------
Created an attachment (id=17691)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=17691&action=view)
invalid program


-- 


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

[Bug fortran/39893] gfortran ICE on invalid program

[dominiq at lps dot ens dot fr]

------- Comment #2 from dominiq at lps dot ens dot fr  2009-04-25 13:45 -------
Confirmed for gfortran 4.2.3, 4.3.3, 4.4.0, and trunk:

pr39893.f:13.25:

      CHARACTER*(*) DICBA                                               
                         1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:16.42:

      CHARACTER*(*) ERRBAR,SSYM,SSIZ,EPAIS,FONC                         
                                          1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:16.26:

      CHARACTER*(*) ERRBAR,SSYM,SSIZ,EPAIS,FONC                         
                          1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:16.47:

      CHARACTER*(*) ERRBAR,SSYM,SSIZ,EPAIS,FONC                         
                                               1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:16.36:

      CHARACTER*(*) ERRBAR,SSYM,SSIZ,EPAIS,FONC                         
                                    1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:16.31:

      CHARACTER*(*) ERRBAR,SSYM,SSIZ,EPAIS,FONC                         
                               1
Error: Entity with assumed character length at (1) must be a dummy argument or
a PARAMETER
pr39893.f:23.26:

      DATA         CLIP  , ERRBAR,   JOIN  ,  SSYM  ,  SSIZ  ,  EPAIS  ,
                          1
Error: Incompatible types in DATA statement at (1); attempted conversion of
INTEGER(4) to CHARACTER(1)
pr39893.f:6: internal compiler error: Bus error
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.


-- 

dominiq at lps dot ens dot fr changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|gfortran ICE on invalid     |gfortran ICE on invalid
                   |program                     |program


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

[Bug fortran/39893] gfortran ICE on invalid program

[dominiq at lps dot ens dot fr]

------- Comment #3 from dominiq at lps dot ens dot fr  2009-04-25 13:57 -------
Reduced test case:

      SUBROUTINE XAUTOGET()
      CHARACTER*(*) DICBA
      DATA DICBA /"CLIP" /
      RETURN
      END

The line "DATA DICBA /"CLIP" /" is needed to get the ICE.


-- 


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

[Bug fortran/39893] gfortran ICE on invalid program

[kargl at gcc dot gnu dot org]

------- Comment #4 from kargl at gcc dot gnu dot org  2009-04-25 20:47 -------
I have a patch.


-- 

kargl at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |kargl at gcc dot gnu dot org
                   |dot org                     |
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2009-04-25 20:47:18
               date|                            |


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

[Bug fortran/39893] gfortran ICE on invalid program

[sgk at troutmask dot apl dot washington dot edu]

------- Comment #5 from sgk at troutmask dot apl dot washington dot edu  2009-04-26 03:29 -------
Subject: Re:  gfortran ICE on invalid program

On Sat, Apr 25, 2009 at 08:47:19PM -0000, kargl at gcc dot gnu dot org wrote:
> 
> 
> ------- Comment #4 from kargl at gcc dot gnu dot org  2009-04-25 20:47 -------
> I have a patch.
> 


I've come up with 2 different patches.  Unfortunately,
both have a few regressions. :(


-- 


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

[Bug fortran/39893] gfortran ICE on invalid program

[kargl at gcc dot gnu dot org]

------- Comment #6 from kargl at gcc dot gnu dot org  2009-04-26 19:28 -------
Subject: Bug 39893

Author: kargl
Date: Sun Apr 26 19:27:50 2009
New Revision: 146816

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=146816
Log:
2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/39893
        * gfortran.dg/assumed_charlen_dummy.f90: New Test.


2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/39893
        fortran/data.c (gfc_assign_data_value): If the lvalue is an 
        assumed character length entity in a data statement, then 
        return FAILURE to prevent segmentation fault.


Added:
    trunk/gcc/testsuite/gfortran.dg/assumed_charlen_dummy.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/data.c
    trunk/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/39893] [4.4] gfortran ICE on invalid program

[kargl at gcc dot gnu dot org]

------- Comment #7 from kargl at gcc dot gnu dot org  2009-04-26 19:30 -------
Fixed on trunk.

I'll backport to 4.4. branch in a week.


-- 

kargl at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|gfortran ICE on invalid     |[4.4] gfortran ICE on
                   |program                     |invalid program


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

[Bug fortran/39893] [4.4] gfortran ICE on invalid program

[burnus at gcc dot gnu dot org]

------- Comment #8 from burnus at gcc dot gnu dot org  2009-06-03 18:58 -------
(In reply to comment #7)
> Fixed on trunk.
> I'll backport to 4.4. branch in a week.

* ping *


-- 


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

[Bug fortran/39893] [4.4] gfortran ICE on invalid program

[kargl at gcc dot gnu dot org]

------- Comment #9 from kargl at gcc dot gnu dot org  2009-06-04 17:02 -------
Subject: Bug 39893

Author: kargl
Date: Thu Jun  4 17:01:45 2009
New Revision: 148176

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=148176
Log:
Merged r146816 from trunk into 4.4 branch.  Specifically,

2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/39893
        * gfortran.dg/assumed_charlen_dummy.f90: New Test.


2009-04-26  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/39893
        fortran/data.c (gfc_assign_data_value): If the lvalue is an
        assumed character length entity in a data statement, then
        return FAILURE to prevent segmentation fault.

Added:
    branches/gcc-4_4-branch/gcc/testsuite/gfortran.dg/assumed_charlen_dummy.f90
      - copied unchanged from r146816,
trunk/gcc/testsuite/gfortran.dg/assumed_charlen_dummy.f90
Modified:
    branches/gcc-4_4-branch/gcc/fortran/ChangeLog
    branches/gcc-4_4-branch/gcc/fortran/data.c
    branches/gcc-4_4-branch/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/39893] [4.4] gfortran ICE on invalid program

[kargl at gcc dot gnu dot org]

------- Comment #10 from kargl at gcc dot gnu dot org  2009-06-04 19:11 -------
Fixed on 4.4.x and trunk. Closing.


-- 

kargl at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED
   Target Milestone|---                         |4.4.1


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