version 1.1.2.1, 2004/07/10 13:49:10 |
version 1.1.2.2, 2004/07/15 20:57:36 |
|
|
|
/*- |
|
* Copyright (c) 2003, Steven G. Kargl |
|
* All rights reserved. |
|
* |
|
* Redistribution and use in source and binary forms, with or without |
|
* modification, are permitted provided that the following conditions |
|
* are met: |
|
* 1. Redistributions of source code must retain the above copyright |
|
* notice unmodified, this list of conditions, and the following |
|
* disclaimer. |
|
* 2. Redistributions in binary form must reproduce the above copyright |
|
* notice, this list of conditions and the following disclaimer in the |
|
* documentation and/or other materials provided with the distribution. |
|
* |
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
*/ |
|
|
|
#include <sys/cdefs.h> |
|
#if defined(LIBM_SCCS) && !defined(lint) |
|
__RCSID("$NetBSD$"); |
|
#if 0 |
|
__FBSDID("$FreeBSD: src/lib/msun/src/s_roundf.c,v 1.1 2004/06/07 08:05:36 das Exp $"); |
|
#endif |
|
#endif |
|
|
|
#include <math.h> |
|
|
|
float |
|
roundf(float x) |
|
{ |
|
float t; |
|
int i; |
|
|
|
i = fpclassify(x); |
|
if (i == FP_INFINITE || i == FP_NAN) |
|
return (x); |
|
|
|
if (x >= 0.0) { |
|
t = ceilf(x); |
|
if (t - x > 0.5) |
|
t -= 1.0; |
|
return (t); |
|
} else { |
|
t = ceilf(-x); |
|
if (t + x > 0.5) |
|
t -= 1.0; |
|
return (-t); |
|
} |
|
} |