(use-modules (guix)
             (guix build-system gnu)
             (guix gexp)
             (guix git)
             (guix git-download)
             ((guix licenses) #:prefix license:)
             (guix packages)
             (gnu packages autotools)
             (gnu packages base)
             (gnu packages compression)
             (gnu packages guile)
             (gnu packages pkg-config)
             (gnu packages texinfo))

(define guile-next-next
  (let ((commit "79e836b8cc601a1259c934000a953a8d739ddd6f")
        (revision "1"))
    (package
     (inherit guile-next)
     (version (git-version "3.0.9" revision commit))
     (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://git.savannah.gnu.org/git/guile.git")
                    (commit commit)))
              (file-name (git-file-name "guile" version))
              (sha256
               (base32 "0s90khsdbvrkykp58izkvyxf8jciggdapm29dc3lzk3s1shajlgm")))))))

(define guile-hoot
  (let ((commit "89b936e198b158fc4a43b43977d783f4f798f45c")
        (revision "1"))
    (package
     (name "guile-hoot")
     (version (git-version "0.0.0" revision commit))
     (source (origin
              (method git-fetch)
              (uri (git-reference
                    (url "https://gitlab.com/spritely/guile-hoot.git")
                    (commit commit)))
              (file-name (git-file-name "guile-hoot" version))
              (sha256
               (base32 "0bzd2a840rzl3ymaaiqm7m4xsgb6hm24fjg3ssbiqq3n6qd88fnr"))))
     (build-system gnu-build-system)
     (arguments
      '(#:make-flags '("GUILE_AUTO_COMPILE=0")
        #:tests? #f))
     (native-inputs
      (list autoconf automake pkg-config texinfo))
     (inputs
      (list guile-next-next))
     (synopsis "WASM compiler for Guile Scheme")
     (description "Guile-hoot is an ahead-of-time WebAssembly compiler for GNU Guile.")
     (home-page "https://gitlab.com/spritely/guile-hoot")
     (license (list license:asl2.0 license:lgpl3+)))))

(packages->manifest (list ;; guile-next-next guile-hoot
                          gnu-make zip))