*.[ch]: make a distinction between SCM as a generic

[bpt/guile.git] / libguile / print.h

diff --git a/libguile/print.h b/libguile/print.h
index cca9897..f15d330 100644 (file)
--- a/libguile/print.h
+++ b/libguile/print.h
@@ -100,7 +100,8 @@ typedef struct scm_print_state {
 
 extern SCM scm_print_state_vtable;
 
-extern SCM scm_tc16_port_with_ps;
+// ? scm or long?  print.h and print.c disagree
+extern long scm_tc16_port_with_ps;
 
 extern SCM scm_print_options (SCM setting);
 SCM scm_make_print_state (void);