Allocatable array

[bingao]

Hi,

I just built Fort together with the latest LLVM and Clang. I tried to compile the following simple Fortran code a.f95:

program test
    implicit none
    real(kind=8), allocatable :: ptr
    integer i
    allocate(ptr(10))
    do i = 1, 10
        ptr(i) = i
        write(6,*) ptr(i)
    end do
    deallocate(ptr)
end program test

But I got the following errors:

a.f95:5:5: error: use of undeclared identifier 'allocate'
    allocate(ptr(10))
    ^
a.f95:7:16: error: expression is not assignable
        ptr(i) = i
               ^
a.f95:10:5: error: use of undeclared identifier 'deallocate'
    deallocate(ptr)
    ^

I wonder if Fort supports allocatable array and pointer now or not? If yes, how can I solve the errors? Thank you in advance.

[ppenzin]

You need deferred shape to declare an allocatable (Fort would allow you to specify rank exactly, but I don't think that is necessarily correct):

    real(kind=8), allocatable :: ptr(:)

With this Fort still has trouble, it would work only on exact rank. Another thing that is missing is allocate/deallocate statements.

I have filed #23 for the shape and #24 for the allocation statements.

Thank you for the submission, implementing those would be a step in the right direction.

[bingao]

Thank you @ppenzin and hope to be able to use allocatable array with Fort soon.

One more thing: once this issue is solved, will I be able to use, for instance,

real(kind=8), pointer :: ptr(:)

as well?

[ppenzin]

For clarity sake let's dedicate this issue to allocation/deallocation statements only and use #23 for the deferred shape.