Subversion Repositories Kolibri OS

Rev

Rev 4872 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. #ifndef __F_MATH_H__
  2. #define __F_MATH_H__
  3.  
  4. #include <_ansi.h>
  5. #include "fdlibm.h"
  6.  
  7. __inline__
  8. static
  9. int
  10. _DEFUN (check_finite, (x),
  11.          double x)
  12. {  
  13.   __int32_t hx;
  14.   GET_HIGH_WORD(hx,x);
  15.   return  (int)((__uint32_t)((hx&0x7fffffff)-0x7ff00000)>>31);
  16. }
  17.  
  18. __inline__
  19. static
  20. int
  21. _DEFUN (check_finitef, (x),
  22.          float x)
  23. {  
  24.   __int32_t ix;
  25.   GET_FLOAT_WORD(ix,x);
  26.   return  (int)((__uint32_t)((ix&0x7fffffff)-0x7f800000)>>31);
  27. }
  28.  
  29. #endif /* __F_MATH_H__ */
  30.