diff options
| -rw-r--r-- | guix/lint.scm | 4 | ||||
| -rw-r--r-- | tests/lint.scm | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/guix/lint.scm b/guix/lint.scm index deea25c5ce..aae10fe492 100644 --- a/guix/lint.scm +++ b/guix/lint.scm @@ -355,9 +355,9 @@ superfluous when building natively and incorrect when cross-compiling." (_ '()))) (parameterize ((%current-target-system "aarch64-linux-gnu")) (apply (lambda* (#:key (target 'not-set) - make-flags #:allow-other-keys) + make-flags #:allow-other-keys) (define make-flags/sexp - (if (gexp? make-flags/sexp) + (if (gexp? make-flags) (gexp->approximate-sexp make-flags) make-flags)) ;; Some packages like 'tzdata' are never cross-compiled; diff --git a/tests/lint.scm b/tests/lint.scm index 71476f5ae2..3e37438b39 100644 --- a/tests/lint.scm +++ b/tests/lint.scm @@ -5,7 +5,7 @@ ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org> ;;; Copyright © 2016 Hartmut Goebel <h.goebel@crazy-compilers.com> ;;; Copyright © 2017 Alex Kost <alezost@gmail.com> -;;; Copyright © 2017, 2022 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2017, 2022, 2025 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2018, 2019 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2020 Timothy Sample <samplet@ngyro.com> ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr> @@ -390,12 +390,12 @@ (check-compiler-for-target (dummy-package "x" (arguments '(#:make-flags '("CC=gcc"))))))) - (test-equal "compiler-for-target: looks through G-expressions" "'CC' should be set to '(cc-for-target)' instead of 'gcc'" (single-lint-warning-message (check-compiler-for-target - (dummy-package "x" (arguments '(#:make-flags #~'("CC=gcc"))))))) + (dummy-package "x" (arguments + (list #:make-flags #~(list "CC=gcc"))))))) (test-equal "compiler-for-target: (cc-for-target) is acceptable" '() |