summaryrefslogtreecommitdiff
path: root/libguile/hooks.c
diff options
context:
space:
mode:
authorKeisuke Nishida <kxn30@po.cwru.edu>2001-06-26 15:46:40 +0000
committerKeisuke Nishida <kxn30@po.cwru.edu>2001-06-26 15:46:40 +0000
commitfdc2839563bd8c821221a4869f27255ae77f757b (patch)
tree63bc043598fe6d9c2cac3d3c7251898cc306f5cd /libguile/hooks.c
parent36284627919a6968174b5f17369349187a2b4b1b (diff)
downloadguile-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/hooks.c')
-rw-r--r--libguile/hooks.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/hooks.c b/libguile/hooks.c
index f0713f5eb..120ef1287 100644
--- a/libguile/hooks.c
+++ b/libguile/hooks.c
@@ -307,7 +307,7 @@ scm_c_run_hook (SCM hook, SCM args)
SCM procs = SCM_HOOK_PROCEDURES (hook);
while (SCM_NIMP (procs))
{
- scm_apply (SCM_CAR (procs), args, SCM_EOL);
+ scm_apply_0 (SCM_CAR (procs), args);
procs = SCM_CDR (procs);
}
}