;; SPDX-License-Identifier: EUPL-1.2
;; SPDX-FileCopyrightText: 2025 Uko Kokņevičs <perkontevs@gmail.com>
(defpackage :ukkoclot/tg/animation
  (:use :c2cl :ukkoclot/tg/type-macros :ukkoclot/tg/photo-size)
  (:export
   #:animation
   #:make-animation
   #:animation-p
   #:copy-animation
   #:animation-file-id
   #:animation-file-unique-id
   #:animation-width
   #:animation-height
   #:animation-duration
   #:animation-thumbnail
   #:animation-file-name
   #:animation-mime-type
   #:animation-file-size))
(in-package :ukkoclot/tg/animation)

(define-tg-type animation
  (file-id string)
  (file-unique-id string)
  (width integer)
  (height integer)
  (duration integer)
  (thumbnail (or photo-size null) nil)
  (file-name (or string null) nil)
  (mime-type (or string null) nil)
  (file-size (or integer null) nil))