pike.git/
src/
program.c
Branch:
Tag:
Non-build tags
All tags
No tags
2008-07-14
2008-07-14 11:49:10 by Henrik Grubbström (Grubba) <grubba@grubba.org>
23a14a0892365bbaebc4a3ae16b1afaf0a643e01 (
32
lines) (+
30
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Mark private symbols as local.
Rev: src/program.c:1.735
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.
734
2008/07/
13
19
:
06
:
23
grubba Exp $
+
|| $Id: program.c,v 1.
735
2008/07/
14
11
:
49
:
10
grubba Exp $
*/ #include "global.h"
4643:
dummy.total_time=0; #endif
+
if (flags & ID_PRIVATE) flags |= ID_INLINE;
+
ref.id_flags=flags; ref.identifier_offset=Pike_compiler->new_program->num_identifiers; ref.inherit_offset=0;
4772:
if (run_time_type == PIKE_T_FREE) dummy.func.offset = -1;
+
if (flags & ID_PRIVATE) flags |= ID_INLINE;
+
ref.id_flags=flags; ref.identifier_offset=Pike_compiler->new_program->num_identifiers; ref.inherit_offset=0;
5191:
} #endif
+
if (flags & ID_PRIVATE) flags |= ID_INLINE;
+
ref.id_flags=flags; ref.identifier_offset=Pike_compiler->new_program->num_identifiers; ref.inherit_offset=0;
5677:
debug_add_to_identifiers(fun); }
+
if (flags & ID_PRIVATE) flags |= ID_INLINE;
+
ref.inherit_offset = 0; ref.id_flags = flags; if ((overridden = override_identifier (&ref, name)) >= 0) {
5751:
debug_add_to_identifiers(fun);
+
if (flags & ID_PRIVATE) flags |= ID_INLINE;
+
ref.id_flags = flags; ref.identifier_offset = i; ref.inherit_offset = 0;
5795:
Inside #if 0
return j; } }
-
ref.id_flags = ID_PARENT_REF|ID_PROTECTED|ID_PRIVATE|ID_HIDDEN;
+
ref.id_flags = ID_PARENT_REF|ID_PROTECTED|ID_PRIVATE|ID_HIDDEN
|ID_INLINE
;
ref.identifier_offset = i; ref.inherit_offset = 0; add_to_identifier_references(ref);
7719:
static void run_init2(struct compilation *c) {
+
#if 0
+
int i;
+
struct program *p;
+
struct reference *refs;
+
#endif /* 0 */
debug_malloc_touch(c); Pike_compiler->compiler = c;
7739:
if(c->major>=0) change_compiler_compatibility(c->major, c->minor);
+
+
#if 0
+
/* Make all inherited private symbols that weren't overloaded
+
* in the first pass local.
+
*/
+
p = c->new_program;
+
i = p->num_identifier_references;
+
refs = p->identifier_references;
+
while (i--) {
+
if (refs[i].id_flags & ID_PRIVATE) refs[i].id_flags |= ID_INLINE;
}
-
+
#endif /* 0 */
+
}
static void run_exit(struct compilation *c) {