45 lines · plain
1!RUN: %flang_fc1 -E %s | FileCheck --check-prefix=PREPRO %s2!RUN: %flang_fc1 -fdebug-unparse %s | FileCheck --check-prefix=NORMAL %s3!RUN: %flang_fc1 -fopenmp -fdebug-unparse %s | FileCheck --check-prefix=OMP %s4 5c$ !6 7C$ 8 continue9 10 k=0 w11 k=012c$ 0 x13c$ 1 y14c$ 2 k= z15c$ ! A16c$ !1 B17 print *,k18*$1 continue19 end20 21!PREPRO: continue22!PREPRO: k=023!PREPRO: k=024!PREPRO:!$ 25!PREPRO:!$ &26!PREPRO:!$ &k=27!PREPRO:!$ &28!PREPRO:!$ &129!PREPRO: print *,k30!PREPRO:!$ 1 continue31!PREPRO: end32 33!NORMAL: k=0_434!NORMAL: k=0_435!NORMAL: PRINT *, k36!NORMAL:END PROGRAM37 38!OMP: CONTINUE39!OMP: k=0_440!OMP: k=0_441!OMP: k=1_442!OMP: PRINT *, k43!OMP: 1 CONTINUE44!OMP:END PROGRAM45