forked from OSchip/llvm-project
[flang] Port all remaining regression tests to lit
We have re-classified a subset of the regression tests as unit tests and now we are porting the remaining ones. Test discovery and running is now performed by lit rather than ctest. The tests continue to use their original scripts with minor modifications. Most of the changes were mechanical and so scripted. A few changes were made by hand. Details Manual: * modfile09-*.f90 tests depend on being run together as some tests have dependencies on modules created by other tests. This will need separating out when porting away from test_modfile.sh, but for now, added modfile09-*.f90 to the Inputs directory and added a single tests modfile09.f90 to hold the run line. * getdefinition03-a.f90 includes a non-test file getdefinition03-b.f90. Manually edited the former to find the latter in Inputs so as to add only one test. * Same pattern for getsymbols03-{a,b}.f90 Auto: * Remaining tests have a lit RUN line added to them based on the type of test they are. * Failing tests also have an XFAIL line added to them. * Generic tests have their pre-existing RUN lines replaced with the word "EXEC" to avoid conflict with the added lit RUN line. Original-commit: flang-compiler/f18@63ec0af9f4 Reviewed-on: https://github.com/flang-compiler/f18/pull/1027 Tree-same-pre-rewrite: false
This commit is contained in:
parent
ee5fa1f233
commit
f1a8eae3b6
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
|
|
||||||
! Test intrinsic operation folding
|
! Test intrinsic operation folding
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Check intrinsic function folding with host runtime library
|
! Check intrinsic function folding with host runtime library
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test operation folding edge case (both expected value and messages)
|
! Test operation folding edge case (both expected value and messages)
|
||||||
! These tests make assumptions regarding real(4) and integer(4) extrema.
|
! These tests make assumptions regarding real(4) and integer(4) extrema.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test intrinsic function folding edge case (both expected value and messages)
|
! Test intrinsic function folding edge case (both expected value and messages)
|
||||||
! These tests make assumptions regarding real(4) extrema.
|
! These tests make assumptions regarding real(4) extrema.
|
||||||
|
|
||||||
|
|
Binary file not shown.
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test transformational intrinsic function folding
|
! Test transformational intrinsic function folding
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test numeric model inquiry intrinsics
|
! Test numeric model inquiry intrinsics
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test folding of LBOUND and UBOUND
|
! Test folding of LBOUND and UBOUND
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_folding.sh %s %flang %t
|
||||||
! Test folding of IS_CONTIGUOUS on simply contiguous items (9.5.4)
|
! Test folding of IS_CONTIGUOUS on simply contiguous items (9.5.4)
|
||||||
! When IS_CONTIGUOUS() is constant, it's .TRUE.
|
! When IS_CONTIGUOUS() is constant, it's .TRUE.
|
||||||
|
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
! RUN: ${F18} -fparse-only %s
|
! EXEC: ${F18} -fparse-only %s
|
||||||
|
|
||||||
module mm2a
|
module mm2a
|
||||||
implicit none
|
implicit none
|
|
@ -1,4 +1,4 @@
|
||||||
! RUN: ${F18} -fparse-only %s
|
! EXEC: ${F18} -fparse-only %s
|
||||||
|
|
||||||
module mm2b
|
module mm2b
|
||||||
use mm2a
|
use mm2a
|
|
@ -7,6 +7,6 @@ PROGRAM helloworld
|
||||||
i = callget5()
|
i = callget5()
|
||||||
ENDPROGRAM
|
ENDPROGRAM
|
||||||
|
|
||||||
! RUN: ${F18} -fget-symbols-sources -fparse-only %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -fget-symbols-sources -fparse-only %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK:callget5: mm2b
|
! CHECK:callget5: mm2b
|
||||||
! CHECK:get5: mm2a
|
! CHECK:get5: mm2a
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
! Creating a symbol that allocate should accept
|
! Creating a symbol that allocate should accept
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
|
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
subroutine C933_a(b1, ca3, ca4, cp3, cp3mold, cp4, cp7, cp8, bsrc)
|
subroutine C933_a(b1, ca3, ca4, cp3, cp3mold, cp4, cp7, cp8, bsrc)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
subroutine C936(param_ca_4_assumed, param_ta_4_assumed, param_ca_4_deferred)
|
subroutine C936(param_ca_4_assumed, param_ta_4_assumed, param_ca_4_deferred)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
subroutine C945_a(srca, srcb, srcc, src_complex, src_logical, &
|
subroutine C945_a(srca, srcb, srcc, src_complex, src_logical, &
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
subroutine C946(param_ca_4_assumed, param_ta_4_assumed, param_ca_4_deferred)
|
subroutine C946(param_ca_4_assumed, param_ta_4_assumed, param_ca_4_deferred)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
!TODO: mixing expr and source-expr?
|
!TODO: mixing expr and source-expr?
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
! TODO: Function Pointer in allocate and derived types!
|
! TODO: Function Pointer in allocate and derived types!
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
subroutine C941_C942b_C950(xsrc, x1, a2, b2, cx1, ca2, cb1, cb2, c1)
|
subroutine C941_C942b_C950(xsrc, x1, a2, b2, cx1, ca2, cb1, cb2, c1)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for semantic errors in ALLOCATE statements
|
! Check for semantic errors in ALLOCATE statements
|
||||||
|
|
||||||
module not_iso_fortran_env
|
module not_iso_fortran_env
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check calls with alt returns
|
! Check calls with alt returns
|
||||||
|
|
||||||
CALL TEST (N, *100, *200 )
|
CALL TEST (N, *100, *200 )
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check subroutine with alt return
|
! Check subroutine with alt return
|
||||||
|
|
||||||
SUBROUTINE TEST (N, *, *)
|
SUBROUTINE TEST (N, *, *)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check for various alt return error conditions
|
! Check for various alt return error conditions
|
||||||
|
|
||||||
SUBROUTINE TEST (N, *, *)
|
SUBROUTINE TEST (N, *, *)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Functions cannot use alt return
|
! Functions cannot use alt return
|
||||||
|
|
||||||
REAL FUNCTION altreturn01(X)
|
REAL FUNCTION altreturn01(X)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test extension: RETURN from main program
|
! Test extension: RETURN from main program
|
||||||
|
|
||||||
return !ok
|
return !ok
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! 10.2.3.1(2) All masks and LHS of assignments in a WHERE must conform
|
! 10.2.3.1(2) All masks and LHS of assignments in a WHERE must conform
|
||||||
|
|
||||||
subroutine s1
|
subroutine s1
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Pointer assignment constraints 10.2.2.2
|
! Pointer assignment constraints 10.2.2.2
|
||||||
|
|
||||||
module m1
|
module m1
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Pointer assignment constraints 10.2.2.2 (see also assign02.f90)
|
! Pointer assignment constraints 10.2.2.2 (see also assign02.f90)
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! 9.4.5
|
! 9.4.5
|
||||||
subroutine s1
|
subroutine s1
|
||||||
type :: t(k, l)
|
type :: t(k, l)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Forward references to derived types (error cases)
|
! Forward references to derived types (error cases)
|
||||||
|
|
||||||
!ERROR: The derived type 'undef' was forward-referenced but not defined
|
!ERROR: The derived type 'undef' was forward-referenced but not defined
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Confirm enforcement of constraints and restrictions in 7.5.7.3
|
! Confirm enforcement of constraints and restrictions in 7.5.7.3
|
||||||
! and C779-C785.
|
! and C779-C785.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test BLOCK DATA subprogram (14.3)
|
! Test BLOCK DATA subprogram (14.3)
|
||||||
block data foo
|
block data foo
|
||||||
!ERROR: IMPORT is not allowed in a BLOCK DATA subprogram
|
!ERROR: IMPORT is not allowed in a BLOCK DATA subprogram
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! C1107 -- COMMON, EQUIVALENCE, INTENT, NAMELIST, OPTIONAL, VALUE or
|
! C1107 -- COMMON, EQUIVALENCE, INTENT, NAMELIST, OPTIONAL, VALUE or
|
||||||
! STATEMENT FUNCTIONS not allow in specification part
|
! STATEMENT FUNCTIONS not allow in specification part
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! C1108 -- Save statement in a BLOCK construct shall not conatin a
|
! C1108 -- Save statement in a BLOCK construct shall not conatin a
|
||||||
! saved-entity-list that does not specify a common-block-name
|
! saved-entity-list that does not specify a common-block-name
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Tests implemented for this standard:
|
! Tests implemented for this standard:
|
||||||
! Block Construct
|
! Block Construct
|
||||||
! C1109
|
! C1109
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Enforce 18.2.3.3
|
! Enforce 18.2.3.3
|
||||||
|
|
||||||
program test
|
program test
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Confirm enforcement of constraints and restrictions in 15.6.2.1
|
! Confirm enforcement of constraints and restrictions in 15.6.2.1
|
||||||
|
|
||||||
non_recursive function f01(n) result(res)
|
non_recursive function f01(n) result(res)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! 15.5.1 procedure reference constraints and restrictions
|
! 15.5.1 procedure reference constraints and restrictions
|
||||||
|
|
||||||
subroutine s01(elem, subr)
|
subroutine s01(elem, subr)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.4 constraints and restrictions for non-POINTER non-ALLOCATABLE
|
! Test 15.5.2.4 constraints and restrictions for non-POINTER non-ALLOCATABLE
|
||||||
! dummy arguments.
|
! dummy arguments.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 8.5.10 & 8.5.18 constraints on dummy argument declarations
|
! Test 8.5.10 & 8.5.18 constraints on dummy argument declarations
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.5 constraints and restrictions for POINTER & ALLOCATABLE
|
! Test 15.5.2.5 constraints and restrictions for POINTER & ALLOCATABLE
|
||||||
! arguments when both sides of the call have the same attributes.
|
! arguments when both sides of the call have the same attributes.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.6 constraints and restrictions for ALLOCATABLE
|
! Test 15.5.2.6 constraints and restrictions for ALLOCATABLE
|
||||||
! dummy arguments.
|
! dummy arguments.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.7 constraints and restrictions for POINTER dummy arguments.
|
! Test 15.5.2.7 constraints and restrictions for POINTER dummy arguments.
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.8 coarray dummy arguments
|
! Test 15.5.2.8 coarray dummy arguments
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.5.2.9(2,3,5) dummy procedure requirements
|
! Test 15.5.2.9(2,3,5) dummy procedure requirements
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.7 (C1583-C1590, C1592-C1599) constraints and restrictions
|
! Test 15.7 (C1583-C1590, C1592-C1599) constraints and restrictions
|
||||||
! for pure procedures.
|
! for pure procedures.
|
||||||
! (C1591 is tested in call11.f90; C1594 in call12.f90.)
|
! (C1591 is tested in call11.f90; C1594 in call12.f90.)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.7 C1591 & others: contexts requiring pure subprograms
|
! Test 15.7 C1591 & others: contexts requiring pure subprograms
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.7 C1594 - prohibited assignments in pure subprograms
|
! Test 15.7 C1594 - prohibited assignments in pure subprograms
|
||||||
|
|
||||||
module used
|
module used
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 15.4.2.2 constraints and restrictions for calls to implicit
|
! Test 15.4.2.2 constraints and restrictions for calls to implicit
|
||||||
! interfaces
|
! interfaces
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test 8.5.18 constraints on the VALUE attribute
|
! Test 8.5.18 constraints on the VALUE attribute
|
||||||
|
|
||||||
module m
|
module m
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! C711 An assumed-type actual argument that corresponds to an assumed-rank
|
! C711 An assumed-type actual argument that corresponds to an assumed-rank
|
||||||
! dummy argument shall be assumed-shape or assumed-rank.
|
! dummy argument shall be assumed-shape or assumed-rank.
|
||||||
subroutine s(arg1, arg2, arg3)
|
subroutine s(arg1, arg2, arg3)
|
||||||
|
|
|
@ -1,6 +1,7 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! negative test -- invalid labels, out of range
|
! negative test -- invalid labels, out of range
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
SUBROUTINE sub00(a,b,n,m)
|
SUBROUTINE sub00(a,b,n,m)
|
||||||
|
|
|
@ -1,6 +1,7 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! negative test -- invalid labels, out of range
|
! negative test -- invalid labels, out of range
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
SUBROUTINE sub00(a,b,n,m)
|
SUBROUTINE sub00(a,b,n,m)
|
||||||
|
|
|
@ -1,6 +1,7 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! negative test -- invalid labels, out of range
|
! negative test -- invalid labels, out of range
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK: 10 continue
|
! CHECK: 10 continue
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,4 +1,5 @@
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK-NOT: do [1-9]
|
! CHECK-NOT: do [1-9]
|
||||||
|
|
||||||
! Figure out how to also execute this test.
|
! Figure out how to also execute this test.
|
||||||
|
|
|
@ -1,5 +1,6 @@
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! XXXRUN: ${F18} -fopenmp -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
|
! XXXEXEC: ${F18} -fopenmp -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK-NOT: do *[1-9]
|
! CHECK-NOT: do *[1-9]
|
||||||
|
|
||||||
program P
|
program P
|
||||||
|
|
|
@ -1,4 +1,5 @@
|
||||||
! RUN: ${F18} -fopenmp -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
|
! EXEC: ${F18} -fopenmp -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK-NOT: do *[1-9]
|
! CHECK-NOT: do *[1-9]
|
||||||
! CHECK: omp simd
|
! CHECK: omp simd
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,8 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1131
|
! See R1131 and C1131
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK: A DO loop should terminate with an END DO or CONTINUE
|
! CHECK: A DO loop should terminate with an END DO or CONTINUE
|
||||||
|
|
||||||
program endDo
|
program endDo
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
|
@ -5,7 +6,7 @@
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
|
@ -5,7 +6,7 @@
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
|
@ -5,7 +6,7 @@
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
|
@ -5,7 +6,7 @@
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard -I../../tools/f18/include %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard -I../../tools/f18/include %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,10 +1,11 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Error test -- DO loop uses obsolete loop termination statement
|
! Error test -- DO loop uses obsolete loop termination statement
|
||||||
! See R1131 and C1133
|
! See R1131 and C1133
|
||||||
|
|
||||||
! By default, this is not an error and label do are rewritten to non-label do.
|
! By default, this is not an error and label do are rewritten to non-label do.
|
||||||
! A warning is generated with -Mstandard
|
! A warning is generated with -Mstandard
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,8 @@
|
||||||
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
! Check that if there is a label or a name on an label-do-stmt,
|
! Check that if there is a label or a name on an label-do-stmt,
|
||||||
! then it is not lost when rewriting it to an non-label-do-stmt.
|
! then it is not lost when rewriting it to an non-label-do-stmt.
|
||||||
|
|
||||||
! RUN: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
! EXEC: ${F18} -funparse-with-symbols -Mstandard %s 2>&1 | ${FileCheck} %s
|
||||||
|
|
||||||
! CHECK: end do
|
! CHECK: end do
|
||||||
! CHECK: 2 do
|
! CHECK: 2 do
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Test selector and team-value in CHANGE TEAM statement
|
! Test selector and team-value in CHANGE TEAM statement
|
||||||
|
|
||||||
! OK
|
! OK
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! C718 Each named constant in a complex literal constant shall be of type
|
! C718 Each named constant in a complex literal constant shall be of type
|
||||||
! integer or real.
|
! integer or real.
|
||||||
subroutine s()
|
subroutine s()
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check that a basic computed goto compiles
|
! Check that a basic computed goto compiles
|
||||||
|
|
||||||
INTEGER, DIMENSION (2) :: B
|
INTEGER, DIMENSION (2) :: B
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check that computed goto express must be a scalar integer expression
|
! Check that computed goto express must be a scalar integer expression
|
||||||
! TODO: PGI, for example, accepts a float & converts the value to int.
|
! TODO: PGI, for example, accepts a float & converts the value to int.
|
||||||
|
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
!C1117
|
!C1117
|
||||||
|
|
||||||
subroutine test1(a, i)
|
subroutine test1(a, i)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
!C1118
|
!C1118
|
||||||
|
|
||||||
subroutine test1
|
subroutine test1
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
!C1119
|
!C1119
|
||||||
|
|
||||||
subroutine test1(a, i)
|
subroutine test1(a, i)
|
||||||
|
|
|
@ -1,4 +1,5 @@
|
||||||
! RUN: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
! RUN: %S/test_any.sh %s %flang %t
|
||||||
|
! EXEC: ${F18} -funparse-with-symbols %s 2>&1 | ${FileCheck} %s
|
||||||
! CHECK-NOT: Control flow escapes from CRITICAL
|
! CHECK-NOT: Control flow escapes from CRITICAL
|
||||||
|
|
||||||
subroutine test1(a, i)
|
subroutine test1(a, i)
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
!Test for checking data constraints, C882-C887
|
!Test for checking data constraints, C882-C887
|
||||||
module m1
|
module m1
|
||||||
type person
|
type person
|
||||||
|
|
|
@ -1,3 +1,4 @@
|
||||||
|
! RUN: %S/test_errors.sh %s %flang %t
|
||||||
! Check that expressions are analyzed in data statements
|
! Check that expressions are analyzed in data statements
|
||||||
|
|
||||||
subroutine s1
|
subroutine s1
|
||||||
|
|
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue