9 lines
157 B
Fortran
9 lines
157 B
Fortran
! 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
|