mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

* init.c (scm_boot_guile_1): Added `scm_init_hooks'.

Browse source
This commit is contained in:
Mikael Djurfeldt 2000-04-21 23:13:44 +00:00
parent abd95148aa
commit 2b9c869029
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/init.c
View file

@ -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