[Guile-commits] 10/16: Tweak optimization order

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit e8b883035d6febdbe5a98442c6cf01c5733ec79c
Author: Andy Wingo <address@hidden>
Date:   Wed Nov 1 21:26:11 2017 +0100

    Tweak optimization order
    
    * module/language/cps/optimize.scm (optimize-first-order-cps): Move up
      the simplify-primcalls pass, to allow DCE to take away unneeded
      constants.  An incremental step
---
 module/language/cps/optimize.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/module/language/cps/optimize.scm b/module/language/cps/optimize.scm
index b1cbc89..c005de9 100644
--- a/module/language/cps/optimize.scm
+++ b/module/language/cps/optimize.scm
@@ -1,6 +1,6 @@
 ;;; Continuation-passing style (CPS) intermediate language (IL)
 
-;; Copyright (C) 2013, 2014, 2015 Free Software Foundation, Inc.
+;; Copyright (C) 2013, 2014, 2015, 2017 Free Software Foundation, Inc.
 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -106,13 +106,13 @@
 (define-optimizer optimize-first-order-cps
   (specialize-numbers #:specialize-numbers? #t)
   (hoist-loop-invariant-code #:licm? #t)
+  (specialize-primcalls #:specialize-primcalls? #t)
   (eliminate-common-subexpressions #:cse? #t)
   (eliminate-dead-code #:eliminate-dead-code? #t)
   ;; Running simplify here enables rotate-loops to do a better job.
   (simplify #:simplify? #t)
   (rotate-loops #:rotate-loops? #t)
-  (simplify #:simplify? #t)
-  (specialize-primcalls #:specialize-primcalls? #t))
+  (simplify #:simplify? #t))
 
 (define (cps-default-optimization-options)
   (list ;; #:split-rec? #t