audio.engine.test: cleanup using

[factor.git] / vm / booleans.hpp

diff --git a/vm/booleans.hpp b/vm/booleans.hpp
index 498c3f74be565e4bdfe75678e6b2b909dc6917c5..6da40cc04cfab77b6e178bfd7710fa60f4fa4c39 100644 (file)
--- a/vm/booleans.hpp
+++ b/vm/booleans.hpp
@@ -1,12 +1,6 @@
-namespace factor
-{
+namespace factor {
 
-VM_C_API void box_boolean(bool value, factor_vm *vm);
-VM_C_API bool to_boolean(cell value, factor_vm *vm);
-
-inline cell factor_vm::tag_boolean(cell untagged)
-{
-       return (untagged ? T : F);
-}
+// Cannot allocate
+inline static bool to_boolean(cell value) { return value != false_object; }
 
 }