summary refs log tree commit diff
path: root/gnu
diff options
context:
space:
mode:
authorEric Bavier <bavier@member.fsf.org>2014-03-22 13:00:50 -0500
committerEric Bavier <bavier@member.fsf.org>2014-03-22 13:03:15 -0500
commit7569c5cb351c6b1f2220f45e4a93ee5262e35313 (patch)
tree0e9d4b4063dca7a7b879111c5f3c4324f4ee4833 /gnu
parent6212b8e5d3f08a3ff05111167f0b190cea800c7c (diff)
downloadguix-7569c5cb351c6b1f2220f45e4a93ee5262e35313.tar.gz
gnu: Provide single-precision fftw library for pulseaudio
* gnu/packages/algebra.scm (fftwf): New variable
* gnu/packages/pulseaudio.scm (pulseaudio): Use it
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/algebra.scm14
-rw-r--r--gnu/packages/pulseaudio.scm2
2 files changed, 14 insertions, 2 deletions
diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index a1564e000e..2bfb6be930 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -27,7 +27,8 @@
   #:use-module (guix licenses)
   #:use-module (guix packages)
   #:use-module (guix download)
-  #:use-module (guix build-system gnu))
+  #:use-module (guix build-system gnu)
+  #:use-module (guix utils))
 
 
 (define-public mpfrcx
@@ -231,3 +232,14 @@ transform (DFT) in one or more dimensions, of arbitrary input size, and of
 both real and complex data (as well as of even/odd data---i.e. the discrete
 cosine/ sine transforms or DCT/DST).")
     (license gpl2+)))
+
+(define-public fftwf
+  (package (inherit fftw)
+    (name "fftwf")
+    (arguments
+     (substitute-keyword-arguments (package-arguments fftw)
+       ((#:configure-flags cf)
+        `(cons "--enable-float" ,cf))))
+    (description
+     (string-append (package-description fftw)
+                    "  Single-precision version."))))
diff --git a/gnu/packages/pulseaudio.scm b/gnu/packages/pulseaudio.scm
index db7e752ee6..d82f4bedb6 100644
--- a/gnu/packages/pulseaudio.scm
+++ b/gnu/packages/pulseaudio.scm
@@ -168,7 +168,7 @@ parse JSON formatted strings back into the C representation of JSON objects.")
        ("pkg-config" ,pkg-config)
        ("m4" ,m4)
        ("libtool" ,libtool)
-       ("fftw" ,fftw)
+       ("fftwf" ,fftwf)
        ("avahi" ,avahi)
        ("check" ,check)))
     (propagated-inputs