Lispln/nonguix
1
0
Fork 0
mirror of https://gitlab.com/nonguix/nonguix.git synced 2024-11-22 08:28:09 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

nongnu: nvidia: Group source hashes.

Browse source 
* nongnu/packages/nvidia.scm (nvidia-source-hash): New procedure.
(nvidia-source): Use it.
(nvidia-settings)[source]: Likewise.

Signed-off-by: John Kehayias <john.kehayias@protonmail.com>
This commit is contained in:
Hilton Chain 2024-02-28 14:29:54 +08:00 committed by John Kehayias
parent 8a56ebb666
commit d35912bd9e
No known key found for this signature in database
GPG key ID: 499097AE5EA815D9
1 changed files with 12 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
nongnu/packages/nvidia.scm
View file

@ -72,6 +72,16 @@
;;; ;;;
(define* (nvidia-source-hash version #:optional (package "nvidia-driver"))
(define %nvidia-source-hashes
'(("515.76" .
(("nvidia-driver" .
"0i5zyvlsjnfkpfqhw6pklp0ws8nndyiwxrg4pj04jpwnxf6a38n6")
("nvidia-settings" .
"1hplc42115c06cc555cjmw3c9371qn7ibwjpqjybcf6ixfd6lryq")))))
(let ((hashes (assoc-ref %nvidia-source-hashes version)))
(assoc-ref hashes package)))
(define (nvidia-source-unbundle-libraries version) (define (nvidia-source-unbundle-libraries version)
#~(begin #~(begin
(use-modules (guix build utils)) (use-modules (guix build utils))
@ -139,7 +149,7 @@ VERSION as argument and returns a G-expression."
(define-public nvidia-source (define-public nvidia-source
(make-nvidia-source (make-nvidia-source
nvidia-version nvidia-version
(base32 "0i5zyvlsjnfkpfqhw6pklp0ws8nndyiwxrg4pj04jpwnxf6a38n6"))) (base32 (nvidia-source-hash nvidia-version))))
;;; ;;;
@ -551,9 +561,7 @@ userspace tools from the corresponding driver release.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet '(delete-file-recursively "src/jansson")) (snippet '(delete-file-recursively "src/jansson"))
(sha256 (sha256 (base32 (nvidia-source-hash version name)))))
(base32
"1hplc42115c06cc555cjmw3c9371qn7ibwjpqjybcf6ixfd6lryq"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list #:tests? #f ;no test suite (list #:tests? #f ;no test suite