[PATCH] Fix round/roundf in intrinsics/c99_functions.c

[Tobias Burnus]

Hi Dave,

a belate review.

John David Anglin wrote:
> This patch fixes the failure of nint_2.f90 on hppa*-*-hpux11*.
> The problem was traced to a IEEE rounding issue in the statement
> "if (t - x > 0.5)".

http://gcc.gnu.org/ml/gcc-patches/2008-12/msg01221.html

The patch is OK. Thanks for fixing it.

Tobias

> 2008-12-29  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
> 
> 	PR fortran/33595
> 	* intrinsics/c99_functions.c (round): Use floor instead of ceil.
> 	Revise checks to round up.
> 	(roundf): Likewise.