factor/vm/booleans.hpp

namespace factor
{

inline static cell tag_boolean(cell untagged)
{
	return (untagged ? T : F);
}

VM_C_API void box_boolean(bool value);
VM_C_API bool to_boolean(cell value);

}
Use C++ namespaces 2009-05-04 02:46:13 -04:00			`namespace factor`
			`{`

The great type renaming 2009-05-04 05:50:24 -04:00			`inline static cell tag_boolean(cell untagged)`
Porting VM to C++ 2009-05-02 05:04:19 -04:00			`{`
VM: use better abstractions for tagged pointers, eliminate get()/set() stuff, clean up array, string, and byte-array element access 2009-05-04 02:00:30 -04:00			`return (untagged ? T : F);`
Porting VM to C++ 2009-05-02 05:04:19 -04:00			`}`

VM: use better abstractions for tagged pointers, eliminate get()/set() stuff, clean up array, string, and byte-array element access 2009-05-04 02:00:30 -04:00			`VM_C_API void box_boolean(bool value);`
The great type renaming 2009-05-04 05:50:24 -04:00			`VM_C_API bool to_boolean(cell value);`
Use C++ namespaces 2009-05-04 02:46:13 -04:00
			`}`