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
[EMAIL PROTECTED]
http://www.pyro.net/~crayc/
_______________________________________________
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile
