1! RUN: %flang -E %s 2>&1 | FileCheck --strict-whitespace %s 2!CHECK: program Main 3program 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.') 101 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 25end PROGRAM Main 26