(define-module (dthompson packages games)
  #:use-module (guix packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix download)
  #:use-module (guix git)
  #:use-module (guix git-download)
  #:use-module (guix build-system gnu)
  #:use-module (guix utils)
  #:use-module (gnu packages)
  #:use-module (gnu packages autotools)
  #:use-module (gnu packages guile)
  #:use-module (gnu packages game-development)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages sdl)
  #:use-module (gnu packages texinfo))

(define chickadee-for-super-bloom
  (let ((commit "ca8b2bd07a07e727b17ebbdf8012c7d9cd135689"))
    (package
      (inherit guile-chickadee)
      (version (string-append "0.9.0-1." (string-take commit 7)))
      (source (origin
                (method git-fetch)
                (uri (git-reference
                      (url "https://git.dthompson.us/chickadee.git")
                      (commit commit)))
                (sha256
                 (base32
                  "1s6wgb58z09f5li90ds6pnmfismd81xawf0qkxr1jkmvywfdg427"))))
      (native-inputs (list autoconf automake pkg-config texinfo)))))

(define catbird-for-super-bloom
  (let ((commit "fa6a85b92f818f1e0139a33ca4110acc97f8d4f2"))
    (package
      (name "catbird")
      (version (string-append "0.1.0-1." (string-take commit 7)))
      (source (origin
                (method git-fetch)
                (uri (git-reference
                      (url "https://git.dthompson.us/catbird.git")
                      (commit commit)))
                (sha256
                 (base32
                  "0jhsf1idrq433x4l10yfzkmd68k5y1ypsfzqpmh1rv6clczxyszf"))))
      (build-system gnu-build-system)
      (arguments
       '(#:make-flags '("GUILE_AUTO_COMPILE=0")))
      (native-inputs (list autoconf automake pkg-config texinfo))
      (inputs (list guile-3.0))
      (propagated-inputs (list chickadee-for-super-bloom guile-sdl2))
      (synopsis "Game engine for Scheme programmers")
      (description "Catbird is a game engine written in Guile Scheme.")
      (home-page "https://dthompson.us/projects/chickadee.html")
      (license license:gpl3+))))

(define super-bloom
  (package
   (name "super-bloom")
   (version "0.1.0-git")
   (source (git-checkout (url (dirname (current-filename)))))
   (build-system gnu-build-system)
   (arguments
    '(#:make-flags '("GUILE_AUTO_COMPILE=0")))
   (native-inputs
    (list autoconf automake pkg-config))
   (inputs
    (list guile-3.0))
   (propagated-inputs
    (list catbird-for-super-bloom))
   (synopsis "Spring Lisp Game Jam 2023 entry")
   (description "Dave's entry to the Spring Lisp Game Jam 2023.")
   (home-page "https://dthompson.us")
   (license license:asl2.0)))