Revert change that broke the build.

diff --git a/src/runtime/mit-syntax.scm b/src/runtime/mit-syntax.scm
index 87c19b46a7711e06e98b37c71e22355300ee6c89..43d244ea2ef2d791c0e6809529ea6c44e809c097 100644 (file)
--- a/src/runtime/mit-syntax.scm
+++ b/src/runtime/mit-syntax.scm
@@ -64,8 +64,9 @@ USA.
   (compile-lambda scode-lambda-name:unnamed (cadr form) (cddr form) senv))
 
 (define (compiler:named-lambda form senv)
-  (syntax-check '(_ (symbol . mit-bvl) + form) form)
-  (compile-lambda (caadr form) (cdadr form) (cddr form) senv))
+  (syntax-check '(_ (identifier . mit-bvl) + form) form)
+  (compile-lambda (identifier->symbol (caadr form)) (cdadr form) (cddr form)
+                 senv))
 
 (define (compile-lambda name bvl body senv)
   (let ((senv (make-internal-senv senv)))