diff options
Diffstat (limited to 'libguile/ports.c')
-rw-r--r-- | libguile/ports.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/ports.c b/libguile/ports.c index 4ad51bc06..d628f47bc 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -1604,7 +1604,7 @@ scm_port_print (SCM exp, SCM port, scm_print_state *pstate SCM_UNUSED) scm_print_port_mode (exp, port); scm_puts (type, port); scm_putc (' ', port); - scm_intprint (SCM_CELL_WORD_1 (exp), 16, port); + scm_uintprint (SCM_CELL_WORD_1 (exp), 16, port); scm_putc ('>', port); return 1; } |