Hello,

I've created my first package for guix, the sekai speech synthesis
toolkit which I use mainly for producing singing voice with lilypond.
I'll also plan a talk at the gnu hackers meeting how I make Desktop
Music using the Guix System. Two more packages will follow next.

Tobias Alexandra
diff --git a/gnu/packages/speech.scm b/gnu/packages/speech.scm
index 042c157e43..cc0b03d110 100644
--- a/gnu/packages/speech.scm
+++ b/gnu/packages/speech.scm
@@ -31,11 +31,14 @@ (define-module (gnu packages speech)
   #:use-module (guix git-download)
   #:use-module (guix utils)
   #:use-module (guix build-system gnu)
+  #:use-module (guix build-system cmake)
   #:use-module (gnu packages)
   #:use-module (gnu packages audio)
+  #:use-module (gnu packages algebra)
   #:use-module (gnu packages autotools)
   #:use-module (gnu packages base)            ;for 'which'
   #:use-module (gnu packages bison)
+  #:use-module (gnu packages boost)
   #:use-module (gnu packages compression)
   #:use-module (gnu packages documentation)
   #:use-module (gnu packages emacs)
@@ -44,15 +47,18 @@ (define-module (gnu packages speech)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages gstreamer)
   #:use-module (gnu packages linux)
+  #:use-module (gnu packages maths)
   #:use-module (gnu packages ncurses)
   #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages pulseaudio)
   #:use-module (gnu packages python)
+  #:use-module (gnu packages serialization)
   #:use-module (gnu packages swig)
   #:use-module (gnu packages texinfo)
   #:use-module (gnu packages textutils))
 
+
 (define-public flite
   (package
     (name "flite")
@@ -318,6 +324,33 @@ (define-public sonic
     (home-page "https://github.com/waywardgeek/sonic";)
     (license license:asl2.0)))
 
+(define-public sekai
+  (package
+    (name "sekai")
+    (version "0.6.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://notabug.org/isengaara/sekai";)
+                    (commit "0.6rc0")))
+              (sha256
+               (base32
+                "0j55pipx3hcp0xl4v0d72fdwysnz9a9a40x65a9lxpl4k6wyp4nm"))))              
+    (build-system cmake-build-system)
+    (arguments '(#:tests? #f))
+    (inputs `(("fftw" ,fftw)
+              ("libsndfile",libsndfile)
+	      ("pkg-config",pkg-config)
+	      ("gsl",gsl)
+	      ("jsoncpp",jsoncpp)
+	      ("boost",boost)
+	      ("jack" ,jack-1)
+	    ))
+    (synopsis "The SEKAI speech toolkit")
+    (description "The future of Singing Voice Synthesis using the Excitation plus Resonances model.")
+    (home-page "https://qtau.de/sekai";)
+    (license license:agpl3+)))
+
 (define-public festival
   (package
     (name "festival")

Reply via email to