git.gag.com Git - fw/sdcc/blob - device/lib/_fs2slong.c

   1 #include <float.h>
   2
   3 /* convert float to signed long */
   4 signed long __fs2slong (float f) {
   5
   6   if (!f)
   7     return 0;
   8
   9   if (f<0) {
  10     return -__fs2ulong(-f);
  11   } else {
  12     return __fs2ulong(f);
  13   }
  14 }