changelog shortlog graph tags branches changeset files file revisions raw help

Mercurial > demo / annotate src/packages.lisp

changeset 26: 2015d7277629
author: ellis <ellis@rwest.io>
date: Mon, 05 Jun 2023 19:59:26 -0400
permissions: -rw-r--r--
description: refactor 01
26
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
1
 ;; demo packages.lisp
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
2
 (defpackage :demo-user
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
3
   (:use :demo))
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
4
 
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
5
 (defpackage :demo
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
6
   (:use #:cl #:demo-ui #:demo-cli #:demo-tk #:demo-db)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
7
   (:local-nicknames
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
8
    (#:v #:org.shirakumo.verbose)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
9
    (#:bt #:bordeaux-threads)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
10
    (#:cli #:clingon)))
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
11
 
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
12
 (defpackage :demo-ui
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
13
   (:use)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
14
   (:export
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
15
    #:on-new-window
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
16
    #:start-ui))
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
17
 (defpackage :demo-tk
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
18
   (:use)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
19
   (:export
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
20
    #:source-dir
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
21
    #:random-id
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
22
    #:scan-dir
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
23
    #:mkstr
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
24
    #:symb
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
25
    #:sbq-reader)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
26
   (:export
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
27
    #:*cargo-target*
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
28
    #:*rs-macros*
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
29
    #:rs-defmacro
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
30
    #:rs-macroexpand-1
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
31
    #:rs-macroexpand))
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
32
 (defpackage :demo-cli
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
33
   (:use)
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
34
   (:local-nick
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
35
   (:export
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
36
    #:run-cli
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
37
    #:demo-path
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
38
    #:db-path
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
39
    #:cli-opts
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
40
    #:cli-handler
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
41
    #:cli-cmd))
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
42
 (defpackage :demo-db
2015d7277629 refactor 01
ellis <ellis@rwest.io>
parents:
diff changeset
43
   (:use))