flang/test/Preprocessing/pp036.F


1
2
3
4
5
6
7
8
9
10
11

! RUN: %flang -E %s 2>&1 | FileCheck %s
! CHECK: if (.TRUE .) then
! CHECK: print *, 'pp036.F no: ', .TRUE .
* #define FALSE TRUE ...  .FALSE. -> .TRUE.
#define FALSE TRUE
      if (.FALSE.) then
        print *, 'pp036.F yes'
      else
        print *, 'pp036.F no: ', .FALSE.
      end if
      end