pike.git/ src/ builtin.cmod

Branch: Tag:

2002-05-24

2002-05-24 14:18:41 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Changed the remaining uses of sp to Pike_sp.

Rev: src/backend.cmod:1.25
Rev: src/builtin.cmod:1.89

1:   /* -*- c -*- -  * $Id: builtin.cmod,v 1.88 2002/05/11 00:29:57 nilsson Exp $ +  * $Id: builtin.cmod,v 1.89 2002/05/24 14:12:24 grubba Exp $    */      #include "global.h"
29:   #include "fsort.h"   #include "port.h"    - #define sp Pike_sp -  +    /*! @decl array(array(int|string)) _describe_program(program p)    *!    *! Debug function for showing the symbol table of a program.
42:    struct array *res;    int i;    -  if (!(p = program_from_svalue(sp - args))) { +  if (!(p = program_from_svalue(Pike_sp - args))) {    Pike_error("_describe_program(): Bad argument 1 (expected program).\n");    }   
63:    f_aggregate(6);    }    f_aggregate(p->num_identifier_references); -  res = sp[-1].u.array; -  sp--; +  res = Pike_sp[-1].u.array; +  Pike_sp--;    pop_n_elems(args);    push_array(res);   }
294:    for(e=0;e<a->size;e++)    index_no_free(ITEM(a)+e, ITEM(data)+e, index);    -  sp--; +  Pike_sp--;    }    END_CYCLIC();    RETURN a;
371:    optflags OPT_TRY_OPTIMIZE|OPT_EXTERNAL_DEPEND;   {    if(ind->size != val->size) -  bad_arg_error("mkmapping", sp-args, args, 2, "array", sp+1-args, +  bad_arg_error("mkmapping", Pike_sp-args, args, 2, "array", Pike_sp+1-args,    "mkmapping called on arrays of different sizes (%d != %d)\n",    ind->size, val->size);   
600:    struct svalue s;    map_delete_no_free(map->u.mapping, index, &s);    pop_n_elems(args); -  *sp=s; -  sp++; +  *Pike_sp=s; +  Pike_sp++;    }    else if (map->type == T_OBJECT && map->u.object->prog)    {