Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gfortran.dg/enum_1.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 |
---|---|
5 implicit none | 5 implicit none |
6 enum, bind (c) | 6 enum, bind (c) |
7 enumerator :: red, black | 7 enumerator :: red, black |
8 enumerator blue | 8 enumerator blue |
9 end enum | 9 end enum |
10 if (red /= 0) call abort | 10 if (red /= 0) STOP 1 |
11 end program main | 11 end program main |