(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")
        (revision "1"))
    (package
      (inherit guile-chickadee)
      (version (git-version "0.9.0" revision commit))
      (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")
        (revision "1"))
    (package
      (name "catbird")
      (version (git-version "0.1.0" revision commit))
      (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-public super-bloom
  (let ((commit "a86f4f6d53d05d6e1027619d00882feff1b857a8")
        (revision "1"))
    (package
      (name "super-bloom")
      (version (git-version "0.1.0" revision commit))
      (source (origin
                (method git-fetch)
                (uri (git-reference
                      (url "https://git.dthompson.us/spring-lisp-game-jam-2023.git")
                      (commit commit)))
                (sha256
                 (base32
                  "1lcy5r83hwy6qwz7vxkfwflrmhaikcf6f2zskar2j3a9li740gic"))))
      (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))))