Print

Print


On 10/27/06, Catherine Moroney <[log in to unmask]> wrote:
   type my_type
      integer                        :: ii
      integer, dimension(:), pointer :: y
      integer, dimension(10)         :: z
   end type my_type

subroutine sub1(a)
   integer, dimension(:), intent(out) :: a
end subroutine sub1

   type ( my_type ) , dimension(:), allocatable :: x

   call sub1(x(i-1)%y)   !  <--- This is NOT allowed.

I don't see anything wrong with this, as long as  x(i-1)%y is allocated. Especially since

j = i - 1
  call sub1(x(j)%y)   !  <--- This is allowed.

is OK.

It seems to be a compiler bug.

Aleks