pike.git / src / interpret.c

version» Context lines:

pike.git/src/interpret.c:1:   /*\   ||| This file a part of Pike, and is copyright by Fredrik Hubinette   ||| Pike is distributed as GPL (General Public License)   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.57 1998/03/05 13:19:39 grubba Exp $"); + RCSID("$Id: interpret.c,v 1.58 1998/03/05 13:23:53 grubba Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"   #include "svalue.h"   #include "array.h"   #include "mapping.h"   #include "error.h"   #include "language.h"   #include "stralloc.h"   #include "constants.h"
pike.git/src/interpret.c:263:       case T_MULTISET:    if(IS_ZERO(from))    multiset_delete(lval->u.multiset, lval+1);    else    multiset_insert(lval->u.multiset, lval+1);    break;       case T_VOID:    error("Indexing a void.\n"); /* Grubba */ -  return(0); +  break;       default:    if(IS_ZERO(lval))    error("Indexing the NULL value.\n"); /* Per */    else    error("Indexing a basic type.\n");    }   }      union anything *get_pointer_if_this_type(struct svalue *lval, TYPE_T t)