Mercurial > hg > CbC > CbC_gcc
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 |