forked from OSchip/llvm-project
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
|