Commit 2df325ca authored by Antoine Martin's avatar Antoine Martin
Browse files

Add build-releases function

parent 14438907
(asdf:defsystem quickref
:author "Antoine Martin"
:depends-on (:quicklisp :alexandria :split-sequence)
:depends-on (:quicklisp :alexandria :split-sequence :qlmapper)
:serial t
:components ((:file "quickref")
(:file "website")))
......@@ -5,7 +5,8 @@
(:export :print-primary-systems
:get-primary-system-name
:build-texis
:build-index))
:build-index
:build-releases))
(in-package :quickref)
......@@ -42,3 +43,9 @@
(defun print-primary-systems ()
(dolist (release (ql-dist:provided-releases t))
(print (get-primary-system-name (ql-dist:name release)))))
(defun build-releases ()
(qlmapper:map-releases
(concatenate 'string
(namestring (asdf:system-source-directory "quickref"))
"utils/test_declt.lisp")))
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment