Cliff Sarginson <[EMAIL PROTECTED]> writes:
> To be fair, he did use the (appalling) word "mathoid" to imply that it
Appalling? heh heh.. No more spheroid, cuboid, either? Oh dear...
> Well you could write it yourself,,
>
Here 'tis. Seems to work well enough for the moment, although if
anyone notices a bug, boy, I'd sure appreciate hearing about it.
sdb
--
[EMAIL PROTECTED]
/* isnormal.c, return non-zero if arg not zero, infinte, subnormal or NaN
FreeBSD 4.7 libm lacks this function
Scott Ballantyne ([EMAIL PROTECTED])
Use at your own risk.
*/
/* You will need the source to the libraries to compile this function */
#include "/usr/src/lib/msun/src/math.h"
#include "/usr/src/lib/msun/src/math_private.h"
int isnormal (double x)
{
int32_t hx,lx;
EXTRACT_WORDS(hx, lx, x);
hx &= 0x7fffffff;
if (((hx | lx) == 0) /* x == 0.0 */
|| (hx >= 0x7ff00000) /* x infinite? */
|| ((hx | ((lx|-lx) >> 31)) > 0x7ff00000) /* NaN? */
|| (hx < 0x00100000)) /* Subnormal? */
return 0;
return 1;
}
To Unsubscribe: send mail to [EMAIL PROTECTED]
with "unsubscribe freebsd-questions" in the body of the message
