blob: 89615895a64bf952f8398425f2d0bc273f817ff8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(setf ql:*local-project-directories* '("./lib"))
(let ((dependencies (asdf:system-depends-on (asdf:find-system :wajir)))
(local-dependencies '("com.inuoe.jzon"
"sysexits")))
(ql:bundle-systems
(set-difference
(sort dependencies #'string-lessp)
local-dependencies
:test #'equal)
:to "./bundle"
:include-local-projects t))
(quit)
|
