diff options
author | Keisuke Nishida <kxn30@po.cwru.edu> | 2001-06-26 15:46:40 +0000 |
---|---|---|
committer | Keisuke Nishida <kxn30@po.cwru.edu> | 2001-06-26 15:46:40 +0000 |
commit | fdc2839563bd8c821221a4869f27255ae77f757b (patch) | |
tree | 63bc043598fe6d9c2cac3d3c7251898cc306f5cd /libguile/async.c | |
parent | 36284627919a6968174b5f17369349187a2b4b1b (diff) | |
download | guile-fdc2839563bd8c821221a4869f27255ae77f757b.tar.gz |
* eval.c (scm_call_0, scm_call_1, scm_call_2, scm_call_3,
scm_apply_0, scm_apply_1, scm_apply_2, scm_apply_3): New functions.
Diffstat (limited to 'libguile/async.c')
-rw-r--r-- | libguile/async.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/async.c b/libguile/async.c index d93ce7d1a..e5946393c 100644 --- a/libguile/async.c +++ b/libguile/async.c @@ -363,7 +363,7 @@ SCM_DEFINE (scm_run_asyncs, "run-asyncs", 1, 0, 0, if (ASYNC_GOT_IT (a)) { SET_ASYNC_GOT_IT (a, 0); - scm_apply (ASYNC_THUNK (a), SCM_EOL, SCM_EOL); + scm_call_0 (ASYNC_THUNK (a)); } scm_mask_ints = 0; list_of_a = SCM_CDR (list_of_a); |