diff options
| author | Mathieu Othacehe <m.othacehe@gmail.com> | 2019-08-18 11:00:23 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <m.othacehe@gmail.com> | 2019-10-14 09:59:04 +0200 |
| commit | 396b05f04ed5c5ad6141bd1b4f70f51561a97aad (patch) | |
| tree | ba3c674499f5c8e1e20f1622ec57aba677ddca0d | |
| parent | 92f92a0fc8b206a343287ab4790e6fce38e55953 (diff) | |
| download | guix-396b05f04ed5c5ad6141bd1b4f70f51561a97aad.tar.gz guix-396b05f04ed5c5ad6141bd1b4f70f51561a97aad.zip | |
gexp: Use cross extensions when cross-compiling.
* guix/gexp.scm (load-path-expression): Use ungexp-splicing instead of
ungexp-native-splicing so that the cross extensions are used when target is
set.
| -rw-r--r-- | guix/gexp.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/gexp.scm b/guix/gexp.scm index 600750e846..7323277511 100644 --- a/guix/gexp.scm +++ b/guix/gexp.scm @@ -1508,7 +1508,7 @@ are searched for in PATH. Return #f when MODULES and EXTENSIONS are empty." (gexp (eval-when (expand load eval) ;; Augment the load paths and delete duplicates. Do that ;; without loading (srfi srfi-1) or anything. - (let ((extensions '((ungexp-native-splicing extensions))) + (let ((extensions '((ungexp-splicing extensions))) (prepend (lambda (items lst) ;; This is O(N²) but N is typically small. (let loop ((items items) |