Branch: Tag:

2004-08-13

2004-08-13 13:05:41 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Backported program_{indices,values}() fix from Pike 7.7.

Rev: src/program.c:1.491

2:   || 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.490 2004/05/27 16:49:32 grubba Exp $ + || $Id: program.c,v 1.491 2004/08/13 13:05:41 grubba Exp $   */      #include "global.h" - RCSID("$Id: program.c,v 1.490 2004/05/27 16:49:32 grubba Exp $"); + RCSID("$Id: program.c,v 1.491 2004/08/13 13:05:41 grubba Exp $");   #include "program.h"   #include "object.h"   #include "dynamic_buffer.h"
4635:    struct array *res;    for (e = p->num_identifier_references; e--; ) {    struct identifier *id; -  if (p->identifier_references[e].id_flags & ID_HIDDEN) { +  if (p->identifier_references[e].id_flags & +  (ID_HIDDEN|ID_STATIC|ID_PRIVATE)) {    continue;    }    id = ID_FROM_INT(p, e);
4663:    struct array *res;    for(e = p->num_identifier_references; e--; ) {    struct identifier *id; -  if (p->identifier_references[e].id_flags & ID_HIDDEN) { +  if (p->identifier_references[e].id_flags & +  (ID_HIDDEN|ID_STATIC|ID_PRIVATE)) {    continue;    }    id = ID_FROM_INT(p, e);