boot the VM very early in init.c

* libguile/init.c (scm_i_init_guile): Now that the VM doesn't depend on
  smobs, we can boot it before anything.

diff --git a/libguile/init.c b/libguile/init.c
index b3d67a9b9293f1fec45c0d4b9f482a82df71b228..abca490486b8a1d7896164d7043cfc616ef44583 100644 (file)
--- a/libguile/init.c
+++ b/libguile/init.c
@@ -448,6 +448,11 @@ scm_i_init_guile (SCM_STACKITEM *base)
   scm_modules_prehistory ();
   scm_init_array_handle ();
   scm_bootstrap_bytevectors ();   /* Requires array-handle */
+  scm_bootstrap_instructions ();
+  scm_bootstrap_objcodes ();
+  scm_bootstrap_programs ();
+  scm_bootstrap_vm ();
+
   scm_init_strings ();            /* Requires array-handle */
   scm_init_struct ();             /* Requires strings */
   scm_smob_prehistory ();
@@ -522,11 +527,6 @@ scm_i_init_guile (SCM_STACKITEM *base)
   scm_init_arrays ();    /* Requires smob_prehistory, array-handle */
   scm_init_array_map ();
 
-  scm_bootstrap_instructions ();
-  scm_bootstrap_objcodes ();
-  scm_bootstrap_programs ();
-  scm_bootstrap_vm ();
-
   scm_init_frames ();   /* Requires smob_prehistory */
   scm_init_stacks ();   /* Requires strings, struct, frames */
   scm_init_symbols ();