[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
05/05: compile: Adjust for Guile 3.
From: |
guix-commits |
Subject: |
05/05: compile: Adjust for Guile 3. |
Date: |
Sat, 1 Jun 2019 19:38:45 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit b2cddc6fb1df4bbde23149b3a36ac4cdfe1bd535
Author: Ludovic Courtès <address@hidden>
Date: Sun Jun 2 01:32:12 2019 +0200
compile: Adjust for Guile 3.
* guix/build/compile.scm (%default-optimizations): Adjust to the new
names in Guile 2.9.2.
---
guix/build/compile.scm | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/guix/build/compile.scm b/guix/build/compile.scm
index 9e31be9..794f123 100644
--- a/guix/build/compile.scm
+++ b/guix/build/compile.scm
@@ -40,8 +40,12 @@
(define %default-optimizations
;; Default optimization options (equivalent to -O2 on Guile 2.2).
- (append (tree-il-default-optimization-options)
- (cps-default-optimization-options)))
+ (append (if (defined? 'tree-il-default-optimization-options)
+ (tree-il-default-optimization-options) ;Guile 2.2
+ (tree-il-optimizations)) ;Guile 3
+ (if (defined? 'cps-default-optimization-options)
+ (cps-default-optimization-options) ;Guile 2.2
+ (cps-optimizations)))) ;Guile 3
(define %lightweight-optimizations
;; Lightweight optimizations (like -O0, but with partial evaluation).