[gfortran,committed] Fix type mismatch from my previous NINT patch

[Steve Ellcey]

I think there is still a problem with NINT.  With ToT (version 127587)
I get the following error:

$ cat x.f90
   subroutine f(s,n)
   integer s(1:n)
   integer l
   real t
   do l = 1, n
     t = s(l)
     s(l) = NINT(t)
   end do
   end

$ gfortran -O2 -c x.f90
x.f90: In function 'f':
x.f90:7: internal compiler error: tree check: expected call_expr, have nop_expr
in expand_call, at calls.c:1910
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.


Steve Ellcey
sje@cup.hp.com