git » croncal.git » master » tree

[master] / build.lisp 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
#+nil(let* ((req-version "2023-02-15")
            (ql-dist (ql-dist:dist "quicklisp"))
            (ql-dist-version (slot-value ql-dist 'ql-dist:version)))
       (when (not (string= req-version ql-dist-version))
         (signal 'ql-dist-mismatch :message "Unexpected quicklisp dist version")))

(pushnew (ext:getcwd) ql:*local-project-directories*)
(ql:register-local-projects)
(ql:quickload :croncal)
(asdf:make-build :croncal
                 :type :program
                 :move-here #P"./"
                 :prologue-code
                 '(let ((*standard-output* (make-broadcast-stream)))
                   (require :asdf))
                 :epilogue-code '(croncal:main))
(si:quit)