flang/test/Semantics/kinds01.f90

   1 ! RUN: %S/test_symbols.sh %s %t %flang_fc1
   2 ! REQUIRES: shell
   3  !DEF: /MainProgram1/jk1 ObjectEntity INTEGER(1)
   4  integer(kind=1) jk1
   5  !DEF: /MainProgram1/js1 ObjectEntity INTEGER(1)
   6  integer*1 js1
   7  !DEF: /MainProgram1/jk2 ObjectEntity INTEGER(2)
   8  integer(kind=2) jk2
   9  !DEF: /MainProgram1/js2 ObjectEntity INTEGER(2)
  10  integer*2 js2
  11  !DEF: /MainProgram1/jk4 ObjectEntity INTEGER(4)
  12  integer(kind=4) jk4
  13  !DEF: /MainProgram1/js4 ObjectEntity INTEGER(4)
  14  integer*4 js4
  15  !DEF: /MainProgram1/jk8 ObjectEntity INTEGER(8)
  16  integer(kind=8) jk8
  17  !DEF: /MainProgram1/js8 ObjectEntity INTEGER(8)
  18  integer*8 js8
  19  !DEF: /MainProgram1/jk16 ObjectEntity INTEGER(16)
  20  integer(kind=16) jk16
  21  !DEF: /MainProgram1/js16 ObjectEntity INTEGER(16)
  22  integer*16 js16
  23  !DEF: /MainProgram1/ak2 ObjectEntity REAL(2)
  24  real(kind=2) ak2
  25  !DEF: /MainProgram1/as2 ObjectEntity REAL(2)
  26  real*2 as2
  27  !DEF: /MainProgram1/ak4 ObjectEntity REAL(4)
  28  real(kind=4) ak4
  29  !DEF: /MainProgram1/as4 ObjectEntity REAL(4)
  30  real*4 as4
  31  !DEF: /MainProgram1/ak8 ObjectEntity REAL(8)
  32  real(kind=8) ak8
  33  !DEF: /MainProgram1/as8 ObjectEntity REAL(8)
  34  real*8 as8
  35  !DEF: /MainProgram1/dp ObjectEntity REAL(8)
  36  double precision dp
  37  !DEF: /MainProgram1/ak10 ObjectEntity REAL(10)
  38  real(kind=10) ak10
  39  !DEF: /MainProgram1/as10 ObjectEntity REAL(10)
  40  real*10 as10
  41  !DEF: /MainProgram1/ak16 ObjectEntity REAL(16)
  42  real(kind=16) ak16
  43  !DEF: /MainProgram1/as16 ObjectEntity REAL(16)
  44  real*16 as16
  45  !DEF: /MainProgram1/zk2 ObjectEntity COMPLEX(2)
  46  complex(kind=2) zk2
  47  !DEF: /MainProgram1/zs2 ObjectEntity COMPLEX(2)
  48  complex*4 zs2
  49  !DEF: /MainProgram1/zk4 ObjectEntity COMPLEX(4)
  50  complex(kind=4) zk4
  51  !DEF: /MainProgram1/zs4 ObjectEntity COMPLEX(4)
  52  complex*8 zs4
  53  !DEF: /MainProgram1/zk8 ObjectEntity COMPLEX(8)
  54  complex(kind=8) zk8
  55  !DEF: /MainProgram1/zs8 ObjectEntity COMPLEX(8)
  56  complex*16 zs8
  57  !DEF: /MainProgram1/zdp ObjectEntity COMPLEX(8)
  58  double complex zdp
  59  !DEF: /MainProgram1/zk10 ObjectEntity COMPLEX(10)
  60  complex(kind=10) zk10
  61  !DEF: /MainProgram1/zs10 ObjectEntity COMPLEX(10)
  62  complex*20 zs10
  63  !DEF: /MainProgram1/zk16 ObjectEntity COMPLEX(16)
  64  complex(kind=16) zk16
  65  !DEF: /MainProgram1/zs16 ObjectEntity COMPLEX(16)
  66  complex*32 zs16
  67  !DEF: /MainProgram1/lk1 ObjectEntity LOGICAL(1)
  68  logical(kind=1) lk1
  69  !DEF: /MainProgram1/ls1 ObjectEntity LOGICAL(1)
  70  logical*1 ls1
  71  !DEF: /MainProgram1/lk2 ObjectEntity LOGICAL(2)
  72  logical(kind=2) lk2
  73  !DEF: /MainProgram1/ls2 ObjectEntity LOGICAL(2)
  74  logical*2 ls2
  75  !DEF: /MainProgram1/lk4 ObjectEntity LOGICAL(4)
  76  logical(kind=4) lk4
  77  !DEF: /MainProgram1/ls4 ObjectEntity LOGICAL(4)
  78  logical*4 ls4
  79  !DEF: /MainProgram1/lk8 ObjectEntity LOGICAL(8)
  80  logical(kind=8) lk8
  81  !DEF: /MainProgram1/ls8 ObjectEntity LOGICAL(8)
  82  logical*8 ls8
  83 end program