pike.git/
src/
module.c
Branch:
Tag:
Non-build tags
All tags
No tags
2003-03-26
2003-03-26 18:52:04 by Martin Nilsson <mani@lysator.liu.se>
00538d7e797169ae22e9268c40647e4202277ddf (
11
lines) (+
8
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
Takes less space. Still ugly.
Rev: src/module.c:1.22
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: module.c,v 1.
21
2003/
02
/
05
13
:
05
:
37
grubba
Exp $
+
|| $Id: module.c,v 1.
22
2003/
03
/
26
18
:
52
:
04
nilsson
Exp $
*/ #include "global.h"
25:
#include "post_modules/modlist_headers.h" #endif
-
RCSID("$Id: module.c,v 1.
21
2003/
02
/
05
13
:
05
:
37
grubba
Exp $");
+
RCSID("$Id: module.c,v 1.
22
2003/
03
/
26
18
:
52
:
04
nilsson
Exp $");
/* Define this to trace the initialization and cleanup of static modules. */ /* #define TRACE_MODULE */
51:
#ifndef IN_TPIKE #include "post_modules/modlist.h" #endif
-
,{ "Builtin2", init_main, exit_main }
+
}; void init_modules(void)
88:
free_program(p); free_string(lex.current_file); lex = save_lex;
+
+
init_main();
} void exit_modules(void) { JMP_BUF recovery; int e;
-
+
+
exit_main();
+
for(e=NELEM(module_list)-1;e>=0;e--) { if(SETJMP(recovery))