1 ;; demo packages.lisp 2 (defpackage :demo-sys 3 (:nicknames :ds)) 4 (defpackage :demo-utils 5 (:use :demo-sys) 6 (:nicknames :dutils) 7 (:export 8 #:source-dir 9 #:random-id 10 #:scan-dir) 11 (:export 12 #:*cargo-target* 13 #:*rs-macros* 14 #:rs-defmacro 15 #:rs-macroexpand-1 16 #:rs-macroexpand)) 17 (defpackage :demo-db 18 (:use :demo-sys) 19 (:nicknames :ddb)) 20 (defpackage :demo-ui 21 (:use :demo-sys) 22 (:nicknames :dui) 23 (:export 24 #:on-new-window 25 #:start-ui)) 26 (defpackage :demo-cli 27 (:use :demo-sys) 28 (:nicknames :dcli) 29 (:export 30 #:run-cli 31 #:demo-path 32 #:db-path 33 #:cli-opts 34 #:cli-handler 35 #:cli-cmd)) 36 (defpackage :demo 37 (:use #:cl #:demo-sys #:demo-utils #:demo-db #:demo-ui #:demo-cli) 38 (:nicknames :d) 39 (:local-nicknames 40 (#:v #:org.shirakumo.verbose) 41 (#:bt #:bordeaux-threads) 42 (#:cli #:clingon))) 43 (defpackage :demo-user 44 (:use :demo #:cl-user))
