$ gfortran -g -fdefault-integer-8 char_result_5.f90 
$ gdb ./a.out
GNU gdb 6.7.1-debian
Copyright (C) 2007 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "i486-linux-gnu"...
Using host libthread_db library "/lib/i686/cmov/libthread_db.so.1".
(gdb) r
Starting program: /tmp/a.out 

Program received signal SIGSEGV, Segmentation fault.
0xb7f82664 in *_gfortran_string_scan (slen=9, str=0x804b480 "123456789",
setlen=1, set=0x0, back=-1080910905)
    at ../../../../gcc/trunk/libgfortran/intrinsics/string_intrinsics.c:300
300                   if (str[i] == set[j])


-- 
           Summary: char_result_5.f90 / char_result_6.f90 fail with -
                    fdefault-integer-8
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: wrong-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: tkoenig at gcc dot gnu dot org
 BugsThisDependsOn: 32770


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

Reply via email to