forked from OSchip/llvm-project
37 lines
1.1 KiB
Fortran
37 lines
1.1 KiB
Fortran
! Ensure arguments -D and -U work as expected.
|
|
|
|
!--------------------------
|
|
! FLANG DRIVER (flang-new)
|
|
!--------------------------
|
|
! RUN: %flang -E %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
! RUN: %flang -E -DX=A %s 2>&1 | FileCheck %s --check-prefix=DEFINED
|
|
! RUN: %flang -E -DX=A -UX %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
|
|
!-----------------------------------------
|
|
! FRONTEND FLANG DRIVER (flang-new -fc1)
|
|
!-----------------------------------------
|
|
! RUN: %flang_fc1 -E %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
! RUN: %flang_fc1 -E -DX=A %s 2>&1 | FileCheck %s --check-prefix=DEFINED
|
|
! RUN: %flang_fc1 -E -DX -UX %s 2>&1 | FileCheck %s --check-prefix=UNDEFINED
|
|
|
|
!--------------------------------------------
|
|
! EXPECTED OUTPUT FOR AN UNDEFINED MACRO
|
|
!--------------------------------------------
|
|
! UNDEFINED:program b
|
|
! UNDEFINED-NOT:program x
|
|
! UNDEFINED-NEXT:end
|
|
|
|
!--------------------------------------------
|
|
! EXPECTED OUTPUT FOR MACRO 'X' DEFINED AS A
|
|
!--------------------------------------------
|
|
! DEFINED:program a
|
|
! DEFINED-NOT:program b
|
|
! DEFINED-NEXT:end
|
|
|
|
#ifdef X
|
|
program X
|
|
#else
|
|
program B
|
|
#endif
|
|
end
|