[Bug fortran/34722] New: compile results in "internal compiler error: segmentation fault" message

[Bug fortran/34722] New: compile results in "internal compiler error: segmentation fault" message

[sdirkse at gams dot com]

Here's the log of the failed compile:
madison.gams.com:/home/steve/lang/f90/bug3$uname -a
Linux madison.gams.com 2.6.23.9-85.fc8 #1 SMP Fri Dec 7 15:49:36 EST 2007
x86_64 x86_64 x86_64 GNU/Linux
madison.gams.com:/home/steve/lang/f90/bug3$gfortran -c -m64 -O gamsana1.f90
gamsana1.f90:1541: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.


-- 
           Summary: compile results in "internal compiler error:
                    segmentation fault" message
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: major
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: sdirkse at gams dot com
GCC target triplet: x86_64-unknown-linux-gnu


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[sdirkse at gams dot com]

------- Comment #1 from sdirkse at gams dot com  2008-01-09 01:11 -------
Created an attachment (id=14906)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=14906&action=view)
zipped source and doit.sh script to reproduce

To reproduce, unzip the attachment and run
 ./doit.sh


-- 


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[sdirkse at gams dot com]

------- Comment #2 from sdirkse at gams dot com  2008-01-09 01:16 -------
I should have mentioned: I get this with a checkout of the gcc trunk from 8 Jan
2008.  Also, this is not likely unique to 64-bit: I get the same error message
on Linux32 with a similar file and a slightly older revision of gcc trunk.


-- 


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[burnus at gcc dot gnu dot org]

------- Comment #3 from burnus at gcc dot gnu dot org  2008-01-09 07:39 -------
I don't get an segfault, but:
gamsana1.f90:1550.6:
      SUBROUTINE INVENTNAMES(ROWNAM, COLNAM, RNAMLEN, CNAMLEN, M, N)
     1
Reduced test case:


      PROGRAM GAMSANAL
      IMPLICIT NONE
      INTEGER(4), ALLOCATABLE, DIMENSION(:) :: namI
      CHARACTER,  ALLOCATABLE, DIMENSION(:) :: namC
      INTEGER IODICT, PROWNAM, PCOLNAM, PRNLEN, PCNLEN, M, N
      LOGICAL DICEXIST

      INQUIRE(UNIT=IODICT, EXIST=DICEXIST)
      CALL INVENTNAMES(namC(PROWNAM), M, N)
end

      SUBROUTINE INVENTNAMES(ROWNAM, M, N)
      IMPLICIT NONE
      INTEGER M,N
      CHARACTER ROWNAM(16,M)
      INTEGER RNAMLEN(M)
      END SUBROUTINE

Removing the "N" argument, crashes GCC here; valgrind shows a huge number of
invalid reads, starting with:

==16951== Invalid read of size 1
==16951==    at 0x473909: gfc_undo_symbols (symbol.c:2582)
==16951==    by 0x452454: decode_statement (parse.c:122)
==16951==    by 0x4530C4: next_statement (parse.c:505)
==16951==    by 0x4563B1: gfc_parse_file (parse.c:3317)
==16951==    by 0x47EF04: gfc_be_parse_file (f95-lang.c:260)
==16951==    by 0x6F2314: toplev_main (toplev.c:1042)
==16951==    by 0x52CEB29: (below main) (in /lib64/libc-2.6.1.so)


The reduced program works woth gfortran 4.2, which makes it a regression. (The
full program does not as %VAL is not supported by 4.2.)


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |burnus at gcc dot gnu dot
                   |                            |org


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[burnus at gcc dot gnu dot org]

