diff options
| author |  Uko Kokņevičs | 2025-10-13 06:51:46 +0300 |
|---|---|---|
| committer | Uko Kokņevičs | 2025-10-13 06:51:46 +0300 |
| commit | cf7a89781d32365026df402338d4f462666ad3a3 (patch) | |
| tree | b97ca6cb64ad5501fbf80ff93f7fda8dd1bd54e3 /src/bot/method-macros.lisp | |
| parent | Move bot/adanced to tg/* (diff) | |
| download | ukkoclot-cf7a89781d32365026df402338d4f462666ad3a3.tar.gz ukkoclot-cf7a89781d32365026df402338d4f462666ad3a3.tar.xz ukkoclot-cf7a89781d32365026df402338d4f462666ad3a3.zip | |
Move bot/method-macros to tg/method-macros
Diffstat (limited to '')
| -rw-r--r-- | src/tg/method-macros.lisp (renamed from src/bot/method-macros.lisp) | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/bot/method-macros.lisp b/src/tg/method-macros.lisp index d4f04ad..3599328 100644 --- a/src/bot/method-macros.lisp +++ b/src/tg/method-macros.lisp | |||
| @@ -1,12 +1,12 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | 1 | ;; SPDX-License-Identifier: EUPL-1.2 |
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> |
| 3 | (defpackage :ukkoclot/bot/method-macros | 3 | (defpackage :ukkoclot/tg/method-macros |
| 4 | (:use :c2cl :iterate) | 4 | (:use :c2cl :iterate) |
| 5 | (:import-from :ukkoclot/state :bot) | 5 | (:import-from :ukkoclot/state :bot) |
| 6 | (:import-from :ukkoclot/strings :ends-with :lisp->camel-case) | 6 | (:import-from :ukkoclot/strings :ends-with :lisp->camel-case) |
| 7 | (:import-from :ukkoclot/transport :do-call) | 7 | (:import-from :ukkoclot/transport :do-call) |
| 8 | (:export :define-tg-method)) | 8 | (:export :define-tg-method)) |
| 9 | (in-package :ukkoclot/bot/method-macros) | 9 | (in-package :ukkoclot/tg/method-macros) |
| 10 | 10 | ||
| 11 | (eval-when (:compile-toplevel :load-toplevel :execute) | 11 | (eval-when (:compile-toplevel :load-toplevel :execute) |
| 12 | (defstruct (param (:constructor make-param%)) name type default skip-if-default) | 12 | (defstruct (param (:constructor make-param%)) name type default skip-if-default) |