~ chicken-core (chicken-5) f7b342e382954a295838eb5b44cb0a3d34f1fa7b

commit f7b342e382954a295838eb5b44cb0a3d34f1fa7b
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Jul 10 00:31:07 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sat Jul 10 00:31:07 2010 +0200

    dumping heap state crashed for funny non-8aligned byte-vector

diff --git a/runtime.c b/runtime.c
index f1448287..b83538f3 100644
--- a/runtime.c
+++ b/runtime.c
@@ -8938,6 +8938,8 @@ dump_heap_state_2(void *dummy)
       case C_BUCKET_TYPE: C_fprintf(C_stderr,         C_text("bucket         ")); break;
       case C_VECTOR_TYPE: C_fprintf(C_stderr,         C_text("vector         ")); break;
       case C_BYTEVECTOR_TYPE: C_fprintf(C_stderr,     C_text("bytevector     ")); break;
+	/* XXX this is sort of funny: */
+      case C_BYTEBLOCK_BIT: C_fprintf(C_stderr,        C_text("blob           ")); break;
       default:
 	x = b->key;