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