pike.git / src / program.c

version» Context lines:

pike.git/src/program.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: program.c,v 1.543 2003/12/30 09:56:28 grubba Exp $ + || $Id: program.c,v 1.544 2003/12/30 10:02:46 grubba Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.543 2003/12/30 09:56:28 grubba Exp $"); + RCSID("$Id: program.c,v 1.544 2003/12/30 10:02:46 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"   #include "pike_types.h"   #include "stralloc.h"   #include "las.h"   #include "language.h"   #include "lex.h"   #include "pike_macros.h"   #include "fsort.h"
pike.git/src/program.c:5010:    struct pike_string *lfun_name = lfun_strings[lfun];    unsigned int flags = 0;    struct identifier *id;    int i =    really_low_find_shared_string_identifier(lfun_name,    dmalloc_touch(struct program *,    p),    SEE_STATIC);    if (i < 0) return i;    id = ID_FROM_INT(p, i); -  if (!IDENTIFIER_IS_FUNCTION(id->identifier_flags) || -  (IDENTIFIER_IS_PIKE_FUNCTION(id->identifier_flags) && -  id->func.offset == -1)) { -  /* Non function or prototype. */ +  if (IDENTIFIER_IS_PIKE_FUNCTION(id->identifier_flags) && +  (id->func.offset == -1)) { +  /* Function prototype. */    return -1;    }    return i;   }      int lfun_lookup_id(struct pike_string *lfun_name)   {    struct svalue *id = low_mapping_string_lookup(lfun_ids, lfun_name);    if (!id) return -1;    if (id->type == T_INT) return id->u.integer;