Rework ASDs, add stub md+rst plugins, docs script, and stub tests.

This commit is contained in:
Brit Butler 2012-08-14 23:56:25 -04:00
parent a607f77177
commit 8c0b1f8697
7 changed files with 53 additions and 38 deletions

View file

@ -1,18 +0,0 @@
(defsystem :coleslaw-static
:name "coleslaw-static"
:description "Flexible Lisp Blogware, Static backend"
:version "0.0.1"
:maintainer "Brit Butler <redline6561@gmail.com>"
:author "Brit Butler <redline6561@gmail.com>"
:licence "LLGPL"
:depends-on (:coleslaw :trivial-timers :cl-store :split-sequence)
:components ((:module static
:components ((:file "coleslaw")
(:file "comments"
:depends-on ("coleslaw"))
(:file "posts"
:depends-on ("coleslaw"))
(:file "indices"
:depends-on ("posts"))
(:file "util"
:depends-on ("coleslaw"))))))

View file

@ -1,23 +1,32 @@
(defsystem :coleslaw
(defsystem #:coleslaw
:name "coleslaw-core"
:description "Flexible Lisp Blogware"
:version "0.0.2"
:maintainer "Brit Butler <redline6561@gmail.com>"
:version "0.0.3"
:license "BSD"
:author "Brit Butler <redline6561@gmail.com>"
:licence "LLGPL"
:depends-on (:cl-markdown :docutils :closure-template
:cl-fad :local-time)
:components ((:module src
:pathname "src/"
:depends-on (:closure-template :cl-fad :local-time :alexandria)
:serial t
:components ((:file "packages")
(:file "coleslaw"
:depends-on ("packages"))
(:file "themes"
:depends-on ("coleslaw"))
(:file "comments"
:depends-on ("coleslaw"))
(:file "posts"
:depends-on ("coleslaw"))
(:file "indices"
:depends-on ("posts"))
(:file "plugins"
:depends-on ("packages"))))))
(:file "coleslaw")
(:file "themes")
(:file "comments")
(:file "posts")
(:file "indices")
(:file "plugins"))
:in-order-to ((test-op (load-op coleslaw-tests)))
:perform (test-op :after (op c)
(funcall (intern "RUN!" :coleslaw-tests)
(intern "COLESLAW-TESTS" :coleslaw-tests))))
(defsystem #:coleslaw-tests
:depends-on (coleslaw fiveam)
:pathname "tests/"
:serial t
:components ((:file "packages")
(:file "tests")))
(defmethod operation-done-p ((op test-op)
(c (eql (find-system :coleslaw))))
(values nil))

4
gen-docs.sh Executable file
View file

@ -0,0 +1,4 @@
#!/bin/sh
sbcl --eval "(ql:quickload '(coleslaw sb-introspect cl-api))" \
--eval "(cl-api:api-gen :coleslaw \"docs/coleslaw.html\")" \
--eval "(progn (terpri) (sb-ext:quit))"

9
plugins/markdown.lisp Normal file
View file

@ -0,0 +1,9 @@
(eval-when (:compile-toplevel)
(ql:quickload '3mbd))
(defpackage :coleslaw-md
(:use :cl :coleslaw))
(in-package :coleslaw-md)

View file

@ -0,0 +1,7 @@
(eval-when (:compile-toplevel :load-toplevel)
(ql:quickload 'docutils))
(defpackage :coleslaw-rst
(:use :cl :coleslaw))
(in-package :coleslaw-rst)

3
tests/packages.lisp Normal file
View file

@ -0,0 +1,3 @@
(defpackage :coleslaw-tests
(:use :cl :fiveam)
(:export #:run!))

1
tests/tests.lisp Normal file
View file

@ -0,0 +1 @@
(in-package :coleslaw-tests)