diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-09-22 17:41:37 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-09-22 17:41:37 +0000 |
commit | d2e53ed6f84df8c79f4bf5cf41d4f6d381bc065b (patch) | |
tree | df14a633c6d8ac08ba098651a9164a0c991d8288 /libguile/deprecation.c | |
parent | a61f4e0c61695e17984b25b16fbf720b851b739c (diff) | |
download | guile-d2e53ed6f84df8c79f4bf5cf41d4f6d381bc065b.tar.gz |
*** empty log message ***
Diffstat (limited to 'libguile/deprecation.c')
-rw-r--r-- | libguile/deprecation.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/deprecation.c b/libguile/deprecation.c index d33e6b5ae..daa02c06d 100644 --- a/libguile/deprecation.c +++ b/libguile/deprecation.c @@ -106,7 +106,7 @@ SCM_DEFINE(scm_issue_deprecation_warning, SCM nl = scm_from_locale_string ("\n"); SCM msgs_nl = SCM_EOL; char *c_msgs; - while (SCM_CONSP (msgs)) + while (scm_is_pair (msgs)) { if (msgs_nl != SCM_EOL) msgs_nl = scm_cons (nl, msgs_nl); |