mirror of
https://github.com/llvm/llvm-project.git
synced 2025-04-25 18:56:06 +00:00
20 lines
408 B
Fortran
20 lines
408 B
Fortran
!-----------
|
|
! RUN lines
|
|
!-----------
|
|
! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
! RUN: %flang_fc1 -E -cpp -DX=A %s 2>&1 | FileCheck %s --check-prefix=DEFINED
|
|
! RUN: %flang_fc1 -E -nocpp -DX=A %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
|
|
! UNDEFINED:program B
|
|
! UNDEFINED-NOT:program A
|
|
|
|
! DEFINED:program A
|
|
! DEFINED-NOT:program B
|
|
|
|
#ifdef X
|
|
program X
|
|
#else
|
|
program B
|
|
#endif
|
|
end
|