[Bug fortran/36140] ICE in snapshot of 05/02/08 under MIPS Linux with IMPLICIT LOGICAL and function call

["michael dot a dot richmond at nasa dot gov" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #2 from michael dot a dot richmond at nasa dot gov  2008-05-12 12:06 -------
I would like to make a clarification. Program kmci produces a segfault:

f951: 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.

Program summt produces an ICE that is not a segfault:

f951: internal compiler error: in resolve_specific_f0, at
fortran/resolve.c:1572
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

The gdb listing for kmci is:

GNU gdb 6.4.90-debian
Copyright (C) 2006 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 "mips-linux-gnu"...Using host libthread_db library
"/lib/libthread_db.so.1".

(gdb) run
Starting program:
/home/mrichmon/irun/libexec/gcc/mips-unknown-linux-gnu/4.4.0/f951 kmci.f90

Program received signal SIGSEGV, Segmentation fault.
0x2ac6ffb4 in funlockfile () from /lib/libc.so.6
(gdb) backtrace
#0  0x2ac6ffb4 in funlockfile () from /lib/libc.so.6
#1  0x2ac54360 in vfprintf () from /lib/libc.so.6
#2  0x2ac7bf78 in vsnprintf () from /lib/libc.so.6
#3  0x0048b1b0 in gfc_get_string (format=0x7fe9045c "")
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/iresolve.c:52
#4  0x0047764c in gfc_find_function (
    name=0x7fe902a8
"û­\200\001\177é\003Ì\177é\003Ì\177é\003Ì\177é\003Ì\177é\003Ì\177é\004K\177é\003Ì\177é\004K")
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/intrinsic.c:702
#5  0x004763f8 in gfc_procedure_use (sym=0xc97480, ap=0xc975f4, where=0xc975dc)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/interface.c:2411
#6  0x004ba1a0 in gfc_resolve_expr (e=0xc975a8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:1695
#7  0x004c04fc in resolve_code (code=0xc977b0, ns=0xc962b8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:6198
#8  0x004c4a6c in gfc_resolve_blocks (b=0xc96ae8, ns=0xc962b8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:5988
#9  0x004c04cc in resolve_code (code=0xc73b10, ns=0xc962b8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:6187
#10 0x004c2438 in resolve_codes (ns=0xc962b8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:9121
#11 0x004c2494 in gfc_resolve (ns=0xc962b8)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/resolve.c:9140
---Type <return> to continue, or q <return> to quit---
#12 0x004ade44 in gfc_parse_file ()
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/parse.c:3566
#13 0x004e9488 in gfc_be_parse_file (set_yydebug=<value optimized out>)
    at /home/mrichmon/gcc-4.4-20080502/gcc/fortran/f95-lang.c:258
#14 0x0075f79c in toplev_main (argc=<value optimized out>,
    argv=<value optimized out>)
    at /home/mrichmon/gcc-4.4-20080502/gcc/toplev.c:962
#15 0x2ac25434 in __libc_start_main () from /lib/libc.so.6
#16 0x0044320c in _ftext () at ../sysdeps/mips/elf/start.S:110
(gdb) quit
The program is running.  Exit anyway? (y or n) y

The gdb listing for summt is:

GNU gdb 6.4.90-debian
Copyright (C) 2006 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 "mips-linux-gnu"...Using host libthread_db library
"/lib/libthread_db.so.1".

(gdb) run
Starting program:
/home/mrichmon/irun/libexec/gcc/mips-unknown-linux-gnu/4.4.0/f951 summt.f90
f951: internal compiler error: in resolve_specific_f0, at
fortran/resolve.c:1572
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

Program exited with code 04.
(gdb) backtrace
No stack.
(gdb) quit


-- 


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