[Bug fortran/20786] Can't use AINT intrinsic with KIND parameter

[jblomqvi at cc dot hut dot fi]

------- Additional Comments From jblomqvi at cc dot hut dot fi  2005-06-11 
20:07 -------
Actually, ANINT also exhibits the same problem:

      implicit none
      real(4) :: r = 42.7, r2
      r2 = aint (r,kind=8)
      print *, 'aint: ', r2
      r2 = anint (r, kind=8)
      print *, 'anint: ', r2
      end

Prints out:

 aint:    0.000000
 anint:    0.000000


-- 


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