H A D | allocate_error_4.f90 | 10 type (comm_mask), allocatable, save :: encode(:,:) variable in program:main 12 allocate( encode(1:1,1:max_nb)) 13 allocate( encode(1,1)%mask(1),encode(1,2)%mask(1)) 14 deallocate( encode(1,1)%mask,encode(1,2)%mask) 15 allocate( encode(1,1)%mask(1),encode(1,1)%mask(1)) ! { dg-error "also appears at" }
|