diff options
author | Jean-Pierre De Jesus DIAZ <jean@foundationdevices.com> | 2023-07-26 17:37:29 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2023-09-17 15:31:03 +0200 |
commit | 19b617370844ad48eab68e6fc4b9e47665f71710 (patch) | |
tree | 565ae923daa7d9c94a6e15114ff7c8cb019bf6b7 /guix | |
parent | 04f71edb73205d0bb82404de28a70ae17b897429 (diff) |
transformations: tuned-package: Use target on cross-compile.
* guix/transformations.scm (tuned-package): Use either bag-target if
available or bag-system to select the CPU architecture of the package
that is going to be tuned. This enables the tuning of cross-compiled
packages.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'guix')
-rw-r--r-- | guix/transformations.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/transformations.scm b/guix/transformations.scm index ede914456f..9cba6bedab 100644 --- a/guix/transformations.scm +++ b/guix/transformations.scm @@ -529,8 +529,9 @@ system that builds code for MICRO-ARCHITECTURE; otherwise raise an error." ;; leading to an obscure build error, check whether the compiler is known ;; to support MICRO-ARCHITECTURE. If not, bail out. (let* ((lowered (apply lower args)) - (architecture (match (string-tokenize (bag-system lowered) - %not-hyphen) + (target (or (bag-target lowered) + (bag-system lowered))) + (architecture (match (string-tokenize target %not-hyphen) ((arch _ ...) arch))) (compiler (any (match-lambda ((label (? package? p) . _) |