------- Comment #7 from bardeau at iram dot fr 2007-06-21 13:08 ------- (In reply to comment #6) > Fixed on mainline and 4.2. Unless you really want to backport it to 4.1.3, I'm > closing this bug. >
The bug still appears under cygwin with gcc 4.3: program test integer*4 a a=1 print *,"a = ", a print *,"ISHFTC(a,2,32) = ", ISHFTC(a,2,32) print *,"ISHFTC(a,2) = ", ISHFTC(a,2) end ~> ./test.exe a = 1 ISHFTC(a,2,32) = 1 ISHFTC(a,2) = 4 This happens only if A is INTEGER*4 or 8, and if 3rd argument is present. Also, no problem under Linux. ~> uname -a CYGWIN_NT-5.1 dhcp-bardeau 1.5.24(0.156/4/2) 2007-01-31 10:57 i686 Cygwin ~> gfortran -v Using built-in specs. Target: i686-pc-cygwin Configured with: ../gcc43/configure --prefix=/usr/local/gfortran --enable-languages=c,fortran --enable-bootstrap --enable-threads=posix --enable-sjlj-exceptions --enable-version-specific-runtime-libs --enable-nls --disable-libmudflap --disable-shared --disable-win32-registry --with-system-zlib --enable-checking=release --enable-werror --without-included-gettext --without-x --enable-libgomp Thread model: posix gcc version 4.3.0 20070512 (experimental) Cheers, Sebastien -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30381
