xref: /llvm-project/flang/test/Preprocessing/disable-expansion.F90 (revision f2bf44b6ec2aa2ce014446cf3981275cb81f0de3)
1! RUN: %flang -E %s | FileCheck %s
2#define KWM a
3#define FLM(x) b FLM2(x) KWM c
4#define FLM2(x) d FLM(x) e
5! CHECK: a
6KWM
7! CHECK: b d FLM(y) e a c
8FLM(y)
9! CHECK: b d FLM(a) e a c
10FLM(KWM)
11! CHECK: b d FLM(b d FLM(y) e a c) e a c
12FLM(FLM(y))
13! CHECK: b d FLM(b d FLM(a) e a c) e a c
14FLM(FLM(KWM))
15