mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 22:10:21 +02:00
Code Activity

* init.c: Added #include "modules.h"

Browse source 
(scm_boot_guile_1): Call scm_init_modules.
(invoke_main_func): Call scm_post_boot_init_modules.
This commit is contained in:
Mikael Djurfeldt 1998-11-22 12:04:27 +00:00
parent bafece68d3
commit 345acb3967
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/init.c
View file

@ -80,6 +80,7 @@
#include "load.h"
#include "macros.h"
#include "mallocs.h"
#include "modules.h"
#include "net_db.h"
#include "numbers.h"
#include "objects.h"
@ -448,6 +449,7 @@ scm_boot_guile_1 (base, closure)
scm_init_list ();
scm_init_macros ();
scm_init_mallocs ();
scm_init_modules ();
scm_init_net_db ();
scm_init_numbers ();
scm_init_objprop ();
@ -540,6 +542,8 @@ invoke_main_func (body_data)
scm_load_startup_files ();
scm_post_boot_init_modules ();
(*closure->main_func) (closure->closure, closure->argc, closure->argv);
/* never reached */