Fortran on x86_64 : Problem allocating arrays in 64-bit adress space

Post Reply

Topic author
joukj
Master
Posts: 173
Joined: Thu Aug 27, 2020 5:50 am
Reputation: 0
Status: Offline

Fortran on x86_64 : Problem allocating arrays in 64-bit adress space

Post by joukj » Wed Feb 21, 2024 7:05 am

Hi

I have problems when allocating arrays, which are placed in 64-bit ads space, using F90 on x86_64 (see example below)

I remember that I got the same error on Itanium (AXP worked "out of the box") some years ago. HP fixed the problem. Can this also been fixed for x86_64?

I get :

$ f90/vers
VSI Fortran x86-64 V8.5-008 (GEM 50Y1P) on OpenVMS x86_64 V9.2-2
$ ty test.f90
program test
!DEC$ ATTRIBUTES ADDRESS64 :: ttt , i
real (kind = 8) , allocatable :: ttt( : )
integer i

allocate( ttt( 10000 ) )
ttt( 10000 ) = 8888.0
write(*,*) ttt( 10000 )
end
$ f90 test
$ link test
$ run test
%FOR-F-INVREALLOC, allocatable array is already allocated
%TRACE-F-TRACEBACK, symbolic stack dump follows
image module routine line rel PC abs PC
DEC$FORRTL 0 0000000080067518 FFFF83000A7D9518
TEST TEST TEST 6 000000000000007F 000000008000007F
0 FFFF8300085FC0A6 FFFF8300085FC0A6
DCL 0 00000000800677FB 000000007ADFF7FB
%TRACE-I-END, end of TRACE stack dump



regards
Jouk
Last edited by joukj on Wed Feb 21, 2024 7:29 am, edited 1 time in total.


sergey_vorfolomeev
VSI Expert
Master
Posts: 101
Joined: Thu Aug 22, 2019 12:17 am
Reputation: 0
Status: Offline

Re: Fortran on x86_64 : Problem allocating arrays in 64-bit adress space

Post by sergey_vorfolomeev » Fri Mar 01, 2024 5:34 am

Hi

Thanks, now it is fixed and the next release will be OK.


Topic author
joukj
Master
Posts: 173
Joined: Thu Aug 27, 2020 5:50 am
Reputation: 0
Status: Offline

Re: Fortran on x86_64 : Problem allocating arrays in 64-bit adress space

Post by joukj » Fri Mar 01, 2024 6:02 am

Looking foward to the next release... thanks
Last edited by joukj on Fri Mar 01, 2024 6:02 am, edited 1 time in total.

Post Reply