1! { dg-do compile } 2! Tests the fix for PR29364, in which the absence of the derived type 3! 'nonexist' was not diagnosed. 4! 5! Contributed by Tobias Burnus <tobias.burnus@physik.fu-berlin.de> 6! 7module test 8 implicit none 9 type epot_t 10 integer :: c 11 type(nonexist),pointer :: l ! { dg-error "has not been declared" } 12 end type epot_t 13end module test 14