1*6c1ac141SIvan Zhechev! RUN: %python %S/test_errors.py %s %flang_fc1 258c3f20bSMichael Kruse 347b97d4bSpeter klausler! Ensure that spurious errors do not arise from FinishSpecificationPart 447b97d4bSpeter klausler! checking on a nested specification part. 547b97d4bSpeter klauslerreal, save :: x 647b97d4bSpeter klauslerinterface 747b97d4bSpeter klausler subroutine subr(x) 847b97d4bSpeter klausler real, intent(in) :: x 947b97d4bSpeter klausler ! SAVE attribute checking should not complain at the 1047b97d4bSpeter klausler ! end of this specification part about a dummy argument 1147b97d4bSpeter klausler ! having the SAVE attribute. 1247b97d4bSpeter klausler end subroutine 1347b97d4bSpeter klauslerend interface 1447b97d4bSpeter klauslerend 15