xref: /llvm-project/flang/test/Preprocessing/implicit-contin4.F90 (revision 50e1ad6ed23682d3a992a2e8c8b7db64baaccb66)
1! RUN: %flang -E %s | FileCheck %s
2! Macro definitions with unbalanced parentheses should not affect
3! implicit continuations.
4subroutine foo(a, d)
5  implicit none
6  integer :: a
7  integer :: d
8
9#define sub(x, y) foo2(x, y)
10#define bar )
11
12   call sub(1,
13     2)
14end subroutine foo
15
16!CHECK: call foo2(1, 2)
17!CHECK: end subroutine foo
18