pike.git / src / interpret_functions.h

version» Context lines:

pike.git/src/interpret_functions.h:1:   /* -  * $Id: interpret_functions.h,v 1.26 2000/07/12 12:25:18 grubba Exp $ +  * $Id: interpret_functions.h,v 1.27 2000/07/29 06:31:06 hubbe Exp $    *    * Opcode definitions for the interpreter.    */      OPCODE0(F_UNDEFINED,"push UNDEFINED")    push_int(0);    Pike_sp[-1].subtype=NUMBER_UNDEFINED;   BREAK;      OPCODE0(F_CONST0, "push 0")
pike.git/src/interpret_functions.h:266:   {    INT32 tmp = arg1 + Pike_fp->context.identifier_level;    struct identifier *i;       if(!Pike_fp->current_object->prog)    error("Cannot access global variables in destructed object.\n");       i = ID_FROM_INT(Pike_fp->current_object->prog, tmp);    if(!IDENTIFIER_IS_VARIABLE(i->identifier_flags))    error("Cannot assign functions or constants.\n"); -  if(i->run_time_type == T_MIXED) +  if(i->run_time_type == PIKE_T_MIXED)    {    assign_svalue((struct svalue *)GLOBAL_FROM_INT(tmp),    Pike_fp->locals + arg2);    }else{    assign_to_short_svalue((union anything *)GLOBAL_FROM_INT(tmp),    i->run_time_type,    Pike_fp->locals + arg2);    }   }   BREAK;
pike.git/src/interpret_functions.h:534:   {    struct identifier *i;    INT32 tmp=arg1 + Pike_fp->context.identifier_level;    if(!Pike_fp->current_object->prog)    error("Cannot access global variables in destructed object.\n");    i=ID_FROM_INT(Pike_fp->current_object->prog, tmp);       if(!IDENTIFIER_IS_VARIABLE(i->identifier_flags))    error("Cannot re-assign functions or constants.\n");    -  if(i->run_time_type == T_MIXED) +  if(i->run_time_type == PIKE_T_MIXED)    {    Pike_sp[0].type=T_LVALUE;    Pike_sp[0].u.lval=(struct svalue *)GLOBAL_FROM_INT(tmp);    }else{    Pike_sp[0].type=T_SHORT_LVALUE;    Pike_sp[0].u.short_lval= (union anything *)GLOBAL_FROM_INT(tmp);    Pike_sp[0].subtype=i->run_time_type;    }    Pike_sp[1].type=T_VOID;    Pike_sp+=2;
pike.git/src/interpret_functions.h:729:   OPCODE1(F_ASSIGN_GLOBAL, "assign global")   {    struct identifier *i;    INT32 tmp=arg1 + Pike_fp->context.identifier_level;    if(!Pike_fp->current_object->prog)    error("Cannot access global variables in destructed object.\n");       i=ID_FROM_INT(Pike_fp->current_object->prog, tmp);    if(!IDENTIFIER_IS_VARIABLE(i->identifier_flags))    error("Cannot assign functions or constants.\n"); -  if(i->run_time_type == T_MIXED) +  if(i->run_time_type == PIKE_T_MIXED)    {    assign_svalue((struct svalue *)GLOBAL_FROM_INT(tmp), Pike_sp-1);    }else{    assign_to_short_svalue((union anything *)GLOBAL_FROM_INT(tmp),    i->run_time_type,    Pike_sp-1);    }   }   BREAK;   
pike.git/src/interpret_functions.h:751:   {    struct identifier *i;    INT32 tmp=arg1 + Pike_fp->context.identifier_level;    if(!Pike_fp->current_object->prog)    error("Cannot access global variables in destructed object.\n");       i=ID_FROM_INT(Pike_fp->current_object->prog, tmp);    if(!IDENTIFIER_IS_VARIABLE(i->identifier_flags))    error("Cannot assign functions or constants.\n");    -  if(i->run_time_type == T_MIXED) +  if(i->run_time_type == PIKE_T_MIXED)    {    struct svalue *s=(struct svalue *)GLOBAL_FROM_INT(tmp);    free_svalue(s);    Pike_sp--;    *s=*Pike_sp;    }else{    assign_to_short_svalue((union anything *)GLOBAL_FROM_INT(tmp),    i->run_time_type,    Pike_sp-1);    pop_stack();