summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 8475d6afb..d50df2d24 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -78,7 +78,7 @@ static const char *iflagnames[] =
SCM_SYMBOL (sym_reader, "reader");
scm_t_option scm_print_opts[] = {
- { SCM_OPTION_SCM, "closure-hook", SCM_UNPACK (SCM_BOOL_F),
+ { SCM_OPTION_SCM, "closure-hook", (unsigned long) SCM_BOOL_F,
"Hook for printing closures (should handle macros as well)." },
{ SCM_OPTION_BOOLEAN, "source", 0,
"Print closures with source." },
@@ -92,7 +92,6 @@ scm_t_option scm_print_opts[] = {
"'reader' quotes them when the reader option 'keywords' is not '#f'."
},
{ 0 },
-
};
SCM_DEFINE (scm_print_options, "print-options-interface", 0, 1, 0,