comparison gcc/testsuite/gfortran.dg/same_name_2.f90 @ 132:d34655255c78

update gcc-8.2
author mir3636
date Thu, 25 Oct 2018 10:21:07 +0900
parents 84e7813d76e9
children
comparison
equal deleted inserted replaced
130:e108057fa461 132:d34655255c78
8 contains 8 contains
9 subroutine aa ! { dg-error "Procedure" } 9 subroutine aa ! { dg-error "Procedure" }
10 write(*,*) 'AA' 10 write(*,*) 'AA'
11 end subroutine aa 11 end subroutine aa
12 subroutine aa ! { dg-error "is already defined" } 12 subroutine aa ! { dg-error "is already defined" }
13 write(*,*) 'BB' 13 write(*,*) 'BB' ! { dg-error "Unexpected WRITE statement in CONTAINS section" }
14 end subroutine aa 14 end subroutine aa ! { dg-error "Expecting END MODULE statement" }
15 end module 15 end module