guile/guile-core/libguile init.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/05/18 17:29:36

Modified files:
        guile-core/libguile: init.c 

Log message:
        (scm_init_guile_1): Call `scm_init_goops' instead of
        `scm_init_oop_goops_goopscore_module'.  Call `scm_init_rdelim' and
        `scm_init_rw' prior to loading the startup files.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/init.c.diff?cvsroot=OldCVS&tr1=1.122&tr2=1.123&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/init.c
diff -u guile/guile-core/libguile/init.c:1.122 
guile/guile-core/libguile/init.c:1.123
--- guile/guile-core/libguile/init.c:1.122      Tue May 15 07:57:21 2001
+++ guile/guile-core/libguile/init.c    Fri May 18 17:29:36 2001
@@ -577,7 +577,7 @@
   scm_init_lang ();
   scm_init_script ();
 
-  scm_init_oop_goops_goopscore_module ();
+  scm_init_goops ();
   
   scm_initialized_p = 1;
 
@@ -588,13 +588,10 @@
   scm_stack_checking_enabled_p = SCM_STACK_CHECKING_P;
 #endif
 
-  scm_load_startup_files ();
-
-  /* these are located here, not from a deep understanding of the
-     module system, but as a way of avoiding segv and other
-     undesirable side effects that arise from various alternatives.  */
   scm_init_rdelim ();
   scm_init_rw ();
+
+  scm_load_startup_files ();
 }
 
 /* Record here whether SCM_BOOT_GUILE_1 has already been called.  This