vm/booleans.hpp

   1 namespace factor
   2 {
   3
   4 VM_C_API void box_boolean(bool value, factor_vm *vm);
   5 VM_C_API bool to_boolean(cell value, factor_vm *vm);
   6
   7 inline cell factor_vm::tag_boolean(cell untagged)
   8 {
   9         return (untagged ? T : F);
  10 }
  11
  12 }