9c98ed9cd4
The regex syntax used by test_any.sh's FileCheck is sometimes incompatible with real FileCheck. Hand port these tests to use FileCheck and it's regex format. Also remove FIXME from label01 that no longer applies. Also add second run-line that enables all tests. Add some new FIXMEs for issues in original tests Differential Revision: https://reviews.llvm.org/D82164
12 lines
334 B
Fortran
12 lines
334 B
Fortran
! C1122 The index-name shall be a named scalar variable of type integer.
|
|
! RUN: not %f18 -funparse-with-symbols %s 2>&1 | FileCheck %s
|
|
! CHECK: Must have INTEGER type, but is REAL(4)
|
|
|
|
subroutine do_concurrent_test1(n)
|
|
implicit none
|
|
integer :: n
|
|
real :: j
|
|
do 20 concurrent (j = 1:n)
|
|
20 enddo
|
|
end subroutine do_concurrent_test1
|