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