;; SPDX-License-Identifier: EUPL-1.2
;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
(defpackage :ukkoclot/tg-types/chat
  (:use :c2cl :ukkoclot/tg-types/chat-type :ukkoclot/tg-types/macros)
  (:export
   #:chat
   #:make-chat
   #:chat-p
   #:copy-chat
   #:chat-id
   #:chat-type
   #:chat-title
   #:chat-username
   #:chat-first-name
   #:chat-last-name
   #:chat-is-forum
   #:chat-is-direct-messages))
(in-package :ukkoclot/tg-types/chat)

(define-tg-type chat
  (id integer)
  (type chat-type)
  (title (or string null) nil)
  (username (or string null) nil)
  (first-name (or string null) nil)
  (last-name (or string null) nil)
  (is-forum boolean nil)
  (is-direct-messages boolean nil))