blob: da2c0c9cedf0cb5ca6c25511f0c2f4cb7cdc3f2f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
(declaim (optimize (speed 0) (safety 3) (debug 3)))
(in-package :cl)
(defpackage :org-ckons-condition-system (:use :cl :asdf))
(in-package :org-ckons-condition-system)
(defmacro do-defsystem (&key name version maintainer author description long-description depends-on components)
`(defsystem ,name
:name ,name
:version ,version
:maintainer ,maintainer
:author ,author
:description ,description
:long-description ,long-description
:depends-on ,(eval depends-on)
:components ,components))
(defparameter *quicklisp-packages* ())
(defparameter *asdf-packages* ())
(defparameter *all-packages* (append *quicklisp-packages* *asdf-packages*))
(loop for pkg in *quicklisp-packages* do
(ql:quickload (symbol-name pkg)))
(do-defsystem :name "org-ckons-condition"
:version "1"
:maintainer "Carlos Konstanski <me@ckons.org>"
:author "Carlos Konstanski <me@ckons.org>"
:description "org-ckons-condition"
:long-description "org-ckons-condition provides a condition class with an added :text slot."
:depends-on *all-packages*
:components ((:module src
:components ((:file "package")
(:file "condition" :depends-on ("package"))))))
|