[Bug fortran/15964] New: ICE/segmentation fault

[Bug fortran/15964] New: ICE/segmentation fault

[Mart dot Rentmeester at nn-online dot org]

This piece of code generates an ICE: segmentation fault.
When the character(:) is replaced with character(*)
another error occurs - submitted as a separate bug.



troogle> gfortran -v -c n13.f95 
Reading specs from /OPT/32/gcc-2004-06-09/lib/gcc/hppa2.0w-hp-hpux11.11/3.5.
0/specs
Configured with: ../configure --enable-languages=c,f95 
--prefix=/opt32/gcc-2004-06-09 --with-gmp=/opt32/gmp --with-gnu-as 
--with-as=/opt32/binutils/bin/as --enable-threads --disable-shared --disable-nls
Thread model: posix
gcc version 3.5.0 20040611 (experimental)
 /OPT/32/gcc-2004-06-09/libexec/gcc/hppa2.0w-hp-hpux11.11/3.5.0/f951 n13.f95 
-quiet -dumpbase n13.f95 -auxbase n13 -version -o /var/tmp//ccIs5CEq.s
GNU F95 version 3.5.0 20040611 (experimental) (hppa2.0w-hp-hpux11.11)
        compiled by GNU C version 3.5.0 20040611 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096


n13.f95: In function `a':
n13.f95:1: internal compiler error: Segmentation fault



      subroutine a(c)

      implicit none
      character(*)  :: c(:)

      call b(c(4))

      end subroutine a

-- 
           Summary: ICE/segmentation fault
           Product: gcc
           Version: 3.5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: Mart dot Rentmeester at nn-online dot org
                CC: gcc-bugs at gcc dot gnu dot org


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

[Bug fortran/15964] ICE/segmentation fault

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2004-06-13 09:19 -------
Confirmed, here is the backtrace:
#0  gfc_conv_expr_val (se=0xbffec000, expr=0x0) at /home/gates/pinskia/src/gnu/gcc/src/gcc/
fortran/trans-expr.c:1508
#1  0x08098b09 in gfc_conv_expr_type (se=0xbffec000, expr=0x0, type=0x0) at /home/gates/
pinskia/src/gnu/gcc/src/gcc/fortran/trans-expr.c:1520
#2  0x08098d3d in gfc_trans_init_string_length (cl=0x85a79f8, pblock=0xbffec0c0) at /home/gates/
pinskia/src/gnu/gcc/src/gcc/fortran/trans-expr.c:152
#3  0x080a7370 in gfc_trans_dummy_array_bias (sym=0x85a92c8, tmpdesc=0x400f4658, 
body=0x4007c0b0)
    at /home/gates/pinskia/src/gnu/gcc/src/gcc/fortran/trans-array.c:3032
#4  0x08091df7 in gfc_generate_function_code (ns=0x85a8e90) at /home/gates/pinskia/src/gnu/gcc/
src/gcc/fortran/trans-decl.c:1737
#5  0x0808d853 in gfc_generate_code (ns=0x85a8e90) at /home/gates/pinskia/src/gnu/gcc/src/gcc/
fortran/trans.c:651
#6  0x080735a7 in gfc_parse_file () at /home/gates/pinskia/src/gnu/gcc/src/gcc/fortran/parse.c:2477
#7  0x0808a06c in gfc_be_parse_file (set_yydebug=0) at /home/gates/pinskia/src/gnu/gcc/src/gcc/
fortran/f95-lang.c:266
#8  0x0838c4a8 in toplev_main (argc=0, argv=0xbffec304) at /home/gates/pinskia/src/gnu/gcc/src/
gcc/toplev.c:1666
#9  0x420174d9 in __libc_start_main () from /lib/i686/libc.so.6
#10 0x0804b071 in _start ()


but this is a dup of bug 15324.

*** This bug has been marked as a duplicate of 15324 ***

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
           Keywords|                            |ice-on-valid-code
         Resolution|                            |DUPLICATE


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