pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:1:   /* -*- c -*- -  * $Id: builtin.cmod,v 1.53 2001/07/02 04:09:46 hubbe Exp $ +  * $Id: builtin.cmod,v 1.54 2001/07/02 10:43:39 grubba Exp $    */      #include "global.h"   #include "interpret.h"   #include "svalue.h"   #include "opcodes.h"   #include "pike_macros.h"   #include "object.h"   #include "program.h"   #include "array.h"
pike.git/src/builtin.cmod:48:    {    push_int('t');    f_aggregate_mapping(0);    apply_low(x->u.object, fun, 2);    if(Pike_sp[-1].type == T_STRING)    {    stack_swap();    pop_stack();    return;    } -  error("Non-string returned from _sprintf()\n"); +  Pike_error("Non-string returned from _sprintf()\n");    }    }    pop_stack();    switch(t)    {    case T_ARRAY: push_constant_text("array"); break;    case T_FLOAT: push_constant_text("float"); break;    case T_FUNCTION: push_constant_text("function"); break;    case T_INT: push_constant_text("int"); break;    case T_LVALUE: push_constant_text("lvalue"); break;
pike.git/src/builtin.cmod:99:    {    push_int('c');    f_aggregate_mapping(0);    apply_low(x->u.object, fun, 2);    if(Pike_sp[-1].type == T_STRING)    {    stack_swap();    pop_stack();    return;    } -  error("Non-string returned from _sprintf()\n"); +  Pike_error("Non-string returned from _sprintf()\n");    }    }    if(x->type != T_INT) -  error("Bad argument 1 to int2char.\n"); +  Pike_error("Bad argument 1 to int2char.\n");       c=x->u.integer;       if(c>=0 && c<256)    {    struct pike_string *s;    s=begin_shared_string(1);    s->str[0]=c;    RETURN end_shared_string(s);    }else{