flang/test/Preprocessing/dash-E.F90

   1 ! RUN: %flang -E %s 2>&1 | FileCheck --strict-whitespace %s
   2 !CHECK:       program Main
   3 program Main
   4 #define ADD(x,y) (x)+(y)
   5 !CHECK:       integer :: j = (1)+( 2)
   6   integer :: j = ADD(1,&
   7                      2)
   8 !CHECK:1     format('This is a very long output literal edit descriptor for a F&
   9 !CHECK:     &ORMAT statement, and it will require statement continuation.')
  10 1 format('This is a very long output literal edit descriptor for a FORMAT statement, and it will require statement continuation.')
  11
  12
  13
  14
  15
  16
  17
  18
  19
  20
  21
  22
  23 !CHECK: #line 25
  24 !CHECK:       end PROGRAM Main
  25 end PROGRAM Main