mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00
Code Activity

(environment_default_folder,

Browse source 
environment_default_observer): Do not use gh_call3, gh_call1.
This commit is contained in:
Marius Vollmer 2005-06-12 12:33:01 +00:00
parent c70c62a636
commit 9b26d381c1
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/environments.c
View file

@ -163,7 +163,7 @@ scm_c_environment_ref (SCM env, SCM sym)
static SCM static SCM
environment_default_folder (SCM proc, SCM symbol, SCM value, SCM tail) environment_default_folder (SCM proc, SCM symbol, SCM value, SCM tail)
{ {
return gh_call3 (proc, symbol, value, tail); return scm_call_3 (proc, symbol, value, tail);
} }
@ -364,7 +364,7 @@ scm_c_environment_cell(SCM env, SCM sym, int for_write)
static void static void
environment_default_observer (SCM env, SCM proc) environment_default_observer (SCM env, SCM proc)
{ {
gh_call1 (proc, env); scm_call_1 (proc, env);
} }