646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
19 lines
376 B
Common Lisp
19 lines
376 B
Common Lisp
(defpackage :nix-cl-user
|
|
(:use :cl))
|
|
|
|
(in-package :nix-cl-user)
|
|
|
|
(load "@asdf@")
|
|
|
|
(defun load-systems ()
|
|
(handler-case
|
|
(let ((systems (uiop:getenv "systems")))
|
|
(dolist (s (uiop:split-string systems :separator " "))
|
|
(asdf:load-system s)))
|
|
(error (c)
|
|
(format t "BUILD FAILED: ~A~%" c)
|
|
(uiop:quit 1)))
|
|
(uiop:quit 0))
|
|
|
|
(load-systems)
|