diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2023-05-25 15:31:59 +0200 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2023-05-25 15:37:39 +0200 |
commit | a9c91a1cb14285f694c84d6b04973597741376da (patch) | |
tree | 9815ee34a064f622d67407c7f3bd5b21d2cc2065 /gnu/packages/machine-learning.scm | |
parent | a9cde26133bd98498869a3528d9dff0d3f456a96 (diff) | |
download | guix-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/machine-learning.scm')
-rw-r--r-- | gnu/packages/machine-learning.scm | 18 |
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) |