pike.git/src/program.c:1:
/*\
||| This file a part of Pike, and is copyright by Fredrik Hubinette
||| Pike is distributed as GPL (General Public License)
||| See the files COPYING and DISCLAIMER for more information.
\*/
/**/
#include "global.h"
- RCSID("$Id: program.c,v 1.234 2004/08/13 13:05:35 grubba Exp $");
+ RCSID("$Id: program.c,v 1.235 2004/09/27 15:11:58 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:1329: Inside #if defined(SHARED_NODES)
#ifdef SHARED_NODES
/* free(node_hash.table); */
#endif /* SHARED_NODES */
#define POP
#include "compilation.h"
exit_type_stack();
+ free_all_nodes();
+
compilation_depth--;
exit_threads_disable(NULL);
- free_all_nodes();
-
+
return prog;
}
/*
* Finish this program, returning the newly built program
*/
struct program *debug_end_program(void)
{
return end_first_pass(1);
}