test/Semantics/procinterface03.f90 - llvm-project/flang - Git at Google

 ! RUN: %python %S/test_errors.py %s %flang_fc1
 procedure(sin), pointer :: pp
 !ERROR: 'pp' has an explicit interface and may not also have a type
 real :: pp
 end
	! RUN: %python %S/test_errors.py %s %flang_fc1
	procedure(sin), pointer :: pp
	!ERROR: 'pp' has an explicit interface and may not also have a type
	real :: pp
	end