diff options
| -rw-r--r-- | gnu/packages/engineering.scm | 43 |
1 files changed, 21 insertions, 22 deletions
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm index e1c6c1ec01..892013c860 100644 --- a/gnu/packages/engineering.scm +++ b/gnu/packages/engineering.scm @@ -777,28 +777,27 @@ multipole-accelerated algorithm.") (native-inputs (list gcc-9)) (build-system gnu-build-system) (arguments - `(#:make-flags '("CC=gcc" "RM=rm" "SHELL=sh" "all") - #:parallel-build? #f - #:tests? #f ;; no tests-suite - #:modules ((srfi srfi-1) - ,@%default-gnu-modules) - #:phases - (modify-phases %standard-phases - (delete 'configure) - (replace 'install - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (data (string-append out "/share")) - (bin (string-append out "/bin")) - (doc (string-append data "/doc/" ,name "-" ,version)) - (examples (string-append doc "/examples"))) - (with-directory-excursion "bin" - (for-each (lambda (f) - (install-file f bin)) - (find-files "." ".*"))) - (copy-recursively "doc" doc) - (copy-recursively "examples" examples) - #t)))))) + (list #:make-flags #~(list "CC=gcc" "RM=rm" "SHELL=sh" "all") + #:parallel-build? #f + #:tests? #f ;; no tests-suite + #:modules `((srfi srfi-1) + ,@%default-gnu-modules) + #:phases + #~(modify-phases %standard-phases + (delete 'configure) + (replace 'install + (lambda _ + (let* ((data (string-append #$output "/share")) + (bin (string-append #$output "/bin")) + (doc (string-append data "/doc/" + #$name "-" #$version)) + (examples (string-append doc "/examples"))) + (with-directory-excursion "bin" + (for-each (lambda (f) + (install-file f bin)) + (find-files "." ".*"))) + (copy-recursively "doc" doc) + (copy-recursively "examples" examples))))))) (home-page "https://www.rle.mit.edu/cpg/research_codes.htm") (synopsis "Multipole-accelerated inductance analysis program") (description |