From 80fc43f2cf12c7a21a0533cc84e91059ef9d8170 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 22 Oct 2011 13:25:11 +0200 Subject: [PATCH] Initialize `get_internal_run_time' before it is used. * libguile/init.c (scm_i_init_guile): Call `scm_init_stime' before `scm_init_gc'. Fixes reported by Bake Timmons. --- libguile/init.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/libguile/init.c b/libguile/init.c index 3dd966f0e..8e3888d3e 100644 --- a/libguile/init.c +++ b/libguile/init.c @@ -435,7 +435,8 @@ scm_i_init_guile (void *base) scm_init_objprop (); scm_init_promises (); /* requires smob_prehistory */ scm_init_hooks (); /* Requires smob_prehistory */ - scm_init_gc (); /* Requires hooks */ + scm_init_stime (); + scm_init_gc (); /* Requires hooks and `get_internal_run_time' */ scm_init_gc_protect_object (); /* requires threads_prehistory */ scm_init_gdbint (); /* Requires strports, gc_protect_object */ scm_init_gettext (); @@ -481,7 +482,6 @@ scm_i_init_guile (void *base) scm_init_load (); /* Requires strings */ scm_init_print (); /* Requires strings, struct, smob */ scm_init_read (); - scm_init_stime (); scm_init_strorder (); scm_init_srfi_13 (); scm_init_srfi_14 (); /* Requires smob_prehistory */