CODEWITHSUNDEEP
fortrangfortranintel-fortran
Exascale
Exascale

Reputation: 963

Allocatable array valued function. gfortran vs ifort

Why is there different behavior between ifort and gfortran here? Compiled with ifort it returns false and with gfortran true. I ran into this problem before in my own code and decided to use a subroutine instead, but a recent question made me question this behavior.

function allocateArray(size)
    integer, allocatable, dimension(:) :: allocateArray
    integer size

    allocate(allocateArray(size))

end function allocateArray

From the main program

integer, allocatable, dimension(:) :: a

a = allocateArray(10)
print *, allocated(a)

Upvotes: 5

Views: 1025

Answers (1)

francescalus
francescalus

Reputation: 32396

When compiling with ifort before version 17.0.1, the default behaviour is for the compiler not to use the Fortran rules for automatic allocation on intrinsic assignment.

You will need to use an option like -assume realloc-lhs.

Upvotes: 7

Related Questions