cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fetch the list of system values from the database

Browse source 
This removes the need to hardcode some values in the code.
This commit is contained in:
Christopher Baines 2021-04-23 11:20:36 +01:00
parent b430c632b7
commit 6387f1bc67
5 changed files with 25 additions and 38 deletions
Download patch file Download diff file Expand all files Collapse all files

13
guix-data-service/model/derivation.scm
View file

@ -34,8 +34,7 @@
#:use-module (guix-data-service database)
#:use-module (guix-data-service model utils)
#:use-module (guix-data-service model system)
#:export (valid-systems
valid-targets
#:export (valid-targets
count-derivations
select-derivation-by-file-name
select-derivation-by-file-name-hash
@ -61,16 +60,6 @@
select-derivations-and-build-status
derivation-file-names->derivation-ids))
(define (valid-systems conn)
;; TODO, use the database, but make it quick!
'("aarch64-linux"
"armhf-linux"
"i586-gnu"
"i686-linux"
"mips64el-linux"
"powerpc64le-linux"
"x86_64-linux"))
(define (valid-targets conn)
'("arm-linux-gnueabihf"
"aarch64-linux-gnu"