removed some global functions from math.cpp
parent
2dba15535f
commit
fc5c51e2cd
16
vm/math.cpp
16
vm/math.cpp
|
@ -71,30 +71,18 @@ inline fixnum factorvm::sign_mask(fixnum x)
|
|||
return x >> (WORD_SIZE - 1);
|
||||
}
|
||||
|
||||
inline fixnum sign_mask(fixnum x)
|
||||
{
|
||||
return vm->sign_mask(x);
|
||||
}
|
||||
|
||||
inline fixnum factorvm::branchless_max(fixnum x, fixnum y)
|
||||
{
|
||||
return (x - ((x - y) & sign_mask(x - y)));
|
||||
}
|
||||
|
||||
inline fixnum branchless_max(fixnum x, fixnum y)
|
||||
{
|
||||
return vm->branchless_max(x,y);
|
||||
}
|
||||
|
||||
inline fixnum factorvm::branchless_abs(fixnum x)
|
||||
{
|
||||
return (x ^ sign_mask(x)) - sign_mask(x);
|
||||
}
|
||||
|
||||
inline fixnum branchless_abs(fixnum x)
|
||||
{
|
||||
return vm->branchless_abs(x);
|
||||
}
|
||||
|
||||
inline void factorvm::vmprim_fixnum_shift()
|
||||
{
|
||||
|
@ -410,10 +398,6 @@ cell factorvm::unbox_array_size()
|
|||
return 0; /* can't happen */
|
||||
}
|
||||
|
||||
cell unbox_array_size()
|
||||
{
|
||||
return vm->unbox_array_size();
|
||||
}
|
||||
|
||||
inline void factorvm::vmprim_fixnum_to_float()
|
||||
{
|
||||
|
|
|
@ -38,8 +38,6 @@ PRIMITIVE(bignum_bitp);
|
|||
PRIMITIVE(bignum_log2);
|
||||
PRIMITIVE(byte_array_to_bignum);
|
||||
|
||||
cell unbox_array_size();
|
||||
|
||||
PRIMITIVE(fixnum_to_float);
|
||||
PRIMITIVE(bignum_to_float);
|
||||
PRIMITIVE(str_to_float);
|
||||
|
|
Loading…
Reference in New Issue