pike.git / src / las.c

version» Context lines:

pike.git/src/las.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: las.c,v 1.414 2008/05/24 21:45:48 grubba Exp $ + || $Id: las.c,v 1.415 2008/05/30 11:20:44 grubba Exp $   */      #include "global.h"   #include "interpret.h"   #include "las.h"   #include "array.h"   #include "object.h"   #include "stralloc.h"   #include "dynamic_buffer.h"   #include "lex.h"
pike.git/src/las.c:1208:    return res;   #endif /* 0 */   }      node *debug_mkthisnode(struct program *parent_prog, int inherit_num)   {    struct program_state *state;    node *res;      #ifdef PIKE_DEBUG -  if ((inherit_num < 0) || (inherit_num > 65535)) { +  if ((inherit_num < -1) || (inherit_num > 65535)) {    Pike_fatal("This is bad: %p, %d\n", parent_prog, inherit_num);    }   #endif /* PIKE_DEBUG */       res = mkemptynode();    res->token = F_THIS;    type_stack_mark(); -  push_object_type(!!inherit_num, parent_prog->inherits[inherit_num].prog->id); +  if (inherit_num >= 0) { +  push_object_type(1, parent_prog->inherits[inherit_num].prog->id); +  } else { +  push_object_type(0, parent_prog->id); +  }    res->type = pop_unfinished_type();    res->tree_info = res->node_info = OPT_NOT_CONST;      #ifdef __CHECKER__    _CDR(res) = 0;   #endif    res->u.integer.a = parent_prog->id;    res->u.integer.b = inherit_num;       /* Bzot-i-zot */