pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:2226:    }       callsite_prepare(&C);    callsite_execute(&C);    callsite_free(&C);       return NULL;   }      /* NOTE: see comments in low_mega_apply_tailcall() */ - void* lower_mega_apply_tailcall(INT32 args, struct object *o, ptrdiff_t fun) { + void* lower_mega_apply_tailcall(INT32 args, struct object *o, ptrdiff_t fun, INT32 xargs) {    struct pike_frame *frame = Pike_fp;    struct pike_callsite C;    -  callsite_init(&C, args); +  callsite_init(&C, xargs); +  C.args = args;       if (frame_can_reuse(frame))    C.frame = frame;       callsite_resolve_identifier(&C, o, fun);       if (C.frame == frame) {    if (C.type == CALLTYPE_PIKEFUN) {    return C.ptr;    } else C.frame = NULL;