summaryrefslogtreecommitdiff
path: root/libguile/hooks.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/hooks.c')
-rw-r--r--libguile/hooks.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/hooks.c b/libguile/hooks.c
index 0e7749e7e..af317d9f3 100644
--- a/libguile/hooks.c
+++ b/libguile/hooks.c
@@ -130,7 +130,7 @@ hook_print (SCM hook, SCM port, scm_print_state *pstate)
scm_puts ("#<hook ", port);
scm_intprint (SCM_HOOK_ARITY (hook), 10, port);
scm_putc (' ', port);
- scm_intprint (SCM_UNPACK (hook), 16, port);
+ scm_uintprint (SCM_UNPACK (hook), 16, port);
ls = SCM_HOOK_PROCEDURES (hook);
while (SCM_NIMP (ls))
{