pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:1:   /* -*- c -*-   || 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: builtin.cmod,v 1.139 2003/08/03 00:52:09 mast Exp $ + || $Id: builtin.cmod,v 1.140 2003/08/20 11:55:49 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:843:    */       for(e = p->num_identifier_references; e--; )    {    struct identifier *id;    if (p->identifier_references[e].id_flags & ID_HIDDEN)    continue;       id = ID_FROM_INT(p, e);    if (IDENTIFIER_IS_CONSTANT(id->identifier_flags) && +  (id->func.offset >= 0) &&    is_eq( & PROG_FROM_INT(p, e)->constants[id->func.offset].sval,    func))    REF_RETURN id->name;    }   #ifdef PIKE_DEBUG    if (d_flag>5) {    fprintf(stderr,    "Failed to find symbol for program %p\n"    "Parent program info:\n",    func->u.program);