diff options
Diffstat (limited to 'flang/test/Semantics/resolve40.f90')
| -rw-r--r-- | flang/test/Semantics/resolve40.f90 | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/flang/test/Semantics/resolve40.f90 b/flang/test/Semantics/resolve40.f90 index a91507a..81bb5f9 100644 --- a/flang/test/Semantics/resolve40.f90 +++ b/flang/test/Semantics/resolve40.f90 @@ -96,3 +96,10 @@ subroutine s12(x) !BECAUSE: 'x' is an INTENT(IN) dummy argument read(*,nml=nl) end + +subroutine s13() + implicit none + !ERROR: No explicit type declared for 'i' + !ERROR: No explicit type declared for 'i' + print *, (i, i = 1, 2) +end |