+++ /dev/null
-/* @(#)s_finite.c 5.1 93/09/24 */\r
-/*\r
- * ====================================================\r
- * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.\r
- *\r
- * Developed at SunPro, a Sun Microsystems, Inc. business.\r
- * Permission to use, copy, modify, and distribute this\r
- * software is freely granted, provided that this notice\r
- * is preserved.\r
- * ====================================================\r
- */\r
-#include <LibConfig.h>\r
-#include <sys/EfiCdefs.h>\r
-#if defined(LIBM_SCCS) && !defined(lint)\r
-__RCSID("$NetBSD: s_finite.c,v 1.11 2002/05/26 22:01:55 wiz Exp $");\r
-#endif\r
-\r
-/*\r
- * finite(x) returns 1 is x is finite, else 0;\r
- * no branching!\r
- */\r
-\r
-#include "math.h"\r
-#include "math_private.h"\r
-\r
-int\r
-finite(double x)\r
-{\r
- int32_t hx;\r
- GET_HIGH_WORD(hx,x);\r
- return (int)((u_int32_t)((hx&0x7fffffff)-0x7ff00000)>>31);\r
-}\r