gnu: gcl: Use 'modify-phases' syntax.
* gnu/packages/lisp.scm (gcl)[arguments]: Use 'modify-phases' syntax.
This commit is contained in:
		
							parent
							
								
									47fb74aebc
								
							
						
					
					
						commit
						1803f2493e
					
				
					 1 changed files with 20 additions and 21 deletions
				
			
		|  | @ -88,8 +88,8 @@ | ||||||
|      `(#:parallel-build? #f  ; The build system seems not to be thread safe. |      `(#:parallel-build? #f  ; The build system seems not to be thread safe. | ||||||
|        #:tests? #f  ; There does not seem to be make check or anything similar. |        #:tests? #f  ; There does not seem to be make check or anything similar. | ||||||
|        #:configure-flags '("--enable-ansi") ; required for use by the maxima package |        #:configure-flags '("--enable-ansi") ; required for use by the maxima package | ||||||
|        #:phases (alist-cons-before |        #:phases (modify-phases %standard-phases | ||||||
|                 'configure 'pre-conf |                   (add-before 'configure 'pre-conf | ||||||
|                     (lambda _ |                     (lambda _ | ||||||
|                       (substitute* |                       (substitute* | ||||||
|                         (append |                         (append | ||||||
|  | @ -104,11 +104,10 @@ | ||||||
|                          (string-append "SHELL=" (which "bash"))) |                          (string-append "SHELL=" (which "bash"))) | ||||||
|                         (("SHELL=/bin/sh") |                         (("SHELL=/bin/sh") | ||||||
|                          (string-append "SHELL=" (which "sh")))) |                          (string-append "SHELL=" (which "sh")))) | ||||||
|                   #t) |                       #t)) | ||||||
|                   ;; drop strip phase to make maxima build, see |                   ;; drop strip phase to make maxima build, see | ||||||
|                   ;; https://www.ma.utexas.edu/pipermail/maxima/2008/009769.html |                   ;; https://www.ma.utexas.edu/pipermail/maxima/2008/009769.html | ||||||
|                 (alist-delete 'strip |                   (delete 'strip)))) | ||||||
|                  %standard-phases)))) |  | ||||||
|     (inputs |     (inputs | ||||||
|      `(("gmp" ,gmp) |      `(("gmp" ,gmp) | ||||||
|        ("readline" ,readline))) |        ("readline" ,readline))) | ||||||
|  |  | ||||||
		Reference in a new issue