c7e4e4bc |
1 | (defpackage #:lisp-on-lines |
2 | (:use |
079b9084 |
3 | :common-lisp |
4358148e |
4 | #:contextl |
5 | #:closer-mop |
6de8d300 |
6 | #:postmodern |
4358148e |
7 | #:alexandria) |
c7e4e4bc |
8 | (:nicknames #:lol) |
1d51a2ee |
9 | (:export |
6de8d300 |
10 | |
11 | ;; ROFL stuff here temporarily |
12 | #:standard-db-access-class |
13 | #:make-dao-from-row |
14 | #:described-db-access-class |
e8d4fa45 |
15 | #:select-only |
16 | #:select |
6de8d300 |
17 | |
079b9084 |
18 | ;; Descriptions |
1d51a2ee |
19 | #:find-description |
1d51a2ee |
20 | #:define-description |
e8d4fa45 |
21 | #:described-object |
6de8d300 |
22 | #:described-class |
4358148e |
23 | #:with-active-descriptions |
24 | |
079b9084 |
25 | ;; Displays |
1d51a2ee |
26 | #:define-display |
27 | #:display |
079b9084 |
28 | #:display-using-description |
1d51a2ee |
29 | #:*display* |
30 | #:*object* |
31 | |
079b9084 |
32 | ;; Attributes |
1d51a2ee |
33 | #:find-attribute |
4358148e |
34 | #:attribute |
35 | #:attributes |
1d51a2ee |
36 | #:attribute-label |
079b9084 |
37 | #:attribute-function |
38 | #:attribute-value)) |
39 | |
1d51a2ee |
40 | |