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/label04.f90

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

20 lines
403 B
Fortran
Raw Normal View History

[flang] Add label resolution design document, pass, and tests Original-commit: flang-compiler/f18@e0d0df900c4d823b7114a4d511105c2dbd9d2e77 Reviewed-on: https://github.com/flang-compiler/f18/pull/170 Tree-same-pre-rewrite: false
2018-08-21 07:47:18 +08:00
[flang] Port remaining test_any.sh tests to FileCheck Port the remaining tests which only require mechanical changes and delete test_any.sh. * Delete old RUN lines * Replace: EXEC: ${F18} ... | ${FileCheck} ... with RUN: %f18 .. | FileCheck ... * Prepend RUN line with not when it is expected to fail Also reinstate a de-activated EXEC line and port it in the same way. Differential Revision: https://reviews.llvm.org/D82168
2020-06-27 02:28:43 +08:00
! RUN: %f18 -funparse-with-symbols %s 2>&1 | FileCheck %s
[flang] Improved error messages: Update the tests to reflect new message Improved error messages to show both source and destination of mismatches. Use CharBlock::size. Original-commit: flang-compiler/f18@bf79d77d3c0a6982d7e54841d4856c4cf3f8182b Reviewed-on: https://github.com/flang-compiler/f18/pull/185 Tree-same-pre-rewrite: false
2018-09-14 07:11:41 +08:00
! CHECK: branch into loop body from outside
! CHECK: do 10 i = 1, m
[flang] Tweak the error messages to not use "here" like gcc does. Original-commit: flang-compiler/f18@cb5da3d4e42a0e62493e5db9a1c33813956f04bf Reviewed-on: https://github.com/flang-compiler/f18/pull/185 Tree-same-pre-rewrite: false
2018-10-16 03:33:56 +08:00
! CHECK: the loop branched into
[flang] Improved error messages: Update the tests to reflect new message Improved error messages to show both source and destination of mismatches. Use CharBlock::size. Original-commit: flang-compiler/f18@bf79d77d3c0a6982d7e54841d4856c4cf3f8182b Reviewed-on: https://github.com/flang-compiler/f18/pull/185 Tree-same-pre-rewrite: false
2018-09-14 07:11:41 +08:00
! CHECK: do 20 j = 1, n
[flang] Add label resolution design document, pass, and tests Original-commit: flang-compiler/f18@e0d0df900c4d823b7114a4d511105c2dbd9d2e77 Reviewed-on: https://github.com/flang-compiler/f18/pull/170 Tree-same-pre-rewrite: false
2018-08-21 07:47:18 +08:00
subroutine sub00(a,b,n,m)
real a(n,m)
real b(n,m)
if (n .ne. m) then
goto 50
end if
do 10 i = 1, m
do 20 j = 1, n
50 a(i,j) = b(i,j) + 2.0
20 continue
10 continue
end subroutine sub00