[Bug fortran/23259] gfortran.dg/large_integer_kind_1.f90 FAIL with Error: Kind -1 not supported for type INTEGER at (1)

["christian dot joensson at gmail dot com" <gcc-bugzilla at gcc dot gnu dot org>]

------- Additional Comments From christian dot joensson at gmail dot com  2005-08-06 07:38 -------
or maybe even a bug with my glibc.... sorry for the noise...

Current directory is /usr/local/src/trunk/objdir/gcc/
GNU gdb Red Hat Linux (6.3.0.0-0.29rh)
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 "sparc-redhat-linux"...Using host libthread_db
library "/lib/libthread_db.so.1".

Breakpoint 1 at 0x11920: file ../../gcc/gcc/gcc.c, line 6752.
Function "internal_error" not defined.
Breakpoint 2 at 0x41550
Breakpoint 3 at 0x413dc
(gdb) set args -B/usr/local/src/trunk/objdir/gcc/testsuite/../
/usr/local/src/trunk/gcc/gcc/testsuite/gfortran.dg/large_integer_kind_1.f90  
-O0   -pedantic-errors 
-L/usr/local/src/trunk/objdir/sparc64-unknown-linux-gnu/./libgfortran/.libs
-L/usr/local/src/trunk/objdir/sparc64-unknown-linux-gnu/./libiberty  -lm   -o
./large_integer_kind_1.exe
(gdb) r
Starting program: /usr/local/src/trunk/objdir/gcc/gfortran
-B/usr/local/src/trunk/objdir/gcc/testsuite/../
/usr/local/src/trunk/gcc/gcc/testsuite/gfortran.dg/large_integer_kind_1.f90  
-O0   -pedantic-errors 
-L/usr/local/src/trunk/objdir/sparc64-unknown-linux-gnu/./libgfortran/.libs
-L/usr/local/src/trunk/objdir/sparc64-unknown-linux-gnu/./libiberty  -lm   -o
./large_integer_kind_1.exe
Breakpoint 2 at 0x70064fa4: file exit.c, line 35.
Breakpoint 3 at 0x70063ce4: file ../sysdeps/generic/abort.c, line 50.
 In file
/usr/local/src/trunk/gcc/gcc/testsuite/gfortran.dg/large_integer_kind_1.f90:8

    integer(kind=k),intent(in) :: a
                 1
Error: Kind -1 not supported for type INTEGER at (1)
 In file
/usr/local/src/trunk/gcc/gcc/testsuite/gfortran.dg/large_integer_kind_1.f90:25

  use testmod
            1
Fatal Error: Can't open module file 'testmod.mod' for reading at (1): No such
file or directory

Breakpoint 2, 0x70064fa4 in exit () from /lib/libc.so.6
(gdb) bt
#0  0x70064fa4 in exit () from /lib/libc.so.6
#1  0x7004b834 in __libc_start_main (main=0x1c180 <main>, argc=269144, 
    ubp_av=0xa54, init=0x29238 <__libc_csu_init>, 
    fini=0x7002b908 <_rtld_local_ro>, rtld_fini=0x1, stack_end=0xef9e5a81)
    at ../sysdeps/generic/libc-start.c:240
#2  0x000111f8 in _start ()
#3  0x000111f8 in _start ()
Previous frame identical to this frame (corrupt stack?)
(gdb) list
240	../sysdeps/generic/libc-start.c: No such file or directory.
	in ../sysdeps/generic/libc-start.c
(gdb) quit
The program is running.  Exit anyway? (y or n) y

Debugger finished


-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|                            |INVALID


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