[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [ccp4bb]: REFMAC5 under CCP4 4.1
*** For details on how to be removed from this list visit the ***
*** CCP4 home page http://www.dl.ac.uk/CCP/CCP4/main.html ***
Garib,
I can't reproduce the problem you describe below. Tried on 3 different
computers here:
RH 6.1
======
/home/kay/k/src/compiler:f77 -O0 test.f
/home/kay/k/src/compiler:a.out
6. 6
/home/kay/k/src/compiler:f77 -O2 test.f
/home/kay/k/src/compiler:a.out
6. 6
/home/kay/k/src/compiler:f77 --version
GNU Fortran 0.5.25 19990816
(release)
/home/kay/k/src/compiler:rpm -qa|grep gcc
gcc-g77-2.95.1-3
gcc-2.95.1-3
gcc-c++-2.95.1-3
RH 6.2
======
[kay@turn6 ~/test]$ g77 -O0 test.f
[kay@turn6 ~/test]$ ./a.out
6. 6
[kay@turn6 ~/test]$ g77 -O2 test.f
6. 6
[kay@turn6 ~/test]$ rpm -qa | egrep 'g77|egcs'
egcs-1.1.2-30
egcs-c++-1.1.2-30
compat-egcs-g77-5.2-1.0.3a.1
compat-egcs-objc-5.2-1.0.3a.1
compat-egcs-5.2-1.0.3a.1
compat-egcs-c++-5.2-1.0.3a.1
egcs-g77-1.1.2-30
egcs-objc-1.1.2-30
[kay@turn6 ~/test]$ g77 --version
GNU Fortran 0.5.24-19981002
RH7.0
=====
[kay@turn5 compiler]$ f77 -O0 test.f
[kay@turn5 compiler]$ ./a.out
6. 6
[kay@turn5 compiler]$ f77 -O2 test.f
[kay@turn5 compiler]$ ./a.out
6. 6
[kay@turn5 compiler]$ g77 --version
GNU Fortran 0.5.26 20000731 (Red Hat Linux 7.0)
[kay@turn5 compiler]$ rpm -qa | grep gcc
kgcc-1.1.2-40
gcc-c++-2.96-69
gcc-2.96-69
gcc-g77-2.96-69
gcc-objc-2.96-69
Kay
Garib Murshudov wrote:
>
> *** For details on how to be removed from this list visit the ***
> *** CCP4 home page http://www.dl.ac.uk/CCP/CCP4/main.html ***
>
> >
>
> Here is very small program wich behaves differently with -O2 (result 6 1) and
> -O0 (result 6 6). This type of code may be seen
> everywhere (red hat version 7.0, gcc 2.96 g77 0.5.24)
>
> Garib
>
> REAL AMAT(20),TEST
> INTEGER N
> TEST = 1
> TEST = TEST*2
> TEST = TEST*3
> N = 20
> DO I=1,N
> AMAT(I) = I
> ENDDO
>
> DO I=1,N
> IF(TEST.EQ.AMAT(I)) GOTO 10
> ENDDO
> TEST = TEST*4
>
> 10 WRITE(*,*)TEST,I
> STOP
> END
>
> --
> ------------------------------------------------------------------
> Garib N. Murshudov, Chemistry Department, University of York, U.K.
> Tel: Home +44 (1904) 42 62 87, work: +44 (1904) 43 25 65
> ------------------------------------------------------------------
--
Kay Diederichs http://strucbio.biologie.uni-konstanz.de/~kay
email: Kay.Diederichs@uni-konstanz.de Tel +49 7531 88 4049 Fax 3183
Fakultaet fuer Biologie, Universitaet Konstanz
Box M656, D-78457 Konstanz, Germany