me/guix
Archived
1
0
Fork 0
Code Activity

Revert "gnu: maxima: Ensure gcc is available at runtime."

Browse source 
This reverts commit f2fa86cc82.
Commit 5ea8dbf0c9 fixes the underlying
issue in GNU Common Lisp.
This commit is contained in:
Kei Kebreau 2017-07-08 18:50:48 -04:00
parent 5ea8dbf0c9
commit 6b2eafaaa8
No known key found for this signature in database
GPG key ID: E6A5EE3C19467A0D
1 changed files with 31 additions and 40 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
gnu/packages/maths.scm
View file

@ -2075,8 +2075,7 @@ to BMP, JPEG or PNG image formats.")
(patches (search-patches "maxima-defsystem-mkdir.patch")))) (patches (search-patches "maxima-defsystem-mkdir.patch"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
`(("gcc" ,gcc) `(("gcl" ,gcl)
("gcl" ,gcl)
("gnuplot" ,gnuplot) ;for plots ("gnuplot" ,gnuplot) ;for plots
("tk" ,tk))) ;Tcl/Tk is used by 'xmaxima' ("tk" ,tk))) ;Tcl/Tk is used by 'xmaxima'
(native-inputs (native-inputs
@ -2098,23 +2097,15 @@ to BMP, JPEG or PNG image formats.")
;; '/tmp/nix-build-maxima-*', which won't exist at run time. ;; '/tmp/nix-build-maxima-*', which won't exist at run time.
;; Work around that. ;; Work around that.
#:make-flags (list "TMPDIR=/tmp") #:make-flags (list "TMPDIR=/tmp")
#:phases #:phases (alist-cons-before
(modify-phases %standard-phases 'check 'pre-check
(add-before 'configure 'set-gcc-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "lisp-utils/defsystem.lisp"
(("\\(defparameter \\*c-compiler\\* \"gcc\"\\)")
(string-append "(defparameter *c-compiler* \""
(assoc-ref inputs "gcc") "/bin/gcc\")")))
#t))
(add-before 'check 'pre-check
(lambda _ (lambda _
(chmod "src/maxima" #o555) (chmod "src/maxima" #o555))
#t))
;; Make sure the doc and emacs files are found in the ;; Make sure the doc and emacs files are found in the
;; standard location. Also configure maxima to find gnuplot ;; standard location. Also configure maxima to find gnuplot
;; without having it on the PATH. ;; without having it on the PATH.
(add-after 'install 'post-install (alist-cons-after
'install 'post-install
(lambda* (#:key outputs inputs #:allow-other-keys) (lambda* (#:key outputs inputs #:allow-other-keys)
(let* ((gnuplot (assoc-ref inputs "gnuplot")) (let* ((gnuplot (assoc-ref inputs "gnuplot"))
(out (assoc-ref outputs "out")) (out (assoc-ref outputs "out"))
@ -2134,8 +2125,8 @@ to BMP, JPEG or PNG image formats.")
(format out "~a ~s~a~%" (format out "~a ~s~a~%"
"(setf $gnuplot_command " "(setf $gnuplot_command "
(string-append gnuplot "/bin/gnuplot") ")") (string-append gnuplot "/bin/gnuplot") ")")
(dump-port in out))))) (dump-port in out))))))
#t))))) %standard-phases))))
(home-page "http://maxima.sourceforge.net") (home-page "http://maxima.sourceforge.net")
(synopsis "Numeric and symbolic expression manipulation") (synopsis "Numeric and symbolic expression manipulation")
(description "Maxima is a system for the manipulation of symbolic and (description "Maxima is a system for the manipulation of symbolic and