version 1.66, 2002/09/19 19:04:42
|
version 1.67, 2002/10/04 19:17:06
|
Line 878 extern Cell image[];
|
Line 878 extern Cell image[];
|
extern const char reloc_bits[]; |
extern const char reloc_bits[]; |
#endif |
#endif |
|
|
|
DCell double2ll(Float r) |
|
{ |
|
#ifndef BUGGY_LONG_LONG |
|
return (DCell)(r); |
|
#else |
|
DCell d; |
|
d.hi = ldexp(r,-(int)(CELL_BITS)) - (r<0); |
|
d.lo = r-ldexp((Float)d.hi,CELL_BITS); |
|
return d; |
|
#endif |
|
} |
|
|
int main(int argc, char **argv, char **env) |
int main(int argc, char **argv, char **env) |
{ |
{ |
#ifdef HAS_OS |
#ifdef HAS_OS |