947.f fails on big endian systems - but for the wrong reason.

Billinghurst, David (CRTS) David.Billinghurst@riotinto.com
Mon Feb 11 18:36:00 GMT 2002


The original test fails on irix.  With this test I get
-mabi=n32
 -5.  0.  0.  0. -1.  0.  1.  0.  0.  0.  5.
-mabi=64
 -5.  0.  0.  0. -1.  0.  1.  0.  0.  0.  5.

-----Original Message-----
From: Toon Moene [mailto:toon@moene.indiv.nluug.nl]
Sent: Tuesday, 12 February 2002 11:37 
To: gcc-bugs@gcc.gnu.org
Subject: 947.f fails on big endian systems - but for the wrong reason.


L.S.,

On powerpc-unknown-linux-gnu, I created the following variant of 947.f:

$ cat 947-1.f
      DIMENSION A(-5:5)
      INTEGER*1 IM5, IZ, IP5
      INTEGER*2 IM1, IP1
      PARAMETER (IM5=-5, IM1=-1, IZ=0, IP1=1, IP5=5)
      DATA A(IM5) /-5./, A(IM1) /-1./
      DATA A(IZ)  /0./
      DATA A(IP5) /+5./, A(IP1) /+1./
      PRINT*,A
      END
$ /usr/snp/bin/g77 947-1.f
$ ./a.out
-5. 0. 0. 0. -1. 0. 1. 0. 0. 0. 5.

Looks OK to me.  Further refinement of this routine showed that the some
of the conditions in the original 947.f turned out to be incorrect.

Could some of the other big-endian system testers try this ?

Thanks in advance,

-- 
Toon Moene - mailto:toon@moene.indiv.nluug.nl - phoneto: +31 346 214290
Saturnushof 14, 3738 XG  Maartensdijk, The Netherlands
Maintainer, GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html
Join GNU Fortran 95: http://g95.sourceforge.net/ (under construction)



More information about the Gcc-bugs mailing list