doesn't compile with ./configure --enable-guile-debug

[Chris Cramer]

Here is a patch that fixes it.

Index: libguile/gc.c
===================================================================
RCS file: /cvsroot/guile/guile/guile-core/libguile/gc.c,v
retrieving revision 1.208.2.1
diff -u -r1.208.2.1 gc.c
--- libguile/gc.c       2001/07/09 07:31:04     1.208.2.1
+++ libguile/gc.c       2001/08/16 20:27:52
@@ -98,6 +98,8 @@
 
 
 
+static long int heap_segment (SCM obj);
+
 #if (SCM_DEBUG_CELL_ACCESSES == 1)
 
 scm_t_bits scm_tc16_allocated;
@@ -542,7 +544,7 @@
        {
          fprintf (stderr, 
                   "map_free_list: can't find segment containing cell %lux\n",
-                  (unsigned long int) SCM_UNPACK (cell));
+                  (unsigned long int) SCM_UNPACK (f));
          abort ();
        }
       else if (this_seg != last_seg)

-- 
C. Ray C. aka Christopher Cramer
address@hidden
http://www.pyro.net/~crayc/