summaryrefslogtreecommitdiff
path: root/libm/double/rint.c
diff options
context:
space:
mode:
authorManuel Novoa III <mjn3@codepoet.org>2001-06-19 22:53:41 +0000
committerManuel Novoa III <mjn3@codepoet.org>2001-06-19 22:53:41 +0000
commit4ab8b2dd6e571b8dafe69a4d7a09a451cc9b1645 (patch)
tree6824a635f8300a340b520382a1ec694e6544a7af /libm/double/rint.c
parente10f6cc02bf6589700872266f1819af56a2d79f6 (diff)
Remove Erik's broken implementation of rint(). Replace it by one "less broken".
Also correct rounding beharior of round() and add trunc(). Note that round() and rint() currently don't check for infs and nans. I decided to wait on that until the big cleanup.
Diffstat (limited to 'libm/double/rint.c')
-rw-r--r--libm/double/rint.c52
1 files changed, 0 insertions, 52 deletions
diff --git a/libm/double/rint.c b/libm/double/rint.c
deleted file mode 100644
index 35cf5f503..000000000
--- a/libm/double/rint.c
+++ /dev/null
@@ -1,52 +0,0 @@
-/* vi: set sw=4 ts=4: */
-/*
- * rint for uClibc
- *
- * Copyright (C) 2001 by Lineo, inc.
- * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
- *
- * This program is free software; you can redistribute it and/or modify it
- * under the terms of the GNU Library General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or (at your
- * option) any later version.
- *
- * This program is distributed in the hope that it will be useful, but WITHOUT
- * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
- * FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
- * for more details.
- *
- * You should have received a copy of the GNU Library General Public License
- * along with this program; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- *
- */
-
-#include <math.h>
-
-/* From the Linux man page:
- *
- * NAME
- * rint - round to closest integer
- *
- * SYNOPSIS
- * #include <math.h>
- * double rint(double x);
- *
- * DESCRIPTION
- * The rint() function rounds x to an integer value according
- * to the prevalent rounding mode. The default rounding mode
- * is to round to the nearest integer.
- *
- * RETURN VALUE
- * The rint() function returns the integer value as a float­
- * ing-point number.
- */
-
-double rint (double x) {
- double low = floor(x);
- if (fmod(x,low) >= (double)0.5)
- return(ceil(x));
- else
- return(low);
-}
-