------- Comment #2 from dir at lanl dot gov 2006-01-04 19:51 -------
It also fails on 4.1-
[dranta:~/tests/gfortran-D] dir% gfortran -o sage03 sage03.f90
[dranta:~/tests/gfortran-D] dir% sage03
1 FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFF
2 FFFFFFFFFFFFFFFD FFFFFFFFFFFFFFFD
3 FFFFFFFFFFFFFFF9 FFFFFFFFFFFFFFF9
4 FFFFFFFFFFFFFFF1 FFFFFFFFFFFFFFF1
5 FFFFFFFFFFFFFFE1 FFFFFFFFFFFFFFE1
6 FFFFFFFFFFFFFFC1 FFFFFFFFFFFFFFC1
7 FFFFFFFFFFFFFF81 FFFFFFFFFFFFFF81
8 FFFFFFFFFFFFFF01 FFFFFFFFFFFFFF01
9 FFFFFFFFFFFFFE01 FFFFFFFFFFFFFE01
10 FFFFFFFFFFFFFC01 FFFFFFFFFFFFFC01
11 FFFFFFFFFFFFF801 FFFFFFFFFFFFF801
12 FFFFFFFFFFFFF001 FFFFFFFFFFFFF001
13 FFFFFFFFFFFFE001 FFFFFFFFFFFFE001
14 FFFFFFFFFFFFC001 FFFFFFFFFFFFC001
15 FFFFFFFFFFFF8001 FFFFFFFFFFFF8001
16 FFFFFFFFFFFF0001 FFFFFFFFFFFF0001
17 FFFFFFFFFFFE0001 FFFFFFFFFFFE0001
18 FFFFFFFFFFFC0001 FFFFFFFFFFFC0001
19 FFFFFFFFFFF80001 FFFFFFFFFFF80001
20 FFFFFFFFFFF00001 FFFFFFFFFFF00001
21 FFFFFFFFFFE00001 FFFFFFFFFFE00001
22 FFFFFFFFFFC00001 FFFFFFFFFFC00001
23 FFFFFFFFFF800001 FFFFFFFFFF800001
24 FFFFFFFFFF000001 FFFFFFFFFF000001
25 FFFFFFFFFE000001 FFFFFFFFFE000001
26 FFFFFFFFFC000001 FFFFFFFFFC000001
27 FFFFFFFFF8000001 FFFFFFFFF8000001
28 FFFFFFFFF0000001 FFFFFFFFF0000001
29 FFFFFFFFE0000001 FFFFFFFFE0000001
30 FFFFFFFFC0000001 FFFFFFFFC0000001
31 FFFFFFFF80000001 FFFFFFFF80000001
32 1 FFFFFFFF00000001
Abort
[dranta:~/tests/gfortran-D] dir% gfortran --v
Using built-in specs.
Target: powerpc-apple-darwin8.3.0
Configured with: ../gcc/configure --prefix=/Users/dir/gfortran
--enable-languages=c,f95
Thread model: posix
gcc version 4.1.0 20060104 (prerelease)
[dranta:~/tests/gfortran-D] dir% cat sage03.f90
implicit none
integer*8 cray64_int,ieee64_int,ia,itwo
integer ibits,n
itwo=2
ibits=bit_size(cray64_int)
do n=1,ibits
ieee64_int=-1
cray64_int=1
call mvbits(cray64_int, 0,n,ieee64_int, 0)
ia=-1
ia=ia-itwo**n+2
write(6,'(i5,2z20)')n,ieee64_int,ia
if(ia.ne.ieee64_int)call abort
enddo
stop
end
--
dir at lanl dot gov changed:
What |Removed |Added
----------------------------------------------------------------------------
Known to fail| |4.1.0 4.2.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25577
