VM_ASM_API void inline_gc(cell *gc_roots_base, cell gc_roots_size, factorvm *myvm)
{
ASSERTVM();
- return VM_PTR->inline_gc(gc_roots_base,gc_roots_size);
+ VM_PTR->inline_gc(gc_roots_base,gc_roots_size);
}
}
VM_C_API double to_double(cell value,factorvm *myvm)
{
+ ASSERTVM();
return VM_PTR->to_double(value);
}
VM_ASM_API_OVERFLOW void overflow_fixnum_add(fixnum x, fixnum y, factorvm *myvm)
{
- return PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_add(x,y);
+ PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_add(x,y);
}
inline void factorvm::overflow_fixnum_subtract(fixnum x, fixnum y)
VM_ASM_API_OVERFLOW void overflow_fixnum_subtract(fixnum x, fixnum y, factorvm *myvm)
{
- return PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_subtract(x,y);
+ PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_subtract(x,y);
}
inline void factorvm::overflow_fixnum_multiply(fixnum x, fixnum y)
VM_ASM_API_OVERFLOW void overflow_fixnum_multiply(fixnum x, fixnum y, factorvm *myvm)
{
- return PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_multiply(x,y);
+ PRIMITIVE_OVERFLOW_GETVM()->overflow_fixnum_multiply(x,y);
}
}