pike.git
/
src
/
program.c
version
»
Context lines:
10
20
40
80
file
none
3
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.
572
2006/
03
/
22
20
:
01
:
46
grubba
Exp $
+
|| $Id: program.c,v 1.
573
2006/
07
/
04
14
:
38
:
16
mast
Exp $
*/ #include "global.h"
-
RCSID("$Id: program.c,v 1.
572
2006/
03
/
22
20
:
01
:
46
grubba
Exp $");
+
RCSID("$Id: program.c,v 1.
573
2006/
07
/
04
14
:
38
:
16
mast
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:2469:
{ if(p->inherits[e].prog) free_program(p->inherits[e].prog); } if(p->inherits[e].parent) free_object(p->inherits[e].parent); } DOUBLEUNLINK(first_program, p);
-
#if defined(PIKE_USE_MACHINE_CODE) && defined(VALGRIND_DISCARD_TRANSLATIONS)
-
if(p->program) {
-
VALGRIND_DISCARD_TRANSLATIONS(p->program,
-
p->num_program*sizeof(p->program[0]));
-
}
-
#endif /* PIKE_USE_MACHINE_CODE && VALGRIND_DISCARD_TRANSLATIONS */
+
if(p->flags & PROGRAM_OPTIMIZED) { #ifdef PIKE_USE_MACHINE_CODE do { /* NOTE: Assumes all BAR's are before any FOO. */ #define BAR(NUMTYPE,TYPE,ARGTYPE,NAME) \ if (p->NAME) mexec_free(p->NAME); #define FOO(NUMTYPE,TYPE,ARGTYPE,NAME) \ if (p->NAME) { \ dmfree(p->NAME); \