amaharaneko/nonguix-mirrors
1
0
Fork 0
mirror of https://gitlab.com/nonguix/nonguix.git synced 2025-10-01 18:05:00 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

import: nvidia: Refresh urls and simplify.

Browse source 
* guix/import/nvidia.scm
(archive->guix-arch, archive?): Delete them, replacing with...
(nvidia-system-links):...this new variable.
(nvidia-versions): Update accordingly.

Signed-off-by: Hilton Chain <hako@ultrarare.space>
This commit is contained in:
Nicolas Graves 2025-08-06 23:02:48 +02:00 • committed by Hilton Chain
parent b746284bda
commit e7ca367627
No known key found for this signature in database
GPG key ID: ACC66D09CA528292
1 changed files with 4 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

19
guix/import/nvidia.scm
View file

@ -21,18 +21,9 @@
(define nvidia-latest-url "https://www.nvidia.com/en-us/drivers/unix/")
(define (archive->guix-arch system)
(match system
("https://www.nvidia.com/object/linux-amd64-display-archive.html"
"x86_64-linux")
("https://www.nvidia.com/en-us/drivers/unix/linux-aarch64-archive/"
"aarch64-linux")
(_ #f)))
(define (archive? cand)
(or (string= cand (string-append nvidia-latest-url "linux-aarch64-archive/"))
(and (string-prefix? "https://www.nvidia.com/object/" cand)
(string-suffix? "-archive.html" cand))))
(define nvidia-system-links
'(("https://download.nvidia.com/XFree86/Linux-x86_64/" . "x86_64-linux")
("https://download.nvidia.com/XFree86/Linux-aarch64/" . "aarch64-linux")))
(define nvidia-versions
(memoize
@ -68,9 +59,7 @@
(list (or (string= version "Archive")
(string-trim version))
...)
(list (if (archive? url)
(archive->guix-arch url)
url)
(list (or (assoc-ref nvidia-system-links url) url)
...)))))
(system #f)
(versions