[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: fio: Disable native CPU compiler optimizations.
From: |
guix-commits |
Subject: |
03/03: gnu: fio: Disable native CPU compiler optimizations. |
Date: |
Sat, 6 Nov 2021 12:52:06 -0400 (EDT) |
mbakke pushed a commit to branch master
in repository guix.
commit 290a7664b58d2a018096c6388ae3468eb4cd88ec
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Sat Nov 6 00:09:30 2021 +0100
gnu: fio: Disable native CPU compiler optimizations.
* gnu/packages/benchmark.scm (fio)[arguments]: Add #:configure-flags.
Adjust
configure phase accordingly.
---
gnu/packages/benchmark.scm | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/gnu/packages/benchmark.scm b/gnu/packages/benchmark.scm
index e355a47..9741814 100644
--- a/gnu/packages/benchmark.scm
+++ b/gnu/packages/benchmark.scm
@@ -65,15 +65,17 @@
`(#:modules (,@%gnu-build-system-modules
(ice-9 textual-ports))
#:test-target "test"
+ #:configure-flags '("--disable-native") ;don't generate code for the
build CPU
#:phases
(modify-phases %standard-phases
(replace 'configure
- (lambda* (#:key outputs #:allow-other-keys)
+ (lambda* (#:key (configure-flags ''()) outputs #:allow-other-keys)
;; The configure script doesn't understand some of the
- ;; GNU options, so we can't use #:configure-flags.
+ ;; GNU options, so we can't use the stock phase.
(let ((out (assoc-ref outputs "out")))
- (invoke "./configure"
- (string-append "--prefix=" out)))))
+ (apply invoke "./configure"
+ (string-append "--prefix=" out)
+ configure-flags))))
;; The main `fio` executable is fairly small and self contained.
;; Moving the auxiliary scripts to a separate output saves ~100 MiB
;; on the closure.