Imported gcc-4.4.3

[msp430-gcc.git] / libf2c / libF77 / i_nint.c

diff --git a/libf2c/libF77/i_nint.c b/libf2c/libF77/i_nint.c
deleted file mode 100644 (file)
index 411ce32..0000000
--- a/libf2c/libF77/i_nint.c
+++ /dev/null
@@ -1,13 +0,0 @@
-#include "f2c.h"
-
-#ifdef KR_headers
-double floor();
-integer i_nint(x) real *x;
-#else
-#undef abs
-#include <math.h>
-integer i_nint(real *x)
-#endif
-{
-return (integer)(*x >= 0 ? floor(*x + .5) : -floor(.5 - *x));
-}