kinds01.f90 2.65 KB
! RUN: %S/test_symbols.sh %s %t %f18
 !DEF: /MainProgram1/jk1 ObjectEntity INTEGER(1)
 integer(kind=1) jk1
 !DEF: /MainProgram1/js1 ObjectEntity INTEGER(1)
 integer*1 js1
 !DEF: /MainProgram1/jk2 ObjectEntity INTEGER(2)
 integer(kind=2) jk2
 !DEF: /MainProgram1/js2 ObjectEntity INTEGER(2)
 integer*2 js2
 !DEF: /MainProgram1/jk4 ObjectEntity INTEGER(4)
 integer(kind=4) jk4
 !DEF: /MainProgram1/js4 ObjectEntity INTEGER(4)
 integer*4 js4
 !DEF: /MainProgram1/jk8 ObjectEntity INTEGER(8)
 integer(kind=8) jk8
 !DEF: /MainProgram1/js8 ObjectEntity INTEGER(8)
 integer*8 js8
 !DEF: /MainProgram1/jk16 ObjectEntity INTEGER(16)
 integer(kind=16) jk16
 !DEF: /MainProgram1/js16 ObjectEntity INTEGER(16)
 integer*16 js16
 !DEF: /MainProgram1/ak2 ObjectEntity REAL(2)
 real(kind=2) ak2
 !DEF: /MainProgram1/as2 ObjectEntity REAL(2)
 real*2 as2
 !DEF: /MainProgram1/ak4 ObjectEntity REAL(4)
 real(kind=4) ak4
 !DEF: /MainProgram1/as4 ObjectEntity REAL(4)
 real*4 as4
 !DEF: /MainProgram1/ak8 ObjectEntity REAL(8)
 real(kind=8) ak8
 !DEF: /MainProgram1/as8 ObjectEntity REAL(8)
 real*8 as8
 !DEF: /MainProgram1/dp ObjectEntity REAL(8)
 double precision dp
 !DEF: /MainProgram1/ak10 ObjectEntity REAL(10)
 real(kind=10) ak10
 !DEF: /MainProgram1/as10 ObjectEntity REAL(10)
 real*10 as10
 !DEF: /MainProgram1/ak16 ObjectEntity REAL(16)
 real(kind=16) ak16
 !DEF: /MainProgram1/as16 ObjectEntity REAL(16)
 real*16 as16
 !DEF: /MainProgram1/zk2 ObjectEntity COMPLEX(2)
 complex(kind=2) zk2
 !DEF: /MainProgram1/zs2 ObjectEntity COMPLEX(2)
 complex*4 zs2
 !DEF: /MainProgram1/zk4 ObjectEntity COMPLEX(4)
 complex(kind=4) zk4
 !DEF: /MainProgram1/zs4 ObjectEntity COMPLEX(4)
 complex*8 zs4
 !DEF: /MainProgram1/zk8 ObjectEntity COMPLEX(8)
 complex(kind=8) zk8
 !DEF: /MainProgram1/zs8 ObjectEntity COMPLEX(8)
 complex*16 zs8
 !DEF: /MainProgram1/zdp ObjectEntity COMPLEX(8)
 double complex zdp
 !DEF: /MainProgram1/zk10 ObjectEntity COMPLEX(10)
 complex(kind=10) zk10
 !DEF: /MainProgram1/zs10 ObjectEntity COMPLEX(10)
 complex*20 zs10
 !DEF: /MainProgram1/zk16 ObjectEntity COMPLEX(16)
 complex(kind=16) zk16
 !DEF: /MainProgram1/zs16 ObjectEntity COMPLEX(16)
 complex*32 zs16
 !DEF: /MainProgram1/lk1 ObjectEntity LOGICAL(1)
 logical(kind=1) lk1
 !DEF: /MainProgram1/ls1 ObjectEntity LOGICAL(1)
 logical*1 ls1
 !DEF: /MainProgram1/lk2 ObjectEntity LOGICAL(2)
 logical(kind=2) lk2
 !DEF: /MainProgram1/ls2 ObjectEntity LOGICAL(2)
 logical*2 ls2
 !DEF: /MainProgram1/lk4 ObjectEntity LOGICAL(4)
 logical(kind=4) lk4
 !DEF: /MainProgram1/ls4 ObjectEntity LOGICAL(4)
 logical*4 ls4
 !DEF: /MainProgram1/lk8 ObjectEntity LOGICAL(8)
 logical(kind=8) lk8
 !DEF: /MainProgram1/ls8 ObjectEntity LOGICAL(8)
 logical*8 ls8
end program