32 lines
542 B
C
32 lines
542 B
C
/*
|
|
libc/ieee_float/isinf.c
|
|
|
|
Created: Oct 14, 1993 by Philip Homburg <philip@cs.vu.nl>
|
|
|
|
Implementation of isinf that directly tests the bits in an ieee float
|
|
*/
|
|
|
|
#define _MINIX_SOURCE
|
|
|
|
#include <sys/types.h>
|
|
#include <math.h>
|
|
|
|
#include "ieee_float.h"
|
|
|
|
int isinf(value)
|
|
double value;
|
|
{
|
|
struct f64 *f64p;
|
|
int exp;
|
|
|
|
f64p= (struct f64 *)&value;
|
|
exp= F64_GET_EXP(f64p);
|
|
if (exp != F64_EXP_MAX)
|
|
return 0;
|
|
return F64_GET_MANT_LOW(f64p) == 0 && F64_GET_MANT_HIGH(f64p) == 0;
|
|
}
|
|
|
|
/*
|
|
* $PchId: isinf.c,v 1.3 1996/02/22 21:01:39 philip Exp $
|
|
*/
|