core: Remove vm_call_lambda.
* mes.c (vm_call_lambda): Remove. (call_lambda): Use begin_env.
This commit is contained in:
parent
33ac19d7df
commit
cc58cf2e04
8
mes.c
8
mes.c
|
@ -349,12 +349,6 @@ vm_evlis_env ()
|
|||
return cons (r2, r1);
|
||||
}
|
||||
|
||||
SCM
|
||||
vm_call_lambda ()
|
||||
{
|
||||
return vm_call (vm_begin_env, r1, cell_undefined, r0);
|
||||
}
|
||||
|
||||
SCM
|
||||
call_lambda (SCM e, SCM x, SCM aa, SCM a) ///((internal))
|
||||
{
|
||||
|
@ -363,7 +357,7 @@ call_lambda (SCM e, SCM x, SCM aa, SCM a) ///((internal))
|
|||
r0 = cl;
|
||||
r2 = a;
|
||||
r3 = aa;
|
||||
return vm_call_lambda ();
|
||||
return vm_begin_env ();
|
||||
}
|
||||
|
||||
SCM
|
||||
|
|
Loading…
Reference in a new issue