[Bug fortran/21083] New: gfortran -fdefault-integer-8 segmentation fault

[edward dot e dot meyer at comcast dot net]

code:
----
      program chk
      character*8 a
      a = 'a string'
      end

command line & output:
---------------------

gfortran -save-temps -v -fdefault-integer-8 -o i8bug i8bug.f

Driving: /home/eem2314/local/gcc-cvs/bin/gfortran -save-temps -v
-fdefault-integer-8 -o i8bug i8bug.f -lgfortranbegin -lgfortran -lm -shared-libgcc
Using built-in specs.
Target: i686-pc-linux-gnu
Configured with: ../gcc-cvs/configure --prefix=/home/eem2314/local/gcc-cvs
--enable-languages=c,c++,f95 : (reconfigured) ../gcc-cvs/configure
--prefix=/home/eem2314/local/gcc-cvs --enable-languages=c,c++,f95 --no-create
--no-recursion : (reconfigured) ../gcc-cvs/configure
--prefix=/home/eem2314/local/gcc-cvs --enable-languages=c,c++,f95 --no-create
--no-recursion
Thread model: posix
gcc version 4.1.0 20050401 (experimental)
 /home/eem2314/local/gcc-cvs/libexec/gcc/i686-pc-linux-gnu/4.1.0/f951 i8bug.f
-ffixed-form -quiet -dumpbase i8bug.f -mtune=pentiumpro -auxbase i8bug -version
-fdefault-integer-8 -o i8bug.s
GNU F95 version 4.1.0 20050416 (experimental) (i686-pc-linux-gnu)
   compiled by GNU C version 3.4.2 20041017 (Red Hat 3.4.2-6.fc3).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
 as -V -Qy -o i8bug.o i8bug.s
GNU assembler version 2.15.92.0.2 (i386-redhat-linux) using BFD version
2.15.92.0.2 20040927
 /home/eem2314/local/gcc-cvs/libexec/gcc/i686-pc-linux-gnu/4.1.0/collect2--eh-frame-hdr
-m elf_i386 -dynamic-linker /lib/ld-linux.so.2 -o i8bug /usr/lib/crt1.o
/usr/lib/crti.o
/home/eem2314/local/gcc-cvs/lib/gcc/i686-pc-linux-gnu/4.1.0/crtbegin.o
-L/home/eem2314/local/gcc-cvs/lib/gcc/i686-pc-linux-gnu/4.1.0
-L/home/eem2314/local/gcc-cvs/lib/gcc/i686-pc-linux-gnu/4.1.0/../../.. i8bug.o
-lgfortranbegin -lgfortran -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc
/home/eem2314/local/gcc-cvs/lib/gcc/i686-pc-linux-gnu/4.1.0/crtend.o /usr/lib/crtn.o


traceback:
--------

Program received signal SIGSEGV, Segmentation fault.
0x004e0b43 in memmove () from /lib/tls/libc.so.6
(gdb) where
#0  0x004e0b43 in memmove () from /lib/tls/libc.so.6
#1  0x009f72ec in *_gfortran_copy_string (destlen=8, dest=0x0, srclen=4672584,
    src=0x8 <Address 0x8 out of bounds>)
    at ../../../gcc-cvs/libgfortran/intrinsics/string_intrinsics.c:96
#2  0x080484f5 in MAIN__ ()
#3  0x08048523 in main (argc=-8, argv=0xfffffff8)
    at ../../../gcc-cvs/libgfortran/fmain.c:18

-- 
           Summary: gfortran -fdefault-integer-8 segmentation fault
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: edward dot e dot meyer at comcast dot net
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


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