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