! RUN: %f18 -E -DFOO=1 -DBAR=2 %s | FileCheck %s
! CHECK: integer :: a = 1
integer :: a = FOO
! CHECK: integer :: b = 2
integer :: b = BAR
end program