summaryrefslogtreecommitdiff
path: root/src/state.lisp
diff options
context:
space:
mode:
authorGravatar Uko Kokņevičs2025-10-24 08:09:46 +0300
committerGravatar Uko Kokņevičs2025-10-24 08:09:46 +0300
commit69d775b3d3a8f5bdb920630c7bdf6ec1b264b203 (patch)
tree8e9be882f3d690abed0f37e9a29c9dfd7686e9e8 /src/state.lisp
parentUpdate f-string (diff)
downloadukkoclot-69d775b3d3a8f5bdb920630c7bdf6ec1b264b203.tar.gz
ukkoclot-69d775b3d3a8f5bdb920630c7bdf6ec1b264b203.tar.xz
ukkoclot-69d775b3d3a8f5bdb920630c7bdf6ec1b264b203.zip
Configure a custom readtable explicitly
Diffstat (limited to 'src/state.lisp')
-rw-r--r--src/state.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/state.lisp b/src/state.lisp
index 9f1a38f..e2052e3 100644
--- a/src/state.lisp
+++ b/src/state.lisp
@@ -4,10 +4,11 @@
4 (:documentation "Holds the global state") 4 (:documentation "Holds the global state")
5 (:nicknames :state) 5 (:nicknames :state)
6 (:use :c2cl :ukkoclot/src/rw-lock) 6 (:use :c2cl :ukkoclot/src/rw-lock)
7 (:import-from :com.dieggsy.f-string :enable-f-strings)
8 (:import-from :conf :config :*config* :bot-token) 7 (:import-from :conf :config :*config* :bot-token)
8 (:import-from :named-readtables :in-readtable)
9 (:import-from :serapeum :->) 9 (:import-from :serapeum :->)
10 (:import-from :ukkoclot/src/db :db) 10 (:import-from :ukkoclot/src/db :db)
11 (:import-from :ukkoclot/src/readtable :readtable)
11 (:export 12 (:export
12 #:*state* 13 #:*state*
13 #:state 14 #:state
@@ -22,8 +23,7 @@
22 #:id% 23 #:id%
23 #:set-id%)) 24 #:set-id%))
24(in-package :ukkoclot/src/state) 25(in-package :ukkoclot/src/state)
25 26(in-readtable readtable)
26(enable-f-strings)
27 27
28(defstruct (state (:constructor make-state%)) 28(defstruct (state (:constructor make-state%))
29 (lock (make-rw-lock :name "state's lock") :type rw-lock :read-only t) 29 (lock (make-rw-lock :name "state's lock") :type rw-lock :read-only t)