pike.git / src / operators.c

version» Context lines:

pike.git/src/operators.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: operators.c,v 1.205 2005/09/15 12:30:46 grubba Exp $ + || $Id: operators.c,v 1.206 2005/09/15 15:38:57 grubba Exp $   */      #include "global.h"   #include <math.h>   #include "interpret.h"   #include "svalue.h"   #include "multiset.h"   #include "mapping.h"   #include "array.h"   #include "stralloc.h"
pike.git/src/operators.c:1266:    }       for(e=1;e<args;e++)    {    if(sp[e-args].type == T_OBJECT &&    (p = (o = sp[e-args].u.object)->prog) &&    (i = FIND_LFUN(p->inherits[sp[e-args].subtype].prog,    LFUN_RADD)) != -1)    {    /* There's an object with a lfun::``+() at argument @[e]. */ -  if ((args = low_rop(o, i, e, args)) > 1) +  if ((args = low_rop(o, i, e, args)) > 1) {    goto tail_recurse;    } -  +  return;    }    }    } -  +  }       switch(sp[-args].type)    {    case T_PROGRAM:    case T_FUNCTION:    SIMPLE_BAD_ARG_ERROR("`+", 1,    "string|object|int|float|array|mapping|multiset");    }    bad_arg_error("`+", sp-args, args, 1,    "string|object|int|float|array|mapping|multiset", sp-args,