pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   /**/   #include "global.h" - RCSID("$Id: interpret.c,v 1.125 1999/05/13 07:24:51 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.126 1999/06/03 01:39:33 hubbe Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:986:    num_args=EXTRACT_UCHAR(pc++);       /* FIXME: this is only needed if this function contains    * trampolines    */    new_frame->expendible+=num_locals;       /* adjust arguments on stack */    if(args < num_args) /* push zeros */    { -  clear_svalues(sp, num_args-args); +  clear_svalues_undefined(sp, num_args-args);    sp += num_args-args;    args += num_args-args;    }       if(function->identifier_flags & IDENTIFIER_VARARGS)    {    f_aggregate(args - num_args); /* make array */    args = num_args+1;    }else{    if(args > num_args)