pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:2167: Inside #if defined(PIKE_DEBUG)
   free(scope->locals);   #ifdef PIKE_DEBUG    scope->flags&=~PIKE_FRAME_MALLOCED_LOCALS;   #endif    }    really_free_pike_frame(scope);   }      void *lower_mega_apply( INT32 args, struct object *o, ptrdiff_t fun )   { -  return low_mega_apply( APPLY_LOW, args, o, (void*)fun ); +  struct pike_callsite C; +  callsite_init(&C); +  callsite_set_args(&C, args); +  callsite_resolve_fun(&C, o, fun); +  if (C.type == CALLTYPE_PIKEFUN) return C.ptr; +  /* This is only needed for pike functions right now: +  * callsite_prepare(&C); */ +  callsite_execute(&C); +  callsite_return(&C); +  callsite_free(&C); +  return NULL;   }      /* Apply a function.    *    * Application types:    *    * APPLY_STACK: Apply Pike_sp[-args] with args-1 arguments.    *    * APPLY_SVALUE: Apply the svalue at arg1, and adjust the stack    * to leave a return value.