summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
authorHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-04 00:17:18 +0000
committerHan-Wen Nienhuys <hanwen@lilypond.org>2002-08-04 00:17:18 +0000
commitc8a1bdc460f892847d0fb3f1321cdeb305160bf8 (patch)
tree5095a98a73d57cf0ce9ed56ed93b8c27bf7527e7 /libguile/print.c
parentc3164ca85ed8c43a1732a828fc299a05d556a1f3 (diff)
downloadguile-c8a1bdc460f892847d0fb3f1321cdeb305160bf8.tar.gz
new gc
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 63389f1f5..a5e0fc818 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -739,7 +739,7 @@ scm_ipruk (char *hdr, SCM ptr, SCM port)
{
scm_puts ("#<unknown-", port);
scm_puts (hdr, port);
- if (scm_cellp (ptr))
+ if (scm_in_heap_p (ptr))
{
scm_puts (" (0x", port);
scm_intprint (SCM_CELL_WORD_0 (ptr), 16, port);