summaryrefslogtreecommitdiff
path: root/libguile/async.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2004-09-22 17:41:37 +0000
committerMarius Vollmer <mvo@zagadka.de>2004-09-22 17:41:37 +0000
commitd2e53ed6f84df8c79f4bf5cf41d4f6d381bc065b (patch)
treedf14a633c6d8ac08ba098651a9164a0c991d8288 /libguile/async.c
parenta61f4e0c61695e17984b25b16fbf720b851b739c (diff)
downloadguile-d2e53ed6f84df8c79f4bf5cf41d4f6d381bc065b.tar.gz
*** empty log message ***
Diffstat (limited to 'libguile/async.c')
-rw-r--r--libguile/async.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/async.c b/libguile/async.c
index 333b8d0e1..35e8a5a66 100644
--- a/libguile/async.c
+++ b/libguile/async.c
@@ -149,7 +149,7 @@ scm_async_click ()
if (scm_root->block_asyncs == 0)
{
SCM asyncs;
- while (!SCM_NULLP(asyncs = scm_root->active_asyncs))
+ while (!scm_is_null(asyncs = scm_root->active_asyncs))
{
scm_root->active_asyncs = SCM_EOL;
do
@@ -157,9 +157,9 @@ scm_async_click ()
scm_call_0 (SCM_CAR (asyncs));
asyncs = SCM_CDR (asyncs);
}
- while (!SCM_NULLP(asyncs));
+ while (!scm_is_null(asyncs));
}
- for (asyncs = scm_root->signal_asyncs; !SCM_NULLP(asyncs);
+ for (asyncs = scm_root->signal_asyncs; !scm_is_null(asyncs);
asyncs = SCM_CDR (asyncs))
{
if (scm_is_true (SCM_CAR (asyncs)))