Google Git
Sign in
llvm / llvm-project / flang / 3ad692bfd6a916e36e29377f34e47204005c2763 / . / test / Semantics / if_arith01.f90
blob: a6714f29219ed241619febd057a9ab50828bf3f7 [file] [log] [blame]
! RUN: %python %S/test_errors.py %s %flang_fc1
! Check that a basic arithmetic if compiles.
if ( A ) 100, 200, 300
100 CONTINUE
200 CONTINUE
300 CONTINUE
END