1! RUN: %python %S/test_errors.py %s %flang_fc1 2 3! Ensure that spurious errors do not arise from FinishSpecificationPart 4! checking on a nested specification part. 5real, save :: x 6interface 7 subroutine subr(x) 8 real, intent(in) :: x 9 ! SAVE attribute checking should not complain at the 10 ! end of this specification part about a dummy argument 11 ! having the SAVE attribute. 12 end subroutine 13end interface 14end 15