[prev in list] [next in list] [prev in thread] [next in thread] 

List:       gcc-bugs
Subject:    [Bug fortran/15233] New: INTEGER(8) erronous compiler error
From:       "gcc-bugzilla at gcc dot gnu dot org" <gcc-bugzilla () gcc ! gnu ! org>
Date:       2004-04-30 18:24:24
Message-ID: 20040430182422.15233.kargl () c-67-168-59-70 ! client ! comcast ! net
[Download RAW message or body]


Consider the following program

   program h
   implicit none
   integer(4) i4
   integer(8) i8
   i4 = huge(i4)
   i8 = huge(i8)
   print*,'i4 = ', i4  ! This prints 2147483647
   print*,'i8 = ', i8  ! This prints 9223372036854775807
   !
   !  This causes a compiler error
   !
   i8 = 922337203685
   end program h

kargl[335] gfortran -static -o h h.f90
 In file h.f90:12

   i8 = 922337203685
                   1
Error: Integer too big for its kind at (1)

The last time I checked 922337203685 was much less than
9223372036854775807.

Environment:
System: FreeBSD c-67-168-59-70.client.comcast.net 5.2-CURRENT FreeBSD 5.2-CURRENT #2: \
Sat Apr 24 10:33:08 PDT 2004 \
kargl@c-67-168-59-70.client.comcast.net:/usr/obj/usr/src/sys/HOTRATS i386


	
host: i386-unknown-freebsd5.2
build: i386-unknown-freebsd5.2
target: i386-unknown-freebsd5.2
configured with: ../gcc/configure --prefix=/home/kargl/gcc/work --disable-libmudflap \
--enable-languages=c,f95 --with-gmp=/usr/local

How-To-Repeat:
	See above.

-- 
           Summary: INTEGER(8) erronous compiler error
           Product: gcc
           Version: unknown
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: kargl at c-67-168-59-70 dot client dot comcast dot net
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i386-unknown-freebsd5.2
  GCC host triplet: i386-unknown-freebsd5.2
GCC target triplet: i386-unknown-freebsd5.2


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15233


[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic