[PATCH] gnu: Add ghc-flac.

[Danny Milosavljevic]

* gnu/packages/haskell.scm (ghc-flac): New variable.
---
 gnu/packages/haskell.scm | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)

diff --git a/gnu/packages/haskell.scm b/gnu/packages/haskell.scm
index b26234d40..b2ee11b2a 100644
--- a/gnu/packages/haskell.scm
+++ b/gnu/packages/haskell.scm
@@ -43,6 +43,7 @@
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
   #:use-module (gnu packages sdl)
+  #:use-module (gnu packages xiph)
   #:use-module (gnu packages xml)
   #:use-module (gnu packages xorg)
   #:use-module (gnu packages zip)
@@ -8162,4 +8163,37 @@ Rust syntax.  It is intended to be useful for two 
different purposes:
 files in Haskell.")
     (license license:bsd-3)))
 
+(define-public ghc-flac
+  (package
+    (name "ghc-flac")
+    (version "0.1.1")
+    (source (origin
+      (method url-fetch)
+      (uri (string-append
+             "https://hackage.haskell.org/package/flac/flac-";
+             version
+             ".tar.gz"))
+      (sha256
+        (base32
+          "0gl707qcxyzc8cbqsajhxm7j648iv23mpfdayyfc7pwvndy2idsq"))))
+    (build-system haskell-build-system)
+    (inputs
+     `(("ghc-data-default-class"
+        ,ghc-data-default-class)
+       ("ghc-exceptions" ,ghc-exceptions)
+      ("ghc-mtl" ,ghc-mtl)
+       ("ghc-text" ,ghc-text)
+       ("ghc-vector" ,ghc-vector)
+       ("ghc-wave" ,ghc-wave)
+       ("ghc-semigroups" ,ghc-semigroups)
+       ("ghc-temporary" ,ghc-temporary)
+       ("flac" ,flac)))
+    (native-inputs
+     `(("ghc-hspec" ,ghc-hspec)
+       ("hspec-discover" ,hspec-discover)))
+    (home-page "https://github.com/mrkkrp/flac";)
+    (synopsis "Haskell binding to libFLAC")
+    (description "Complete high-level binding to libFLAC for Haskell.")
+    (license license:bsd-3)))
+
 ;;; haskell.scm ends here