factor/vm/booleans.cpp

22 lines
304 B
C++

#include "master.hpp"
namespace factor
{
void factor_vm::box_boolean(bool value)
{
dpush(tag_boolean(value));
}
VM_C_API void box_boolean(bool value, factor_vm *myvm)
{
return myvm->box_boolean(value);
}
VM_C_API bool to_boolean(cell value, factor_vm *myvm)
{
return myvm->to_boolean(value);
}
}