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.
600
2006/
03
/
22
19
:
59
:
41
grubba
Exp $
+
|| $Id: program.c,v 1.
601
2006/
07
/
04
14
:
38
:
17
mast
Exp $
*/ #include "global.h" #include "program.h" #include "object.h" #include "dynamic_buffer.h" #include "pike_types.h" #include "stralloc.h" #include "las.h" #include "lex.h"
pike.git/src/program.c:2509:
DOUBLEUNLINK(first_program, p); #ifdef WITH_FACETS if(p->facet_group) { free_object(p->facet_group); } #endif
-
#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); \