diff options
author | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-04 00:17:18 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@lilypond.org> | 2002-08-04 00:17:18 +0000 |
commit | c8a1bdc460f892847d0fb3f1321cdeb305160bf8 (patch) | |
tree | 5095a98a73d57cf0ce9ed56ed93b8c27bf7527e7 /libguile/print.c | |
parent | c3164ca85ed8c43a1732a828fc299a05d556a1f3 (diff) | |
download | guile-c8a1bdc460f892847d0fb3f1321cdeb305160bf8.tar.gz |
new gc
Diffstat (limited to 'libguile/print.c')
-rw-r--r-- | libguile/print.c | 2 |
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); |