nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: lapack: Use origin snippet to remove the non-free files. 

* gnu/packages/maths.scm (lapack): Add 'snippet' field with contents of
  former 'remove-non-free-files' phase; remove that phase.
This commit is contained in:
Ludovic Courtès 2013-11-07 23:07:45 +01:00
parent f9cc897105
commit 6a9957545c
1 changed files with 16 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
gnu/packages/maths.scm
View File

@ -169,7 +169,16 @@ text, Postscript, PDF or HTML.")
version ".tgz")) version ".tgz"))
(sha256 (sha256
(base32 (base32
"1w7sf8888m7fi2kyx1fzgbm22193l8c2d53m8q1ibhvfy6m5v9k0")))) "1w7sf8888m7fi2kyx1fzgbm22193l8c2d53m8q1ibhvfy6m5v9k0"))
(snippet
;; Remove non-free files.
;; See <http://icl.cs.utk.edu/lapack-forum/archives/lapack/msg01383.html>.
'(for-each (lambda (file)
(format #t "removing '~a'~%" file)
(delete-file file))
'("lapacke/example/example_DGESV_rowmajor.c"
"lapacke/example/example_ZGESV_rowmajor.c"
"DOCS/psfig.tex")))))
(build-system cmake-build-system) (build-system cmake-build-system)
(home-page "http://www.netlib.org/lapack/") (home-page "http://www.netlib.org/lapack/")
(inputs `(("fortran" ,gfortran-4.8) (inputs `(("fortran" ,gfortran-4.8)
@ -179,23 +188,12 @@ text, Postscript, PDF or HTML.")
(guix build utils) (guix build utils)
(srfi srfi-1)) (srfi srfi-1))
#:phases (alist-cons-before #:phases (alist-cons-before
;; See <http://icl.cs.utk.edu/lapack-forum/archives/lapack/msg01383.html>. 'check 'patch-python
'configure 'remove-non-free-files (lambda* (#:key inputs #:allow-other-keys)
(lambda _ (let ((python (assoc-ref inputs "python")))
(for-each (lambda (file) (substitute* "lapack_testing.py"
(begin (("/usr/bin/env python") python))))
(format #t "removing '~a'~%" file) %standard-phases)))
(delete-file file)))
'("lapacke/example/example_DGESV_rowmajor.c"
"lapacke/example/example_ZGESV_rowmajor.c"
"DOCS/psfig.tex")))
(alist-cons-before
'check 'patch-python
(lambda* (#:key inputs #:allow-other-keys)
(let ((python (assoc-ref inputs "python")))
(substitute* "lapack_testing.py"
(("/usr/bin/env python") python))))
%standard-phases))))
(synopsis "Library for numerical linear algebra") (synopsis "Library for numerical linear algebra")
(description (description
"LAPACK is a Fortran 90 library for solving the most commonly occurring "LAPACK is a Fortran 90 library for solving the most commonly occurring