From a6c1ed4716cf02626ea035beb6dd4a921642ba80 Mon Sep 17 00:00:00 2001 From: PikalaxALT Date: Wed, 3 Jan 2018 17:39:24 -0700 Subject: Use libc from agbcc instead of standalone newlib\nYou must have AGBCC commit 80d029caec189587f8b9294b6c8a5a489b8f5f88 in order to compile pmd_red.gba --- newlib/libm/mathfp/s_floor.c | 92 -------------------------------------------- 1 file changed, 92 deletions(-) delete mode 100644 newlib/libm/mathfp/s_floor.c (limited to 'newlib/libm/mathfp/s_floor.c') diff --git a/newlib/libm/mathfp/s_floor.c b/newlib/libm/mathfp/s_floor.c deleted file mode 100644 index 0dbc207..0000000 --- a/newlib/libm/mathfp/s_floor.c +++ /dev/null @@ -1,92 +0,0 @@ - -/* @(#)z_floor.c 1.0 98/08/13 */ - -/* -FUNCTION -<>, <>, <>, <>---floor and ceiling -INDEX - floor -INDEX - floorf -INDEX - ceil -INDEX - ceilf - -ANSI_SYNOPSIS - #include - double floor(double <[x]>); - float floorf(float <[x]>); - double ceil(double <[x]>); - float ceilf(float <[x]>); - -TRAD_SYNOPSIS - #include - double floor(<[x]>) - double <[x]>; - float floorf(<[x]>) - float <[x]>; - double ceil(<[x]>) - double <[x]>; - float ceilf(<[x]>) - float <[x]>; - -DESCRIPTION -<> and <> find -@tex -$\lfloor x \rfloor$, -@end tex -the nearest integer less than or equal to <[x]>. -<> and <> find -@tex -$\lceil x\rceil$, -@end tex -the nearest integer greater than or equal to <[x]>. - -RETURNS -<> and <> return the integer result as a double. -<> and <> return the integer result as a float. - -PORTABILITY -<> and <> are ANSI. -<> and <> are extensions. - -*/ - -/***************************************************************** - * floor - * - * Input: - * x - floating point value - * - * Output: - * Smallest integer less than x. - * - * Description: - * This routine returns the smallest integer less than x. - * - *****************************************************************/ - -#include "fdlibm.h" -#include "zmath.h" - -#ifndef _DOUBLE_IS_32BITS - -double -_DEFUN (floor, (double), - double x) -{ - double f, y; - - if (x > -1.0 && x < 1.0) - return (x >= 0 ? 0 : -1.0); - - y = modf (x, &f); - - if (y == 0.0) - return (x); - - return (x >= 0 ? f : f - 1.0); -} - -#endif /* _DOUBLE_IS_32BITS */ -- cgit v1.2.3