1! { dg-do compile } 2! 3! PR fortran/49624 4! 5 integer, target :: A(100) 6 integer,pointer :: P(:,:) 7 p(10,1:) => A ! { dg-error "Lower bound has to be present" } 8 end 9