maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity
llvm-project/flang/test/Semantics/altreturn03.f90

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

23 lines
719 B
Fortran
Raw Normal View History

[flang] Update the regression tests to use the new driver when enabled This patch updates most of the remaining regression tests (~400) to use `flang-new` rather then `f18` when `FLANG_BUILD_NEW_DRIVER` is set. This allows us to share more Flang regression tests between `f18` and `flang-new`. A handful of tests have not been ported yet - these are currently either failing or not supported by the new driver. Summary of changes: * RUN lines in tests are updated to use `%flang_fc1` instead of `%f18` * option spellings in tests are updated to forms accepted by both `f18` and `flang-new` * variables in Bash scripts are renamed (e.g. F18 --> FLANG_FC1) The updated tests will now be run with the new driver, `flang-new`, whenever it is enabled (i.e when `FLANG_BUILD_NEW_DRIVER` is set). Although this patch touches many files, vast majority of the changes are automatic: ``` grep -IEZlr "%f18" flang/test/ | xargs -0 -l sed -i 's/%f18/%flang_fc1/g ``` Differential Revision: https://reviews.llvm.org/D100309
2021-04-12 20:27:49 +08:00
! RUN: %S/test_errors.sh %s %t %flang_fc1
[flang] Implement semantic checks for return and alt-return. Original-commit: flang-compiler/f18@123c23783b55656f7cf221a4daa4d6454a30c0f5 Tree-same-pre-rewrite: false
2019-04-14 11:58:25 +08:00
! Check for various alt return error conditions
SUBROUTINE TEST (N, *, *)
REAL :: R
COMPLEX :: Z
INTEGER, DIMENSION(2) :: B
IF ( N .EQ. 0 ) RETURN
IF ( N .EQ. 1 ) RETURN 1
IF ( N .EQ. 2 ) RETURN 2
IF ( N .EQ. 3 ) RETURN 3
[flang] Re-enable semantics/altreturn{02,03} tests These tests were disabled due to https://github.com/flang-compiler/f18/issues/407. Previously these tests caused F18 to crash as the feature was not fully implemented. The altreturn feature is now implemented, so these tests can be re-enabled. altreturn03 tested some negative cases which F18 correctly diagnoses. Modified that test to expect these new error messages. Also make the later cases in the test reachable. These tests can now be ported by the script to lit-style tests. Change-Id: Ib336c10d55068d9a26fc2deb43ad052e74e73456 Original-commit: flang-compiler/f18@4de19d7ba2df892ce4361461841c3997de439532 Reviewed-on: https://github.com/flang-compiler/f18/pull/1027 Tree-same-pre-rewrite: false
2020-02-21 20:28:58 +08:00
IF ( N .EQ. 4 ) RETURN N
IF ( N .EQ. 5 ) RETURN N * N
IF ( N .EQ. 6 ) RETURN B(N)
!ERROR: Must be a scalar value, but is a rank-1 array
IF ( N .EQ. 7 ) RETURN B
!ERROR: Must have INTEGER type, but is REAL(4)
IF ( N .EQ. 8 ) RETURN R
!ERROR: Must have INTEGER type, but is COMPLEX(4)
IF ( N .EQ. 9 ) RETURN Z
[flang] Implement semantic checks for return and alt-return. Original-commit: flang-compiler/f18@123c23783b55656f7cf221a4daa4d6454a30c0f5 Tree-same-pre-rewrite: false
2019-04-14 11:58:25 +08:00
RETURN 2
END