aboutsummaryrefslogtreecommitdiff
path: root/flang/test/Preprocessing/ff-include-args.F
blob: 81e4102598c2fdcd7e54a8aa5911f884e99a51cc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
! RUN: %flang -E %s 2>&1 | FileCheck %s
! CHECK: call foo (  3.14159)
! CHECK: subroutine foo(test)
      call foo (
#include "ff-args.h"
      end
#define TEST
      subroutine foo(
#ifdef TEST
     +test)
#else
     +)
#endif
      end