pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: interpret.c,v 1.404 2008/07/11 14:43:20 mast Exp $ + || $Id: interpret.c,v 1.405 2008/07/13 15:18:28 grubba Exp $   */      #include "global.h"   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "pike_error.h"
pike.git/src/interpret.c:1880:    break;       case T_ARRAY:    if(Pike_interpreter.trace_level)    {    dynamic_buffer save_buf;    init_buf(&save_buf);    safe_describe_svalue(s,0,0);    do_trace_call(args, &save_buf);    } -  apply_array(s->u.array,args); +  apply_array(s->u.array, args, (type == APPLY_SVALUE_STRICT));    break;       case PIKE_T_TYPE:    if (args != 1) {    /* FIXME: Casts to object ought to propagate to apply program below. */    SIMPLE_WRONG_NUM_ARGS_ERROR("cast", 1);    }    o_cast(s->u.type, compile_type_to_runtime_type(s->u.type));    break;