From: Josselin Poiret via Guix-patches via <guix-patches@gnu.org>
To: 55602@debbugs.gnu.org
Cc: Josselin Poiret <dev@jpoiret.xyz>
Subject: [bug#55602] [PATCH v2 2/2] build-system: linux-module: Directly use-module (guix platform).
Date: Mon, 23 May 2022 22:37:27 +0200 [thread overview]
Message-ID: <20220523203727.2588-3-dev@jpoiret.xyz> (raw)
In-Reply-To: <20220523203727.2588-1-dev@jpoiret.xyz>
* guix/build-system/linux-module.scm (system->arch): Remove module-ref
shenanigans.
---
guix/build-system/linux-module.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/guix/build-system/linux-module.scm b/guix/build-system/linux-module.scm
index 761ebe25b1..94a293da13 100644
--- a/guix/build-system/linux-module.scm
+++ b/guix/build-system/linux-module.scm
@@ -28,6 +28,7 @@ (define-module (guix build-system linux-module)
#:use-module (guix build-system)
#:use-module (guix build-system gnu)
#:use-module (guix packages)
+ #:use-module (guix platform)
#:use-module (ice-9 match)
#:export (%linux-module-build-system-modules
linux-module-build
@@ -50,8 +51,7 @@ (define (default-linux)
(module-ref module 'linux-libre)))
(define (system->arch system)
- (let ((module (resolve-interface '(gnu platform))))
- ((module-ref module 'lookup-platform-by-target-or-system) system)))
+ (platform-linux-architecture (lookup-platform-by-target-or-system system)))
(define (make-linux-module-builder linux)
(package
--
2.36.0
next prev parent reply other threads:[~2022-05-23 20:38 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2022-05-23 20:29 [bug#55602] [PATCH 0/2] Move (gnu platform) and friends to guix, and fix linux module build system Josselin Poiret via Guix-patches via
2022-05-23 20:37 ` [bug#55602] [PATCH v2 " Josselin Poiret via Guix-patches via
2022-05-23 20:37 ` [bug#55602] [PATCH v2 1/2] Move (gnu platform) and (gnu platforms ...) to guix/ Josselin Poiret via Guix-patches via
2022-05-23 20:37 ` Josselin Poiret via Guix-patches via [this message]
2022-05-25 7:31 ` bug#55602: [PATCH 0/2] Move (gnu platform) and friends to guix, and fix linux module build system Mathieu Othacehe
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20220523203727.2588-3-dev@jpoiret.xyz \
--to=guix-patches@gnu.org \
--cc=55602@debbugs.gnu.org \
--cc=dev@jpoiret.xyz \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).