modification of g77 for default 64-bit integers on x86-64
Jiri Pittner
jiri.pittner@jh-inst.cas.cz
Wed Mar 31 22:19:00 GMT 2004
> What does your version of g77 generate for this program:
>
> PRINT*, 328 293 384 376
> END
>
>and for this one:
>
> DIMENSION A(388 387 988 479)
> END
>
>Does this work:
>
> CALL AAP(387 387 786 997)
> END
> SUBROUTINE AAP(N)
> PRINT*,N
> END
You pointed out another bug - the integer constants are still treated
as 4-byte ones. It reports integer too large error in all the above cases.
This however works (the constant argument to the function seems to be passed properly)
i=328 293
i=i*1000000+384376
CALL AAP(i)
call aap(10)
END
SUBROUTINE AAP(N)
PRINT*,N
END
|orion:/home/jiri> a.out
328293384376
10
More information about the Fortran
mailing list