factor/vm/words.hpp

namespace factor
{

PRIMITIVE(word);
PRIMITIVE(word_xt);

inline bool word_optimized_p(word *word)
{
	return word->code->type == WORD_TYPE;
}

PRIMITIVE(optimized_p);
PRIMITIVE(wrapper);

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

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			`PRIMITIVE(word);`
			`PRIMITIVE(word_xt);`
Porting VM to C++ 2009-05-02 05:04:19 -04:00
The great type renaming 2009-05-04 05:50:24 -04:00			`inline bool word_optimized_p(word *word)`
Porting VM to C++ 2009-05-02 05:04:19 -04:00			`{`
Store forwarding table off to the side instead of in the code block; saves one cell per code block 2009-05-05 12:07:20 -04:00			`return word->code->type == WORD_TYPE;`
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			`PRIMITIVE(optimized_p);`
			`PRIMITIVE(wrapper);`
Use C++ namespaces 2009-05-04 02:46:13 -04:00
			`}`