uc-sdk
Main Page
Related Pages
Modules
Classes
Files
File List
File Members
All
Classes
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Macros
Groups
Pages
s_finite.c
Go to the documentation of this file.
1
2
/* @(#)s_finite.c 1.3 95/01/18 */
3
/*
4
* ====================================================
5
* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
6
*
7
* Developed at SunSoft, a Sun Microsystems, Inc. business.
8
* Permission to use, copy, modify, and distribute this
9
* software is freely granted, provided that this notice
10
* is preserved.
11
* ====================================================
12
*/
13
14
/*
15
* finite(x) returns 1 is x is finite, else 0;
16
* no branching!
17
*/
18
19
#include "
fdlibm.h
"
20
21
#ifdef __STDC__
22
int
finite
(
double
x)
23
#else
24
int
finite
(x)
25
double x;
26
#endif
27
{
28
int
hx;
29
hx =
__HI
(x);
30
return
(
unsigned
)((hx&0x7fffffff)-0x7ff00000)>>31;
31
}
libm
src
s_finite.c
Generated on Fri Nov 15 2013 05:00:19 for uc-sdk by
1.8.4