core: Remove make_lambda.

* mes.c (make_lambda): Remove.

diff --git a/mes.c b/mes.c
index 0c0f12c3aa53e76d2a7f0ac00d584d2c408ebb1f..ad2cd856754630707a3997ae1b6ff8af2964a1d7 100644 (file)
--- a/mes.c
+++ b/mes.c
@@ -1114,12 +1114,6 @@ mes_environment () ///((internal))
   return mes_stack (a);
 }
 
-SCM
-make_lambda (SCM args, SCM body)
-{
-  return cons (cell_symbol_lambda, cons (args, body));
-}
-
 SCM
 make_closure (SCM args, SCM body, SCM a)
 {