]>
Commit | Line | Data |
---|---|---|
8e5578ea | 1 | * Resent-From: Craig Burley <burley@gnu.org> |
2 | * Resent-To: craig@jcb-sc.com | |
3 | * X-Delivered: at request of burley on mescaline.gnu.org | |
4 | * Date: Wed, 16 Dec 1998 18:31:24 +0100 | |
5 | * From: Dieter Stueken <stueken@conterra.de> | |
6 | * Organization: con terra GmbH | |
7 | * To: fortran@gnu.org | |
8 | * Subject: possible bug | |
9 | * Content-Type: text/plain; charset=iso-8859-1 | |
10 | * X-Mime-Autoconverted: from 8bit to quoted-printable by mescaline.gnu.org id KAA09085 | |
11 | * X-UIDL: 72293bf7f9fac8378ec7feca2bccbce2 | |
12 | * | |
13 | * Hi, | |
14 | * | |
15 | * I'm about to compile a very old, very ugly Fortran program. | |
16 | * For one part I got: | |
17 | * | |
18 | * f77: Internal compiler error: program f771 got fatal signal 6 | |
19 | * | |
20 | * instead of any detailed error message. I was able to break down the | |
21 | * problem to the following source fragment: | |
22 | * | |
23 | * ------------------------------------------- | |
24 | PROGRAM WAP | |
25 | ||
26 | integer*2 ios | |
27 | character*80 name | |
28 | ||
29 | name = 'blah' | |
30 | open(unit=8,status='unknown',file=name,form='formatted', | |
31 | F iostat=ios) | |
32 | ||
33 | END | |
34 | * ------------------------------------------- | |
35 | * | |
36 | * The problem seems to be caused by the "integer*2 ios" declaration. | |
37 | * So far I solved it by simply using a plain integer instead. | |
38 | * | |
39 | * I'm running gcc on a Linux system compiled/installed | |
40 | * with no special options: | |
41 | * | |
42 | * -> g77 -v | |
43 | * g77 version 0.5.23 | |
44 | * Driving: g77 -v -c -xf77-version /dev/null -xnone | |
45 | * Reading specs from /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/specs | |
46 | * gcc version 2.8.1 | |
47 | * /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/cpp -lang-c -v -undef | |
48 | * -D__GNUC__=2 -D__GNUC_MINOR__=8 -D__ELF__ -D__unix__ -D__linux__ | |
49 | * -D__unix -D__linux -Asystem(posix) -D_LANGUAGE_FORTRAN -traditional | |
50 | * -Di386 -Di686 -Asystem(unix) -Acpu(i386) -Amachine(i386) -D__i386__ | |
51 | * -D__i686__ -Asystem(unix) -Acpu(i386) -Amachine(i386) /dev/null | |
52 | * /dev/null | |
53 | * GNU CPP version 2.8.1 (i386 GNU/Linux with ELF) | |
54 | * #include "..." search starts here: | |
55 | * #include <...> search starts here: | |
56 | * /usr/local/include | |
57 | * /usr/i686-pc-linux-gnulibc1/include | |
58 | * /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/include | |
59 | * /usr/include | |
60 | * End of search list. | |
61 | * /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/f771 -fnull-version | |
62 | * -quiet -dumpbase g77-version.f -version -fversion -o /tmp/cca24911.s | |
63 | * /dev/null | |
64 | * GNU F77 version 2.8.1 (i686-pc-linux-gnulibc1) compiled by GNU C version | |
65 | * 2.8.1. | |
66 | * GNU Fortran Front End version 0.5.23 | |
67 | * as -V -Qy -o /tmp/cca24911.o /tmp/cca24911.s | |
68 | * GNU assembler version 2.8.1 (i486-linux), using BFD version 2.8.1 | |
69 | * ld -m elf_i386 -dynamic-linker /lib/ld-linux.so.1 -o /tmp/cca24911 | |
70 | * /tmp/cca24911.o /usr/lib/crt1.o /usr/lib/crti.o | |
71 | * /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/crtbegin.o | |
72 | * -L/usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1 -L/usr -lg2c -lm -lgcc | |
73 | * -lc -lgcc /usr/lib/gcc-lib/i686-pc-linux-gnulibc1/2.8.1/crtend.o | |
74 | * /usr/lib/crtn.o | |
75 | * /tmp/cca24911 | |
76 | * __G77_LIBF77_VERSION__: 0.5.23 | |
77 | * @(#)LIBF77 VERSION 19970919 | |
78 | * __G77_LIBI77_VERSION__: 0.5.23 | |
79 | * @(#) LIBI77 VERSION pjw,dmg-mods 19980405 | |
80 | * __G77_LIBU77_VERSION__: 0.5.23 | |
81 | * @(#) LIBU77 VERSION 19970919 | |
82 | * | |
83 | * | |
84 | * Regards, Dieter. | |
85 | * -- | |
86 |