(define-module (haskell-tito-package)
  #:use-module (guix)
  #:use-module (guix git-download)
  #:use-module (guix build-system haskell)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (gnu packages haskell-xyz))
  

(define vcs-file?
  (or (git-predicate (string-append (current-source-directory) "/../.."))
      (const #t)))

(define-public ghc-tito
  (package
    (name "ghc-tito")
    (version "0.0.1")
    (source (local-file "../.." "ghc-tito-checkout"
                        #:recursive? #t
                        #:select? vcs-file?))
    (build-system haskell-build-system)
    (inputs (list ghc-megaparsec
                  ghc-decimal))
    (home-page "https://git.olarinmaensamoojat.fi/OMS/tito")
    (synopsis "TITO parsing library")
    (description "")
    (license license:agpl3+)))

ghc-tito