Something went wrong. Try again.
lol
Something went wrong. Try again.
376 B · 18 lines
at master
12345678910111213141516171819(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)