mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00
Code Activity

* init.c (scm_init_guile_1): Call the goops module registration

Browse source 
function.
Added #include "libguile/goops.h".
This commit is contained in:
Mikael Djurfeldt 2000-10-25 14:49:56 +00:00
parent 0518d3e277
commit acfee8e1d0
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

@ -79,6 +79,7 @@
#include "libguile/fports.h" #include "libguile/fports.h"
#include "libguile/gc.h" #include "libguile/gc.h"
#include "libguile/gdbint.h" #include "libguile/gdbint.h"
#include "libguile/goops.h"
#include "libguile/gsubr.h" #include "libguile/gsubr.h"
#include "libguile/hash.h" #include "libguile/hash.h"
#include "libguile/hashtab.h" #include "libguile/hashtab.h"
@ -585,6 +586,9 @@ scm_init_guile_1 (SCM_STACKITEM *base)
scm_init_dynamic_linking (); scm_init_dynamic_linking ();
scm_init_lang (); scm_init_lang ();
scm_init_script (); scm_init_script ();
scm_init_oop_goops_goopscore_module ();
scm_initialized_p = 1; scm_initialized_p = 1;
scm_block_gc = 0; /* permit the gc to run */ scm_block_gc = 0; /* permit the gc to run */