steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

VM: Refactor fixup.hpp to Factor style

db4
Erik Charlebois 2013-05-11 22:00:47 -04:00
parent 04d655310f
commit 95d34e8ee7
1 changed files with 12 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
vm/fixup.hpp
View File

@ -1,46 +1,25 @@
namespace factor namespace factor {
{
template<typename T> template <typename T> struct identity {
struct identity { T operator()(T t) { return t; }
T operator()(T t)
{
return t;
}
}; };
struct no_fixup { struct no_fixup {
static const bool translated_code_block_map = false; static const bool translated_code_block_map = false;
object *fixup_data(object *obj) object* fixup_data(object* obj) { return obj; }
{
return obj;
}
code_block *fixup_code(code_block *compiled) code_block* fixup_code(code_block* compiled) { return compiled; }
{
return compiled;
}
object *translate_data(const object *obj) object* translate_data(const object* obj) { return fixup_data((object*)obj); }
{
return fixup_data((object *)obj);
}
code_block *translate_code(const code_block *compiled) code_block* translate_code(const code_block* compiled) {
{ return fixup_code((code_block*)compiled);
return fixup_code((code_block *)compiled); }
}
cell size(object *obj) cell size(object* obj) { return obj->size(); }
{
return obj->size();
}
cell size(code_block *compiled) cell size(code_block* compiled) { return compiled->size(); }
{
return compiled->size();
}
}; };
} }