brintos / llvm-project-archived public Read only

Text · 177 B · ccaee3e Raw

9 lines · plain

1! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s2!CHECK: expected 'THEN'3!CHECK-NOT: expected 'PAUSE'4if (.TRUE.)5!CHECK: expected 'THEN'6else if (.FALSE.)7end if8end9