fix pre-GC_set_start_callback compilation

* libguile/gc.c: Move declaration of run_before_gc_hook up.

diff --git a/libguile/gc.c b/libguile/gc.c
index 341af6f..7d2724c 100644 (file)
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -198,6 +198,13 @@ scm_t_c_hook scm_after_sweep_c_hook;
 scm_t_c_hook scm_after_gc_c_hook;
 
 
+static void
+run_before_gc_c_hook (void)
+{
+  scm_c_hook_run (&scm_before_gc_c_hook, NULL);
+}
+
+
 /* GC Statistics Keeping
  */
 unsigned long scm_gc_ports_collected = 0;
@@ -550,12 +557,6 @@ scm_gc_unregister_roots (SCM *b, unsigned long n)
     scm_gc_unregister_root (p);
 }
 
-static void
-run_before_gc_c_hook (void)
-{
-  scm_c_hook_run (&scm_before_gc_c_hook, NULL);
-}
-
 \f