pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:385:    if(multiset_member(lval->u.multiset,lval+1))    {    SET_SVAL(*to, T_INT, NUMBER_NUMBER, integer, 1);    }else{    SET_SVAL(*to, T_INT, NUMBER_UNDEFINED, integer, 0);    }    break;       default:    if(SAFE_IS_ZERO(lval)) -  index_error(0,0,lval,lval+1,"Indexing the NULL value.\n"); +  index_error(0,lval,lval+1,"Indexing the NULL value.\n");    else -  index_error(0,0,lval,lval+1,"Indexing a basic type.\n"); +  index_error(0,lval,lval+1,"Indexing a basic type.\n");    }    return run_time_type;   }      PMOD_EXPORT void assign_lvalue(struct svalue *lval,struct svalue *from)   {    switch(TYPEOF(*lval))    {    case T_ARRAY_LVALUE:    {
pike.git/src/interpret.c:444:       case T_MULTISET:    if(UNSAFE_IS_ZERO(from))    multiset_delete(lval->u.multiset, lval+1);    else    multiset_insert(lval->u.multiset, lval+1);    break;       default:    if(SAFE_IS_ZERO(lval)) -  index_error(0,0,lval,lval+1,"Indexing the NULL value.\n"); +  index_error(0,lval,lval+1,"Indexing the NULL value.\n");    else -  index_error(0,0,lval,lval+1,"Indexing a basic type.\n"); +  index_error(0,lval,lval+1,"Indexing a basic type.\n");    }   }      /* On error callback. lvalue is followed by value to assign. */   static void o_assign_lvalue(struct svalue *lvalue)   {    assign_lvalue(lvalue, lvalue+2);   }      union anything *get_pointer_if_this_type(struct svalue *lval, TYPE_T t)
pike.git/src/interpret.c:482:    case T_ARRAY:    return array_get_item_ptr(lval->u.array,lval+1,t);       case T_MAPPING:    return mapping_get_item_ptr(lval->u.mapping,lval+1,t);       case T_MULTISET: return 0;       default:    if(SAFE_IS_ZERO(lval)) -  index_error(0,0,lval,lval+1,"Indexing the NULL value.\n"); +  index_error(0,lval,lval+1,"Indexing the NULL value.\n");    else -  index_error(0,0,lval,lval+1,"Indexing a basic type.\n"); +  index_error(0,lval,lval+1,"Indexing a basic type.\n");    return 0;    }   }      #ifdef PIKE_DEBUG      static inline void pike_trace(int level,char *fmt, ...) ATTRIBUTE((format (printf, 2, 3)));   static inline void pike_trace(int level,char *fmt, ...)   {    if(Pike_interpreter.trace_level > level)