fortran/6138: Incorrect access of integer*1 variables on PA

[Toon Moene]

dave@hiauly1.hia.nrc.ca wrote:

>       j = -9
>       ja = 9
>       k = j
>       ka = ja
>       call c_i2(ABS(j),ja,'ABS(integer*2)')
>       call c_i1(ABS(k),ka,'ABS(integer*1)')

I've worked on this today, because this test suite entry fails for
powerpc-linux too.

Unfortunately, after half a day of fiddling, I'm not sure if the reason
this fails on HPPA is the same as the reason it fails on POWERPC.

On the latter, even the following is incorrect:

      INTEGER*1 I
      I = -9
      PRINT*,I
      END

which prints 247 ;-)

So I thought, this must be a signed/unsigned "char" problem, no ?

Well, AFAICS, the PA port is default-signed-char platform, so this
analysis doesn't apply.

Welllllll, perhaps this means that this afternoon multiplied one problem
into two :-(

-- 
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)