I get a SIGSEGV when running the following code
type t real, allocatable :: a(:) end type t type(t) :: data[*] allocate(data%a(0)) print*, size(data%a) end program
If, instead of the last line I put
it runs successfully by printing 0 for each image. In principle I could work out the problem by using 'allocated' statements, but
The argument to the ALLOCATED intrinsic cannot be a coindexed object.
On the other hand, using 'allocated(data%a)' correctly prints T for each image, but I specifically need to use the square brackets with either 'size' or 'allocated' in my code.