nckx pushed a commit to branch core-updates
in repository guix.

commit b07e817e21b794ec81499dc38125775d6722cc48
Author: Tobias Geerinckx-Rice <m...@tobias.gr>
Date:   Mon Feb 19 21:46:15 2018 +0100

    gnu: fftw: Update phase style.
    
    * gnu/packages/algebra.scm (fftw)[arguments]: Use MODIFY-PHASES syntax
    and end phase with #t.
---
 gnu/packages/algebra.scm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index f904396..8c42ac3 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -530,16 +530,17 @@ a C program.")
     (arguments
      '(#:configure-flags
        '("--enable-shared" "--enable-openmp" "--enable-threads")
-       #:phases (alist-cons-before
-                 'build 'no-native
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'build 'no-native
                  (lambda _
                    ;; By default '-mtune=native' is used.  However, that may
                    ;; cause the use of ISA extensions (SSE2, etc.) that are
                    ;; not necessarily available on the user's machine when
                    ;; that package is built on a different machine.
                    (substitute* (find-files "." "Makefile$")
-                     (("-mtune=native") "")))
-                 %standard-phases)))
+                     (("-mtune=native") ""))
+                   #t)))))
     (native-inputs `(("perl" ,perl)))
     (home-page "http://fftw.org";)
     (synopsis "Computing the discrete Fourier transform")

Reply via email to