dmbcs/guile
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* eval.c (scm_call_0, scm_call_1, scm_call_2, scm_call_3,

Browse source 
scm_apply_0, scm_apply_1, scm_apply_2, scm_apply_3): New functions.
This commit is contained in:
Keisuke Nishida 2001-06-26 15:46:40 +00:00
commit fdc2839563
25 changed files with 167 additions and 105 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/load.c
View file

@ -119,7 +119,7 @@ SCM_DEFINE (scm_primitive_load, "primitive-load", 1, 0, 0,
SCM_EOL);
if (! SCM_FALSEP (hook))
scm_apply (hook, SCM_LIST1 (filename), SCM_EOL);
scm_call_1 (hook, filename);
{ /* scope */
SCM port, save_port;