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

vm: rename emit_quot to emit_quotation.

db4
John Benediktsson 2015-07-15 11:21:20 -07:00
parent 4c2c8f133f
commit b065d6172d
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
vm/quotations.cpp
View File

@ -156,7 +156,7 @@ void quotation_jit::emit_epilog(bool safepoint, bool stack_frame) {
} }
/* Allocates memory conditionally */ /* Allocates memory conditionally */
void quotation_jit::emit_quot(cell quot_) { void quotation_jit::emit_quotation(cell quot_) {
data_root<quotation> quot(quot_, parent); data_root<quotation> quot(quot_, parent);
array* elements = untag<array>(quot->array); array* elements = untag<array>(quot->array);
@ -236,24 +236,24 @@ void quotation_jit::iterate_quotation() {
emit_epilog(safepoint, stack_frame); emit_epilog(safepoint, stack_frame);
tail_call = true; tail_call = true;
emit_quot(array_nth(elements.untagged(), i)); emit_quotation(array_nth(elements.untagged(), i));
emit_quot(array_nth(elements.untagged(), i + 1)); emit_quotation(array_nth(elements.untagged(), i + 1));
emit(parent->special_objects[JIT_IF]); emit(parent->special_objects[JIT_IF]);
i += 2; i += 2;
} /* dip */ } /* dip */
else if (fast_dip_p(i, length)) { else if (fast_dip_p(i, length)) {
emit_quot(obj.value()); emit_quotation(obj.value());
emit(parent->special_objects[JIT_DIP]); emit(parent->special_objects[JIT_DIP]);
i++; i++;
} /* 2dip */ } /* 2dip */
else if (fast_2dip_p(i, length)) { else if (fast_2dip_p(i, length)) {
emit_quot(obj.value()); emit_quotation(obj.value());
emit(parent->special_objects[JIT_2DIP]); emit(parent->special_objects[JIT_2DIP]);
i++; i++;
} /* 3dip */ } /* 3dip */
else if (fast_3dip_p(i, length)) { else if (fast_3dip_p(i, length)) {
emit_quot(obj.value()); emit_quotation(obj.value());
emit(parent->special_objects[JIT_3DIP]); emit(parent->special_objects[JIT_3DIP]);
i++; i++;
} else } else

2
vm/quotations.hpp
View File

@ -15,7 +15,7 @@ struct quotation_jit : public jit {
void emit_mega_cache_lookup(cell methods, fixnum index, cell cache); void emit_mega_cache_lookup(cell methods, fixnum index, cell cache);
bool primitive_call_p(cell i, cell length); bool primitive_call_p(cell i, cell length);
bool trivial_quotation_p(array* elements); bool trivial_quotation_p(array* elements);
void emit_quot(cell quot); void emit_quotation(cell quot);
void emit_prolog(bool safepoint, bool stack_frame); void emit_prolog(bool safepoint, bool stack_frame);
void emit_epilog(bool safepoint, bool stack_frame); void emit_epilog(bool safepoint, bool stack_frame);
bool fast_if_p(cell i, cell length); bool fast_if_p(cell i, cell length);