summary refs log tree commit diff
path: root/gnu/packages
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2023-05-25 15:31:59 +0200
committerRicardo Wurmus <rekado@elephly.net>2023-05-25 15:37:39 +0200
commita9c91a1cb14285f694c84d6b04973597741376da (patch)
tree9815ee34a064f622d67407c7f3bd5b21d2cc2065 /gnu/packages
parenta9cde26133bd98498869a3528d9dff0d3f456a96 (diff)
downloadguix-a9c91a1cb14285f694c84d6b04973597741376da.tar.gz
gnu: kaldi-for-vosk: Adjust style.
* gnu/packages/machine-learning.scm (kaldi-for-vosk)[inputs]: Remove spurious
semicolon.
[arguments]: Use LIST instead of double quoting; replace LET* with LET; adjust
indentation.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/machine-learning.scm18
1 files changed, 9 insertions, 9 deletions
diff --git a/gnu/packages/machine-learning.scm b/gnu/packages/machine-learning.scm
index 269bfd4459..392d3866ae 100644
--- a/gnu/packages/machine-learning.scm
+++ b/gnu/packages/machine-learning.scm
@@ -1848,7 +1848,7 @@ written in C++.")
           (base32 "04xw2dpfvpla8skpk08azmgr9k97cd8hn83lj4l85q165gbzql4s"))))
       (inputs
        (list alsa-lib
-             lapack ;; compared to base kaldi, replacing `(,gfortran "lib")
+             lapack ;compared to base kaldi, replacing `(,gfortran "lib")
              glib
              gstreamer
              jack-1
@@ -1859,17 +1859,17 @@ written in C++.")
       (arguments
        (list
         #:test-target "test"
-        #:make-flags ''("online2" "lm" "rnnlm")
+        #:make-flags '(list "online2" "lm" "rnnlm")
         #:phases
         #~(modify-phases %standard-phases
             (add-after 'unpack 'chdir
               (lambda _ (chdir "src")))
             (replace 'configure
               (lambda _
-                (let* ((portaudio #$(this-package-input "portaudio"))
-                       (lapack    #$(this-package-input "lapack"))
-                       (openfst   #$(this-package-input "openfst"))
-                       (openblas  #$(this-package-input "openblas")))
+                (let ((portaudio #$(this-package-input "portaudio"))
+                      (lapack    #$(this-package-input "lapack"))
+                      (openfst   #$(this-package-input "openfst"))
+                      (openblas  #$(this-package-input "openblas")))
                   #$@(if (target-x86?)
                          '()
                          #~((substitute* "makefiles/linux_openblas.mk"
@@ -1909,11 +1909,11 @@ written in C++.")
                           "--shared"
                           (string-append "--fst-root=" openfst)))))
             (add-after 'configure 'optimize-build
-                       (lambda _ (substitute* "kaldi.mk" ((" -O1") " -O3"))))
+              (lambda _ (substitute* "kaldi.mk" ((" -O1") " -O3"))))
             (replace 'install
               (lambda _
-                (let* ((inc (string-append #$output "/include"))
-                       (lib (string-append #$output "/lib")))
+                (let ((inc (string-append #$output "/include"))
+                      (lib (string-append #$output "/lib")))
                   ;; The build phase installed symlinks to the actual
                   ;; libraries.  Install the actual targets.
                   (for-each (lambda (file)