xref: /llvm-project/flang/test/Semantics/if_arith03.f90 (revision 6c1ac141d3c98af9738bc77fcb55602cbff7751f)
1! RUN: %python %S/test_errors.py %s %flang_fc1
2
3!ERROR: Label '600' was not found
4if ( A ) 100, 200, 600
5100 CONTINUE
6200 CONTINUE
7300 CONTINUE
8
9!ERROR: Label '601' was not found
10if ( A ) 101, 601, 301
11101 CONTINUE
12201 CONTINUE
13301 CONTINUE
14
15!ERROR: Label '602' was not found
16if ( A ) 602, 202, 302
17102 CONTINUE
18202 CONTINUE
19302 CONTINUE
20
21END
22