xref: /llvm-project/flang/test/Preprocessing/cond-contin.F90 (revision 5d15f606da4cb4346465956d935a2842f8e86200)
1! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s
2! CHECK: subroutine test(ARG1, FA, FB, ARG2)
3! CHECK: end
4
5subroutine test( &
6ARG1, &
7! test
8#ifndef SWAP
9#define ARG1 FA
10#define ARG2 FB
11#else
12#define ARG1 FB
13#define ARG2 FA
14#endif
15ARG1, ARG2, &
16! test
17#undef ARG1
18#undef ARG2
19&ARG2)
20! comment
21end
22