diff options
Diffstat (limited to 'src/tg-types/reaction-type-paid.lisp')
| -rw-r--r-- | src/tg-types/reaction-type-paid.lisp | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/tg-types/reaction-type-paid.lisp b/src/tg-types/reaction-type-paid.lisp new file mode 100644 index 0000000..260ddf7 --- /dev/null +++ b/src/tg-types/reaction-type-paid.lisp | |||
| @@ -0,0 +1,18 @@ | |||
| 1 | ;; SPDX-License-Identifier: EUPL-1.2 | ||
| 2 | ;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com> | ||
| 3 | (defpackage :ukkoclot/tg-types/reaction-type-paid | ||
| 4 | (:use :c2cl :ukkoclot/enum :ukkoclot/tg-types/macros) | ||
| 5 | (:export | ||
| 6 | #:reaction-type-paid-type | ||
| 7 | #:paid-type | ||
| 8 | #:reaction-type-paid | ||
| 9 | #:make-reaction-type-paid | ||
| 10 | #:reaction-type-paid-p | ||
| 11 | #:copy-reaction-type-paid)) | ||
| 12 | (in-package :ukkoclot/tg-types/reaction-type-paid) | ||
| 13 | |||
| 14 | (define-enum reaction-type-paid-type | ||
| 15 | (paid-type "paid")) | ||
| 16 | |||
| 17 | (define-tg-type reaction-type-paid | ||
| 18 | (type reaction-type-paid-type)) | ||