Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. /* Copyright (C) 2002 by  Red Hat, Incorporated. All rights reserved.
  2.  *
  3.  * Permission to use, copy, modify, and distribute this software
  4.  * is freely granted, provided that this notice is preserved.
  5.  */
  6.  
  7. #include "fdlibm.h"
  8.  
  9. int __signbitf (float x);
  10. int __signbitd (double x);
  11.  
  12. int
  13. __signbitf (float x)
  14. {
  15.   unsigned int w;
  16.  
  17.   GET_FLOAT_WORD(w,x);
  18.  
  19.   return (w & 0x80000000);
  20. }
  21.  
  22. int
  23. __signbitd (double x)
  24. {
  25.   unsigned int msw;
  26.  
  27.   GET_HIGH_WORD(msw, x);
  28.  
  29.   return (msw & 0x80000000);
  30. }
  31.