summaryrefslogtreecommitdiff
path: root/src/tg/method-macros.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/tg/method-macros.lisp')
-rw-r--r--src/tg/method-macros.lisp7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/tg/method-macros.lisp b/src/tg/method-macros.lisp
index 9ab9e89..17903df 100644
--- a/src/tg/method-macros.lisp
+++ b/src/tg/method-macros.lisp
@@ -4,16 +4,15 @@
4 (:documentation "Macros for easy defining TG methods.") 4 (:documentation "Macros for easy defining TG methods.")
5 (:use :c2cl :iterate) 5 (:use :c2cl :iterate)
6 (:import-from :alexandria :make-keyword :with-gensyms) 6 (:import-from :alexandria :make-keyword :with-gensyms)
7 (:import-from :com.dieggsy.f-string :enable-f-strings) 7 (:import-from :named-readtables :in-readtable)
8 (:import-from :serapeum :-> :take) 8 (:import-from :serapeum :-> :take)
9 (:import-from :state) 9 (:import-from :state)
10 (:import-from :str) 10 (:import-from :str)
11 (:import-from :ukkoclot/src/readtable :readtable)
11 (:import-from :ukkoclot/src/transport :do-call :http-method) 12 (:import-from :ukkoclot/src/transport :do-call :http-method)
12 (:export :define-tg-method)) 13 (:export :define-tg-method))
13(in-package :ukkoclot/src/tg/method-macros) 14(in-package :ukkoclot/src/tg/method-macros)
14 15(in-readtable readtable)
15(eval-when (:compile-toplevel :load-toplevel :execute)
16 (enable-f-strings))
17 16
18(eval-when (:compile-toplevel :load-toplevel :execute) 17(eval-when (:compile-toplevel :load-toplevel :execute)
19 (defstruct (param (:constructor make-param%)) name type default skip-if-default) 18 (defstruct (param (:constructor make-param%)) name type default skip-if-default)