[Bug fortran/23379] New: compiler segfault with internal write

[Bug fortran/23379] New: compiler segfault with internal write

[tkoenig at gcc dot gnu dot org]

$ cat internal-write.f90
  character(len=20), dimension(2) ::  line(2)
  write (unit=line(1:2),fmt='(A/A)') '1', '2'
end
$ gdb ~/libexec/gcc/i686-pc-linux-gnu/4.1.0/f951
GNU gdb 6.3-debian
Copyright 2004 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "i386-linux"...Using host libthread_db library
"/lib/tls/libthread_db.so.1".

(gdb) r internal-write.f90
Starting program: /home/ig25/libexec/gcc/i686-pc-linux-gnu/4.1.0/f951
internal-write.f90
 MAIN__
Program received signal SIGSEGV, Segmentation fault.
0x0809c830 in gfc_conv_scalarized_array_ref (se=0xbffff334, ar=0x8689fe4)
    at ../../gcc-4.1/gcc/fortran/trans-array.c:1618
1618        n = se->loop->order[0];
(gdb) p se->loop
$1 = (struct gfc_loopinfo *) 0x0
(gdb) bt
#0  0x0809c830 in gfc_conv_scalarized_array_ref (se=0xbffff334, ar=0x8689fe4)
    at ../../gcc-4.1/gcc/fortran/trans-array.c:1618
#1  0x0809d16d in gfc_conv_array_ref (se=0xbffff334, ar=0x8689fe4)
    at ../../gcc-4.1/gcc/fortran/trans-array.c:1662
#2  0x080a9578 in gfc_conv_expr (se=0xbffff334, expr=0x8689f88)
    at ../../gcc-4.1/gcc/fortran/trans-expr.c:420
#3  0x080b3bf8 in set_string (block=0xbffff394, postblock=0xbffff38c,
var=Variable "var" is not available.
)
    at ../../gcc-4.1/gcc/fortran/trans-io.c:400
#4  0x080b4aed in build_dt (function=0x85d1f18, code=0x868a328)
    at ../../gcc-4.1/gcc/fortran/trans-io.c:1155
#5  0x080981ba in gfc_trans_code (code=0x868a328)
    at ../../gcc-4.1/gcc/fortran/trans.c:593
#6  0x080a751e in gfc_generate_function_code (ns=0x86894a8)
    at ../../gcc-4.1/gcc/fortran/trans-decl.c:2397
#7  0x08097834 in gfc_generate_code (ns=0x86894a8)
    at ../../gcc-4.1/gcc/fortran/trans.c:683
#8  0x0807da01 in gfc_parse_file () at ../../gcc-4.1/gcc/fortran/parse.c:2639
#9  0x080971e5 in gfc_be_parse_file (set_yydebug=0)
    at ../../gcc-4.1/gcc/fortran/f95-lang.c:256
#10 0x0836d250 in toplev_main (argc=2, argv=0xbffff5f4)
    at ../../gcc-4.1/gcc/toplev.c:971
#11 0x40076974 in __libc_start_main () from /lib/tls/libc.so.6
#12 0x0804adb1 in _start () at ../sysdeps/i386/elf/start.S:102
$ gfortran -v
Using built-in specs.
Target: i686-pc-linux-gnu
Configured with: ../gcc-4.1/configure --prefix=/home/ig25 --enable-languages=c,f95
Thread model: posix
gcc version 4.1.0 20050811 (experimental)

-- 
           Summary: compiler segfault with internal write
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Keywords: wrong-code
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tkoenig at gcc dot gnu dot org
                CC: gcc-bugs at gcc dot gnu dot org
 BugsThisDependsOn: 23364
OtherBugsDependingO 19274
             nThis:


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

[Bug fortran/23379] compiler segfault with internal write

[tkoenig at gcc dot gnu dot org]

------- Additional Comments From tkoenig at gcc dot gnu dot org  2005-08-13 21:25 -------
Sorry, wrong bug number.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
OtherBugsDependingO|19274                       |19276
              nThis|                            |


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

[Bug fortran/23379] compiler segfault with internal write

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2005-08-13 21:26 -------
Confirmed.

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|                            |1
   Last reconfirmed|0000-00-00 00:00:00         |2005-08-13 21:26:40
               date|                            |


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

[Bug fortran/23379] compiler segfault with internal write

[pault at gcc dot gnu dot org]

------- Additional Comments From pault at gcc dot gnu dot org  2005-08-14 12:40 -------
(In reply to comment #2)
> Confirmed.
This is really pr15966, although this latter has been marked as being resolved.
 Feng Wang's patch allowed arrays to be used as internal units when there is no
editing involving records.  Array sections violate the same section of the compiler.

Jerry DeLisle and I are working on this.  I have provided a front-end patch that
transmits the array descriptor to the library.  Jerry is putting together the
library part.

Paul T

-- 


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

[Bug fortran/23379] compiler segfault with internal write

[jvdelisle at verizon dot net]

------- Additional Comments From jvdelisle at verizon dot net  2005-09-12 05:39 -------
I have confirmed that the test case given is resolved by the patch discusssed in
comment #3.  The patch is in review.

-- 


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

[Bug fortran/23379] compiler segfault with internal write

[jvdelisle at gcc dot gnu dot org]

------- Additional Comments From jvdelisle at gcc dot gnu dot org  2005-09-16 03:14 -------
Resolved by patches to PR21875

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


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

[Bug fortran/23379] compiler segfault with internal write

[jvdelisle at gcc dot gnu dot org]

-- 
Bug 23379 depends on bug 23364, which changed state.

Bug 23364 Summary: missing format reversion for internal write
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23364

           What    |Old Value                   |New Value
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |FIXED

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

[Bug fortran/23379] compiler segfault with internal write

[tkoenig at gcc dot gnu dot org]

-- 
Bug 23379 depends on bug 23364, which changed state.

Bug 23364 Summary: missing format reversion for internal write
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23364

           What    |Old Value                   |New Value
----------------------------------------------------------------------------
             Status|RESOLVED                    |REOPENED
         Resolution|FIXED                       |

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