mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 06:18:07 -05:00
build-system: linux-module: Break some long lines.
* gnu/build/linux-modules.scm (make-linux-module-builder, lower): Break some long commentary lines.
This commit is contained in:
parent
8ee8eb2698
commit
8d003ca344
1 changed files with 7 additions and 2 deletions
|
@ -78,7 +78,8 @@ (define (make-linux-module-builder linux)
|
||||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||||
(let* ((out (assoc-ref outputs "out"))
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
(out-lib-build (string-append out "/lib/modules/build")))
|
(out-lib-build (string-append out "/lib/modules/build")))
|
||||||
; TODO: Only preserve the minimum, i.e. [Kbuild], Kconfig, scripts, include, ".config".
|
;; TODO: Only preserve the minimum, i.e. [Kbuild], Kconfig,
|
||||||
|
;; scripts, include, ".config".
|
||||||
(copy-recursively "." out-lib-build)
|
(copy-recursively "." out-lib-build)
|
||||||
(let* ((linux (assoc-ref inputs "linux")))
|
(let* ((linux (assoc-ref inputs "linux")))
|
||||||
(install-file (string-append linux "/System.map")
|
(install-file (string-append linux "/System.map")
|
||||||
|
@ -111,7 +112,11 @@ (define private-keywords
|
||||||
("linux-module-builder"
|
("linux-module-builder"
|
||||||
,(make-linux-module-builder linux))
|
,(make-linux-module-builder linux))
|
||||||
,@native-inputs
|
,@native-inputs
|
||||||
;; TODO: Remove "gmp", "mpfr", "mpc" since they are only needed to compile the gcc plugins. Maybe remove "flex", "bison", "elfutils", "perl", "openssl". That leaves very little ("bc", "gcc", "kmod").
|
;; TODO: Remove "gmp", "mpfr", "mpc" since they are
|
||||||
|
;; only needed to compile the gcc plugins. Maybe
|
||||||
|
;; remove "flex", "bison", "elfutils", "perl",
|
||||||
|
;; "openssl". That leaves very little ("bc", "gcc",
|
||||||
|
;; "kmod").
|
||||||
,@(package-native-inputs linux)))
|
,@(package-native-inputs linux)))
|
||||||
(outputs outputs)
|
(outputs outputs)
|
||||||
(build linux-module-build)
|
(build linux-module-build)
|
||||||
|
|
Loading…
Reference in a new issue