------- Comment #3 from burnus at gcc dot gnu dot org  2008-01-16 22:11 -------
Reduced test case; works if one removes the INTENT(OUT).

    module grid_io
    type grid_index_region
      integer, allocatable::lons(:)
    end type grid_index_region
    contains
    subroutine read_grid_header()
      integer :: npiece
      type(grid_index_region),allocatable :: iregion(:)
      call read_iregion(npiece,iregion)
    end subroutine read_grid_header
    subroutine read_iregion(nproc,iregion)
      integer,intent(in)::nproc
      type(grid_index_region),intent(out)::iregion(nproc)
    end subroutine
    end module grid_io


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
OtherBugsDependingO|                            |32834
              nThis|                            |
           Keywords|                            |ice-on-valid-code


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34820

Reply via email to