This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
printing integer(kind=16) values?
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: fortran at gcc dot gnu dot org
- Date: Fri, 18 Feb 2005 14:42:23 -0800
- Subject: printing integer(kind=16) values?
On amd64-*-freebsd, we have an integer(kind=16) type.
troutmask:sgk[242] more ./amd64-unknown-freebsd6.0/libgfortran/selected_int_kind.inc
integer, parameter :: c = 5
type (int_info), parameter :: int_infos(c) = (/ &
int_info (1, range(0_1)), &
int_info (2, range(0_2)), &
int_info (4, range(0_4)), &
int_info (8, range(0_8)), &
int_info (16, range(0_16)) /)
The following compiles with a patch I'm testing, but
the value of c is not printed. Should we artificially
exclude integer(kind=16)?
program za
implicit none
integer, parameter :: i4 = SELECTED_INT_KIND(5)
integer, parameter :: i8 = SELECTED_INT_KIND(10)
integer, parameter :: i16 = SELECTED_INT_KIND(20)
integer(i4) :: a
integer(i8) :: b
integer(i16) :: c
! data a / Z'4002800000000000'/
data b / Z'4002800000000000'/
data c / Z'400280000000000000'/
print *, a, b, c
end program za
--
Steve