flang/test/Preprocessing/macro-in-include.F90

   1 ! RUN: %flang -I%S '-DFILE="defines.F90"' -DFOO=1 -DBAR=2 -E %s 2>&1 | FileCheck %s
   2 #include FILE
   3 ! CHECK: integer :: a = 1
   4 ! CHECK: integer :: b = 2
   5 #define SAME(x) x
   6 #undef FOO
   7 #undef BAR
   8 #define FOO 3
   9 #define BAR 4
  10 #include SAME(FILE)
  11 ! CHECK: integer :: a = 3
  12 ! CHECK: integer :: b = 4
  13 #define TOSTR(x) #x
  14 #undef FOO
  15 #undef BAR
  16 #define FOO 5
  17 #define BAR 6
  18 #include TOSTR(defines.F90)
  19 ! CHECK: integer :: a = 5
  20 ! CHECK: integer :: b = 6