Mercurial > hg > CbC > CbC_llvm

annotate flang/test/Driver/cpp-nocpp-command-line-macro.f90 @ 207:2e18cbf3894f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
LLVM12
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 08 Jun 2021 06:07:14 +0900
parents
children c4bab56944e8
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
207
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 !-----------
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 ! RUN lines
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 !-----------
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 ! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 ! RUN: %flang_fc1 -E -cpp -DX=A %s 2>&1 | FileCheck %s --check-prefix=DEFINED
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 ! RUN: %flang_fc1 -E -nocpp -DX=A %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
7
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 !-----------------
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 ! EXPECTED OUTPUT
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 !-----------------
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 ! UNDEFINED:program b
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 ! UNDEFINED-NOT:program a
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
13
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 ! DEFINED:program a
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 ! DEFINED-NOT:program b
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 #ifdef X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 program X
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
19 #else
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 program B
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 #endif
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 end