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