flang/test/Driver/dump-parse-tree-no-sema.f90

   1 !----------
   2 ! RUN lines
   3 !----------
   4 ! RUN: %flang_fc1 -fdebug-dump-parse-tree %s 2>&1 | FileCheck %s --check-prefix=SEMA_ON
   5 ! RUN: %flang_fc1 -fdebug-dump-parse-tree-no-sema %s 2>&1 | FileCheck %s --check-prefix=SEMA_OFF
   6
   7 !-----------------
   8 ! EXPECTEED OUTPUT
   9 !-----------------
  10 ! SEMA_ON: | | | NamedConstant -> Name = 'i'
  11 ! SEMA_ON-NEXT: | | | Constant -> Expr = '1_4'
  12 ! SEMA_ON-NEXT: | | | | LiteralConstant -> IntLiteralConstant = '1'
  13
  14 ! SEMA_OFF: | | | NamedConstant -> Name = 'i'
  15 ! SEMA_OFF-NEXT: | | | Constant -> Expr -> LiteralConstant -> IntLiteralConstant = '1'
  16
  17 !-------
  18 ! INPUT
  19 !-------
  20 parameter(i=1)
  21 integer :: j
  22 end program