------- Comment #1 from tkoenig at gcc dot gnu dot org  2008-04-15 21:02 -------
Confirmed, this used to work for 4.2.

$ gfortran-4.2 foo.f90 
$ ./a.out
 kind =           10
  1     -1.40     -1.40      0.00
  2     -0.40     -0.40      0.00
  3     -0.40     -0.40      0.00
  4     -1.40     -1.40      0.00
  5     -1.90     -1.90      0.00
  6     -0.90     -0.90      0.00
  7     -4.40     -4.40      0.00
  8     -4.40     -4.40      0.00
  9     -4.40     -4.40      0.00
 10     -4.40     -4.40      0.00
$ gfortran-4.2 -v         
Using built-in specs.
Target: i486-linux-gnu
Configured with: ../src/configure -v
--enable-languages=c,c++,fortran,objc,obj-c++ --prefix=/usr --enable-shared
--with-system-zlib --libexecdir=/usr/lib --without-included-gettext
--enable-threads=posix --enable-nls --with-gxx-include-dir=/usr/include/c++/4.2
--program-suffix=-4.2 --enable-clocale=gnu --enable-libstdcxx-debug
--enable-objc-gc --enable-mpfr --disable-libmudflap --enable-targets=all
--enable-checking=release --build=i486-linux-gnu --host=i486-linux-gnu
--target=i486-linux-gnu
Thread model: posix
gcc version 4.2.3 (Debian 4.2.3-3)
$ gfortran-4.3 foo.f90 
$ ./a.out
 kind =           10
  1      0.00     -1.40     -1.40
  2     -0.00     -0.40       NaN
  3     -0.40     -0.40      0.00
  4     -0.40     -1.40     -1.00
  5     -0.40     -1.90     -1.50
  6     -0.40     -0.90     -0.50
  7     -0.40     -4.40     -4.00
  8     -0.40     -4.40     -4.00
  9     -0.40     -4.40     -4.00
 10     -0.40     -4.40     -4.00
$ gfortran-4.3 -v
Using built-in specs.
Target: i486-linux-gnu
Configured with: ../src/configure linux gnu
Thread model: posix
gcc version 4.3.1 20080309 (prerelease) (Debian 4.3.0-1) 


-- 

tkoenig at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |tkoenig at gcc dot gnu dot
                   |                            |org
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |wrong-code
      Known to work|                            |4.2.3
   Last reconfirmed|0000-00-00 00:00:00         |2008-04-15 21:02:35
               date|                            |
            Summary|wrong result for MOD with   |[4.3, 4.4 regression] wrong
                   |kind=10 for some array      |result for MOD with kind=10
                   |argument values             |for some array argument
                   |                            |values


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

Reply via email to