! RUN: %flang -E %s 2>&1 | FileCheck %s | |
#define FOO BAR | |
#define FO BA | |
#define OO AR | |
! CHECK: print *, BAR, 1 | |
print *, & | |
&FOO& | |
&, 1 | |
! CHECK: print *, FAR, 2 | |
print *, & | |
&F& | |
&OO& | |
&, 2 | |
! CHECK: print *, BAO, 3 | |
print *, & | |
&FO& | |
&O& | |
&, 3 | |
! CHECK: print *, BAR, 4 | |
print *, & | |
&F& | |
&O& | |
&O& | |
&, 4 | |
end |