1 * Date: Tue
, 24 Aug
1999 12:25:41 +1200 (NZST
)
2 * From
: Jonathan Ravens
<ravens@whio
.gns
.cri
.nz
>
3 * To: gcc
-bugs@gcc
.gnu
.org
4 * Subject
: g77 bug report
5 * X
-UIDL
: a0bf5ecc21487cde48d9104983ab04d6
7 ! This fortran source will not compile
- if the penultimate elseif block is
0
8 ! included
then the message appears
:
10 ! /usr
/src
/egcs
//gcc
-2.95.1/gcc
/f
/stw
.c
:308: failed assertion `b
->uses_
> 0'
11 ! g77: Internal compiler error: program f771 got fatal signal 6
13 ! The command was : g77 -c <prog.f>
15 ! The OS is Red Hat 6, and the output from uname -a is
16 ! Linux grfw1452.gns.cri.nz 2.2.5-15 #1 Mon Apr 19 23:00:46 EDT 1999 i686 unknown
18 ! The configure script I used was
19 ! /usr/src/egcs/gcc/gcc-2.95.1/configure --enable-languages=f77 i585-unknown-linux
21 ! I was installing 2.95 because under EGCS 2.1.1 none of my code was working
22 ! with optimisation turned on, and there were still bugs with no optimisation
23 ! (all of which code works fine under g77 0.5.21 and Sun/IBM/Dec/HP fortrans).
25 ! The version of g77 is :
27 !g77 version 2.95.1 19990816 (release) (from FSF-g77 version 0.5.25 19990816 (release))
32 else if (i.eq. 1) then
34 else if (i.eq. 2) then
36 else if (i.eq. 3) then
38 else if (i.eq. 4) then
40 else if (i.eq. 5) then
42 else if (i.eq. 6) then
44 else if (i.eq. 7) then
46 else if (i.eq. 8) then
48 else if (i.eq. 9) then
50 else if (i.eq. 10) then
52 else if (i.eq. 11) then
54 else if (i.eq. 12) then
56 else if (i.eq. 13) then
58 else if (i.eq. 14) then
60 else if (i.eq. 15) then
62 else if (i.eq. 16) then
64 else if (i.eq. 17) then
66 else if (i.eq. 18) then
68 else if (i.eq. 19) then
70 else if (i.eq. 20) then
72 else if (i.eq. 21) then
74 else if (i.eq. 22) then
76 else if (i.eq. 23) then
78 else if (i.eq. 24) then
80 else if (i.eq. 25) then
82 else if (i.eq. 26) then
84 else if (i.eq. 27) then
86 else if (i.eq. 28) then
88 else if (i.eq. 29) then
90 else if (i.eq. 30) then
92 else if (i.eq. 31) then
94 else if (i.eq. 32) then
96 else if (i.eq. 33) then
98 else if (i.eq. 34) then
100 else if (i.eq. 35) then
102 else if (i.eq. 36) then
104 else if (i.eq. 37) then
106 else if (i.eq. 38) then
108 else if (i.eq. 39) then
110 else if (i.eq. 40) then
112 else if (i.eq. 41) then
114 else if (i.eq. 42) then
116 else if (i.eq. 43) then
118 else if (i.eq. 44) then
120 else if (i.eq. 45) then
122 else if (i.eq. 46) then
124 else if (i.eq. 47) then
126 else if (i.eq. 48) then
128 else if (i.eq. 49) then
130 else if (i.eq. 50) then
132 else if (i.eq. 51) then
134 else if (i.eq. 52) then
136 else if (i.eq. 53) then
138 else if (i.eq. 54) then
140 else if (i.eq. 55) then
142 else if (i.eq. 56) then
144 else if (i.eq. 57) then
146 else if (i.eq. 58) then
148 else if (i.eq. 59) then
150 else if (i.eq. 60) then
152 else if (i.eq. 61) then
154 else if (i.eq. 62) then
156 else if (i.eq. 63) then
158 else if (i.eq. 64) then
160 else if (i.eq. 65) then
162 else if (i.eq. 66) then
164 else if (i.eq. 67) then
166 else if (i.eq. 68) then
168 else if (i.eq. 69) then
170 else if (i.eq. 70) then
172 else if (i.eq. 71) then
174 else if (i.eq. 72) then
176 else if (i.eq. 73) then
178 else if (i.eq. 74) then
180 else if (i.eq. 75) then
182 else if (i.eq. 76) then
184 else if (i.eq. 77) then
186 else if (i.eq. 78) then
188 else if (i.eq. 79) then
190 else if (i.eq. 80) then
192 else if (i.eq. 81) then
194 else if (i.eq. 82) then
196 else if (i.eq. 83) then
198 else if (i.eq. 84) then
200 else if (i.eq. 85) then
202 else if (i.eq. 86) then
204 else if (i.eq. 87) then
206 else if (i.eq. 88) then
208 else if (i.eq. 89) then
210 else if (i.eq. 90) then
212 else if (i.eq. 91) then
214 else if (i.eq. 92) then
216 else if (i.eq. 93) then
218 else if (i.eq. 94) then
220 else if (i.eq. 95) then
222 else if (i.eq. 96) then
224 else if (i.eq. 97) then
226 else if (i.eq. 98) then
228 else if (i.eq. 99) then
230 else if (i.eq. 100) then
232 else if (i.eq. 101) then
234 else if (i.eq. 102) then
236 else if (i.eq. 103) then
238 else if (i.eq. 104) then
240 else if (i.eq. 105) then
242 else if (i.eq. 106) then
244 else if (i.eq. 107) then
246 else if (i.eq. 108) then
248 else if (i.eq. 109) then
250 else if (i.eq. 110) then
252 else if (i.eq. 111) then
254 else if (i.eq. 112) then
256 else if (i.eq. 113) then
258 else if (i.eq. 114) then
260 else if (i.eq. 115) then
262 else if (i.eq. 116) then
264 else if (i.eq. 117) then
266 else if (i.eq. 118) then
268 else if (i.eq. 119) then
270 else if (i.eq. 120) then
272 else if (i.eq. 121) then
274 else if (i.eq. 122) then
276 else if (i.eq. 123) then
278 else if (i.eq. 124) then
280 else if (i.eq. 125) then !< Miscompiles if present
283 c else if (i.eq. 126) then