------- Comment #4 from burnus at gcc dot gnu dot org  2008-01-09 07:42 -------
(In reply to comment #3)
> I don't get an segfault, but:
> gamsana1.f90:1550.6:
>       SUBROUTINE INVENTNAMES(ROWNAM, COLNAM, RNAMLEN, CNAMLEN, M, N)

The following error message I accidentally did not include; it is also the same
error I get for the cut-down program:

Interner Fehler bei (1):
gfc_undo_symbols(): Negative refs


-- 


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[dominiq at lps dot ens dot fr]

------- Comment #5 from dominiq at lps dot ens dot fr  2008-01-09 10:11 -------
Further reduced test case:

      PROGRAM GAMSANAL
      IMPLICIT NONE
      character :: tmp
      INTEGER IODICT
      LOGICAL DICEXIST

      INQUIRE(UNIT=IODICT, EXIST=DICEXIST)
end

      SUBROUTINE INVENTNAMES()
      IMPLICIT NONE
      END SUBROUTINE

If I comment the line "character :: tmp" I get an ICE:

pr34722_red.f90:7: internal compiler error: Segmentation fault
Please submit a full bug report,

If I comment the "INQUIRE" line, the code compiles fine. What is very weird, is
that if I comment the useless subroutine, the code compiles also.

>From the gfortran versions I have at hand, the bug appeared between gcc version
4.3.0 20061231 (FX build) and 20071105 (Tobias build) on
x86_64-unknown-linux-gnu and is not present in i386-pc-linux-gnu gcc version
4.3.0 20070716 (FX build).


-- 


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[burnus at gcc dot gnu dot org]

------- Comment #6 from burnus at gcc dot gnu dot org  2008-01-09 12:13 -------
I think it occurred between 2007-10-13-r129280 and 2007-10-15-r129311, plus
minus a few days as my tree had probably some patches installed, which might
have caused this.


-- 


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

[Bug fortran/34722] compile results in "internal compiler error: segmentation fault" message

[dominiq at lps dot ens dot fr]

------- Comment #7 from dominiq at lps dot ens dot fr  2008-01-09 12:26 -------
> I think it occurred between 2007-10-13-r129280 and 2007-10-15-r129311 ...

Revision 129309?


-- 


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[burnus at gcc dot gnu dot org]

------- Comment #8 from burnus at gcc dot gnu dot org  2008-01-09 15:57 -------
If I enable the call to decode_statement in decode_statement (parse.c), it
shows:

      SUBROUTINE INVENTNAMES()
     1
Interner Fehler bei (1):
Symbol changes still pending!

The pending symbol is "@iostat". If one dumps the code (with inventnames
commented),  one finds:

  {
    integer(kind=4) @iostat.2;
    [...]
    @iostat.2 = 0;
    inquire_parm.1.common.iostat = &@iostat.2;

I therefore believe it is due to the following patch (which was as pending
patch in my 2007-10-15 file).

Posted patch:
http://gcc.gnu.org/ml/fortran/2007-10/msg00021.html

Check in:
http://gcc.gnu.org/ml/gcc-cvs/2007-10/msg00433.html
2007-10-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/33055
        * trans-io.c (create_dummy_iostat): New function to create a unique
        dummy variable expression to use with IOSTAT.
        (gfc_trans_inquire): Use the new function to pass unit number error
info
        to run-time library if a regular IOSTAT variable was not given.


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot gnu dot
                   |                            |org
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
 GCC target triplet|x86_64-unknown-linux-gnu    |
           Keywords|                            |ice-on-valid-code
   Last reconfirmed|0000-00-00 00:00:00         |2008-01-09 15:57:57
               date|                            |
            Summary|compile results in "internal|[4.3 Regression] ICE: left-
                   |compiler error: segmentation|over "@iostat" variable
                   |fault" message              |polutes namespace


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #9 from jvdelisle at gcc dot gnu dot org  2008-01-11 08:52 -------
I am investigating.


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |jvdelisle at gcc dot gnu dot
                   |dot org                     |org
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2008-01-09 15:57:57         |2008-01-11 08:52:10
               date|                            |


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #10 from jvdelisle at gcc dot gnu dot org  2008-01-11 21:16 -------
Subject: Bug 34722

Author: jvdelisle
Date: Fri Jan 11 21:15:41 2008
New Revision: 131475

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=131475
Log:
2008-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/34722
        * trans-io.c (create_dummy_iostat): Commit the symbol.

Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-io.c


-- 


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #11 from jvdelisle at gcc dot gnu dot org  2008-01-11 21:18 -------
Subject: Bug 34722

Author: jvdelisle
Date: Fri Jan 11 21:18:10 2008
New Revision: 131476

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=131476
Log:
2008-01-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/34722
        * gfortran.dg//inquire_12.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/inquire_12.f90
Modified:
    trunk/gcc/testsuite/ChangeLog


-- 


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #12 from jvdelisle at gcc dot gnu dot org  2008-01-11 21:20 -------
Fixed on trunk.


-- 

jvdelisle at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #13 from jvdelisle at gcc dot gnu dot org  2008-01-12 08:36 -------
Subject: Bug 34722

Author: jvdelisle
Date: Sat Jan 12 08:35:25 2008
New Revision: 131487

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=131487
Log:
2008-01-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

        PR fortran/34722
        * match.c (gfc_match_name): Don't error if leading character is a '(',
        just return MATCH_NO.

Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/match.c


-- 


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

[Bug fortran/34722] [4.3 Regression] ICE: left-over "@iostat" variable polutes namespace

[jvdelisle at gcc dot gnu dot org]

------- Comment #14 from jvdelisle at gcc dot gnu dot org  2008-01-12 08:39 -------
Ignore comment #13, copy paste error on commit for 34432.


-- 


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