diff --git a/module/language/tree-il/optimize.scm b/module/language/tree-il/optimize.scm index cb7bdf645..5e95ca1cb 100644 --- a/module/language/tree-il/optimize.scm +++ b/module/language/tree-il/optimize.scm @@ -256,7 +256,7 @@ it does not handle and , it should be called before (($ src () (and lc ($ ))) ;; This is an anonymous lambda that we're going to inline. The - ;; variable allocation process assumes globally unique gensyms to + ;; variable allocation process assumes globally unique gensyms, so ;; alpha-rename the lambda to avoid any collision with other ;; copies of it. (make-lambda src '() (alpha-rename lc)))