llvm-project/flang/test/Preprocessing/pp129.F90

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

6 lines
158 B
Fortran
Raw Normal View History

! #define KWM !, then KWM works as comment line initiator
#define KWM !
KWM print *, 'pp129.F90 FAIL HARD!'; stop
print *, 'pp129.F90 pass'
end