pp040.F\Preprocessing\test\flang - riscv-gnu-toolchain/llvm.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/llvm.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/flang/test/Preprocessing/pp040.F

blob: a3c2a6bd6b0a4bc7370e3f1e00efe6e85f30c304 (plain)

! RUN: %flang -E %s 2>&1 | FileCheck %s
! CHECK-NOT: FAIL HARD!
* #define KWM c, then KWM works as comment line initiator
#define KWM c
KWM   print *, 'pp040.F FAIL HARD!'; stop
      print *, 'pp040.F yes'
      end