(asdf:make-build "cockpit"
                 :monolithic t
                 :type :static-library
                 :move-here "./"
                 :init-name "init_sextant")

(let ((lib-name "libsextant.a"))
  (when (probe-file lib-name)
    (delete-file lib-name))
  (rename-file (x:cc "cockpit--all-systems" ".a") lib-name))