-inline static CELL tag_boolean(CELL untagged)
-{
- return (untagged ? T : F);
-}
+namespace factor {
+
+// Cannot allocate
+inline static bool to_boolean(cell value) { return value != false_object; }
-VM_C_API void box_boolean(bool value);
-VM_C_API bool to_boolean(CELL value);
+}