1
2 /* @(#)z_ispos.c 1.0 98/08/13 */
3 /******************************************************************
4 * Numtest
5 *
6 * Input:
7 * x - pointer to a floating point value
8 *
9 * Output:
10 * An integer that indicates if the number is positive.
11 *
12 * Description:
13 * This routine returns an integer that indicates if the number
14 * passed in is positive (1) or negative (0).
15 *
16 *****************************************************************/
17
18 #include "fdlibm.h"
19 #include "zmath.h"
20
21 #ifndef _DOUBLE_IS_32BITS
22
ispos(double x)23 int ispos (double x)
24 {
25 __uint32_t hx;
26
27 GET_HIGH_WORD (hx, x);
28
29 if (hx & 0x80000000)
30 return (0);
31 else
32 return (1);
33 }
34
35 #endif /* _DOUBLE_IS_32BITS */
36