summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-15 11:47:48 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2000-05-15 11:47:48 +0000
commitf5f2dcffbea9a33f0e1d2adbe07b20fcf7ac3322 (patch)
treee71c3be5e7b8d307a9a608fd71ff9fe9fc7e5d23 /libguile/print.c
parentae09e7ac288fd8fd467d3278bff2e9ccbefb862d (diff)
* Wrapped deprecated code between #if (SCM_DEBUG_DEPRECATED == 0) #endif.
* Replace use of deprecated macros SCM_INPORTP, SCM_OUTPORTP, SCM_ICHRP.
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 5222da027..77782aaf3 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -1090,7 +1090,7 @@ SCM_DEFINE (scm_get_print_state, "get-print-state", 1, 0, 0,
{
if (SCM_PORT_WITH_PS_P (port))
return SCM_PORT_WITH_PS_PS (port);
- if (SCM_OUTPORTP (port))
+ if (SCM_OUTPUT_PORT_P (port))
return SCM_BOOL_F;
RETURN_SCM_WTA (1,port);
}