Mercurial > hg > CbC > CbC_gcc
comparison gcc/testsuite/gfortran.dg/derived_name_1.f90 @ 111:04ced10e8804
gcc 7
| author | kono |
|---|---|
| date | Fri, 27 Oct 2017 22:46:09 +0900 |
| parents | |
| children | 1830386684a0 |
comparison
equal
deleted
inserted
replaced
| 68:561a7518be6b | 111:04ced10e8804 |
|---|---|
| 1 ! { dg-do compile } | |
| 2 ! PR 20897 | |
| 3 ! Make sure intrinsic type names do not appear as names of derived types | |
| 4 type integer ! { dg-error "cannot be the same as an intrinsic type" } | |
| 5 type real ! { dg-error "cannot be the same as an intrinsic type" } | |
| 6 type complex ! { dg-error "cannot be the same as an intrinsic type" } | |
| 7 type character ! { dg-error "cannot be the same as an intrinsic type" } | |
| 8 type logical ! { dg-error "cannot be the same as an intrinsic type" } | |
| 9 type complex ! { dg-error "cannot be the same as an intrinsic type" } | |
| 10 type double precision ! { dg-error "Unclassifiable statement" } | |
| 11 type doubleprecision ! { dg-error "cannot be the same as an intrinsic type" } | |
| 12 type double complex ! { dg-error "Unclassifiable statement" } | |
| 13 type doublecomplex ! { dg-error "cannot be the same as an intrinsic type" } | |
| 14 | |
| 15 type x | |
| 16 integer y | |
| 17 end type x | |
| 18 end | |
| 19 |