wingo pushed a commit to branch wip-2.1.2
in repository guile.
commit 3f345f564f1d27a75bed9664ab6eaf738c19f364
Author: Andy Wingo <[email protected]>
Date: Wed Oct 28 10:07:38 2015 +0000
Run CSE to clean up after closure conversion
* module/language/cps/optimize.scm: Enable CSE over first-order CPS.
---
module/language/cps/optimize.scm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/module/language/cps/optimize.scm b/module/language/cps/optimize.scm
index 8777222..571d5ff 100644
--- a/module/language/cps/optimize.scm
+++ b/module/language/cps/optimize.scm
@@ -105,7 +105,7 @@
(define-optimizer optimize-first-order-cps
(hoist-loop-invariant-code #:licm? #t)
- ;; FIXME: CSE here to eliminate duplicate free-ref terms.
+ (eliminate-common-subexpressions #:cse? #t)
(eliminate-dead-code #:eliminate-dead-code? #t)
(rotate-loops #:rotate-loops? #t)
(simplify #:simplify? #t))
