guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 10/10: Disable CPS optimization passes


From: Andy Wingo
Subject: [Guile-commits] 10/10: Disable CPS optimization passes
Date: Thu, 04 Jun 2015 22:57:52 +0000

wingo pushed a commit to branch master
in repository guile.

commit 6f4487f268e27020084182f8478741793b374e1d
Author: Andy Wingo <address@hidden>
Date:   Fri Jun 5 00:54:18 2015 +0200

    Disable CPS optimization passes
    
    * module/language/cps/compile-bytecode.scm (compile-bytecode): Don't
      bother running the CPS optimization passes, as they are redundant
      with CPS2.
---
 module/language/cps/compile-bytecode.scm |    8 +++++++-
 1 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/module/language/cps/compile-bytecode.scm 
b/module/language/cps/compile-bytecode.scm
index 039aa5b..86a3db7 100644
--- a/module/language/cps/compile-bytecode.scm
+++ b/module/language/cps/compile-bytecode.scm
@@ -510,7 +510,13 @@
 
 (define (compile-bytecode exp env opts)
   ;; See comment in `optimize' about the use of set!.
-  (set! exp (optimize exp opts))
+
+  ;; Since CPS2's optimization pass replaces CPS and uses less memory,
+  ;; we disable the optimization pass for now.  We'll remove it once
+  ;; we're sure.
+  ;;
+  ;; (set! exp (optimize exp opts))
+
   (set! exp (convert-closures exp))
   ;; first-order optimization should go here
   (set! exp (reify-primitives exp))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]