This is the mail archive of the
cygwin
mailing list for the Cygwin project.
bug in NINT() in gfortran
- From: Hans Jørgen Aagaard Jensen <hjj at ifk dot sdu dot dk>
- To: "cygwin at cygwin dot com" <cygwin at cygwin dot com>
- Date: Sat, 12 Jun 2010 09:07:22 +0200
- Subject: bug in NINT() in gfortran
The NINT() intrinsic in current gfortran under cygwin has a bug. Below follows:
1) small test program
2) output from this program
3) output from "gfortran -v"
(I am not submitting this to the gcc bugzilla, because the test worked OK on all the linux systems I tested.)
(I found the error becaus our quantum chemistry softward dirac (http://dirac.chem.sdu.dk) failed a few of the internal tests.)
-- Hans Jørgen Aa. Jensen
======= 1) small test program ============
program test
double precision xval
xval = 132843.61283756854D0
do i = 1,7
ipoint = nint(xval)
write (6,*), xval, ipoint
xval = 10.0d0*xval
end do
return
end
======= 1) output =============
132843.61283756854 132844
1328436.1283756853 -1596096578
13284361.283756852 13284361
132843612.83756852 132843613
1328436128.3756852 1328436128
13284361283.756851 -2147483648
132843612837.56851 -2147483648
======= 1) gfortran -v =============
Using built-in specs.
Target: i686-pc-cygwin
Configured with: /gnu/gcc/releases/packaging/4.3.4-3/gcc4-4.3.4-3/src/gcc-4.3.4/configure --srcdir=/gnu/gcc/releases/packaging/4.3.4-3/gcc4-4.3.4-3/src/gcc-4.3.4 --prefix=/usr --exec-prefix=/usr --bindir=/usr/bin --sbindir=/usr/sbin --libexecdir=/usr/lib --datadir=/usr/share --localstatedir=/var --sysconfdir=/etc --infodir=/usr/share/info --mandir=/usr/share/man --datadir=/usr/share --infodir=/usr/share/info --mandir=/usr/share/man -v --with-gmp=/usr --with-mpfr=/usr --enable-bootstrap --enable-version-specific-runtime-libs --with-slibdir=/usr/bin --libexecdir=/usr/lib --enable-static --enable-shared --enable-shared-libgcc --disable-__cxa_atexit --with-gnu-ld --with-gnu-as --with-dwarf2 --disable-sjlj-exceptions --enable-languages=ada,c,c++,fortran,java,objc,obj-c++ --disable-symvers --enable-libjava --program-suffix=-4 --enable-libgomp --enable-libssp --enable-libada --enable-threads=posix --with-arch=i686 --with-tune=generic --enable-libgcj-sublibs CC=gcc-4 CXX=g++-4 CC_FOR_TARGET=gcc-4 CXX_FOR_TARGET=g++-4 GNATMAKE_FOR_TARGET=gnatmake GNATBIND_FOR_TARGET=gnatbind AS=/opt/gcc-tools/bin/as.exe AS_FOR_TARGET=/opt/gcc-tools/bin/as.exe LD=/opt/gcc-tools/bin/ld.exe LD_FOR_TARGET=/opt/gcc-tools/bin/ld.exe --with-ecj-jar=/usr/share/java/ecj.jar
Thread model: posix
gcc version 4.3.4 20090804 (release) 1 (GCC)
======= end of e-mail =============
--
Problem reports: http://cygwin.com/problems.html
FAQ: http://cygwin.com/faq/
Documentation: http://cygwin.com/docs.html
Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple