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