nvgn/jq
1
0 Fork 0
mirror of https://github.com/jqlang/jq.git synced 2026-10-27 21:28:25 +00:00
Code Issues Packages Projects Releases Wiki Activity

Tail call optimization (close #437)

Browse Source
This commit is contained in:
Nicolas Williams committed 2014-06-22 00:24:02 -05:00
1 parent 233e32208c
commit 4b7c701fdd
1 file changed
+15 -4
Download Patch File Download Diff File Expand all files Collapse all files
execute.c
+15 -4
View File
@@ -654,10 +654,21 @@ jv jq_next(jq_state *jq) {
case CALL_JQ: {
jv input = stack_pop(jq);
uint16_t nclosures = *pc++;
uint16_t* retaddr = pc + 2 + nclosures*2;
struct frame* new_frame = frame_push(jq, make_closure(jq, pc),
pc + 2, nclosures);
new_frame->retdata = jq->stk_top;
uint16_t* retaddr;
struct frame* new_frame;
struct closure cl = make_closure(jq, pc);
if (nclosures == 0 && *(pc + 2) == RET && frame_current(jq)->bc == cl.bc) {
// TCO
retaddr = frame_current(jq)->retaddr;
stack_ptr retdata = frame_current(jq)->retdata;
frame_pop(jq);
new_frame = frame_push(jq, cl, pc + 2, 0);
new_frame->retdata = retdata;
} else {
retaddr = pc + 2 + nclosures*2;
new_frame = frame_push(jq, cl, pc + 2, nclosures);
new_frame->retdata = jq->stk_top;
}
new_frame->retaddr = retaddr;
pc = new_frame->bc->code;
stack_push(jq, input);