xref: /llvm-project/flang/test/Preprocessing/pp040.F (revision 1c8f199f449916d30ec12ecc5bb0f157ab1d01a0) 
1! RUN: %flang -E %s 2>&1 | FileCheck %s
2! CHECK-NOT: FAIL HARD!
3* #define KWM c, then KWM works as comment line initiator
4#define KWM c
5KWM   print *, 'pp040.F FAIL HARD!'; stop
6      print *, 'pp040.F yes'
7      end
8