/
clack.asd
109 lines (104 loc) · 3.72 KB
/
clack.asd
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
#|
This file is a part of Clack package.
URL: http://github.com/fukamachi/clack
Copyright (c) 2011 Eitarow Fukamachi <e.arrows@gmail.com>
Clack is freely distributable under the LLGPL License.
|#
#|
Clack is a Web server Interface for Common Lisp.
Author: Eitarow Fukamachi (e.arrows@gmail.com)
|#
(in-package :cl-user)
(defpackage clack-asd
(:use :cl :asdf))
(in-package :clack-asd)
(defsystem clack
:version "12.06.0"
:author "Eitarow Fukamachi"
:license "LLGPL"
:depends-on (;; Utility
:trivial-types
:alexandria
:anaphora
:split-sequence
:cl-syntax
:cl-syntax-annot
;; for Other purpose
:cl-ppcre
:cl-fad
:ironclad
:rfc2388
:flexi-streams
:local-time
:circular-streams
:multival-plist
:bordeaux-threads)
:components ((:module "src"
:components
((:module "core"
:depends-on ("util")
:components
((:file "clack"
:depends-on ("component"
"middleware"
"handler"))
(:file "builder"
:depends-on ("component" "middleware" "mw"))
(:file "request")
(:file "response")
(:file "component")
(:file "middleware" :depends-on ("component"))
(:file "handler")
(:module "app"
:depends-on ("clack")
:components
((:file "file")
(:file "directory" :depends-on ("file"))
(:file "urlmap")))
(:file "logger")
(:module "middleware/logger"
:depends-on ("logger" "middleware")
:serial t
:components
((:file "base")
(:file "stream")
(:file "file")
(:file "logger")))
(:module "mw"
:pathname "middleware"
:depends-on ("clack" "component" "response" "request" "app")
:components
((:file "static")
(:file "conditional")
(:module "session"
:serial t
:components
((:file "state")
(:file "state/cookie")
(:file "store")
(:file "session")))
(:file "stdout")))))
(:module "util"
:serial t
:components
((:file "doc")
(:file "util")
(:file "stream")
(:file "localtime")
(:file "rfc2388")
(:file "hunchentoot")
(:file "route"))))))
:description "Web application environment for Common Lisp"
:long-description
#.(with-open-file (stream (merge-pathnames
#p"README.markdown"
(or *load-pathname* *compile-file-pathname*))
:if-does-not-exist nil
:direction :input)
(when stream
(let ((seq (make-array (file-length stream)
:element-type 'character
:fill-pointer t)))
(setf (fill-pointer seq) (read-sequence seq stream))
seq)))
:in-order-to ((test-op (test-op t-clack))))