summaryrefslogtreecommitdiff
path: root/libguile/init.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/init.c')
-rw-r--r--libguile/init.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/init.c b/libguile/init.c
index 76e5a97a8..15b106585 100644
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -81,6 +81,7 @@
#include "libguile/gsubr.h"
#include "libguile/hash.h"
#include "libguile/hashtab.h"
+#include "libguile/hooks.h"
#ifdef GUILE_ISELECT
#include "libguile/iselect.h"
#endif
@@ -489,6 +490,7 @@ scm_boot_guile_1 (SCM_STACKITEM *base, struct main_func_closure *closure)
#else
scm_init_storage (0, 0);
#endif
+ scm_weaks_prehistory (); /* Must come after scm_init_storage */
scm_init_subr_table ();
scm_init_root ();
#ifdef USE_THREADS
@@ -512,10 +514,11 @@ scm_boot_guile_1 (SCM_STACKITEM *base, struct main_func_closure *closure)
scm_init_fluids ();
scm_init_backtrace (); /* Requires fluids */
scm_init_fports ();
- scm_init_gc ();
scm_init_gdbint ();
scm_init_hash ();
scm_init_hashtab ();
+ scm_init_hooks ();
+ scm_init_gc (); /* Requires hooks */
#ifdef GUILE_ISELECT
scm_init_iselect ();
#endif