TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: python-on-guile: Update to 1.2.3.4.

Browse source 
* gnu/packages/guile-xyz.scm (python-on-guile): Update to 1.2.3.
[source]: Download from <https://gitlab.com/python-on-guile/python-on-guile>.
[inputs]: Change from GUILE-2.2 to GUILE-3.0.
[arguments]: Add phase augment-GUILE_LOAD_PATH.
This commit is contained in:
Marius Bakke 2020-06-23 16:32:33 +02:00
parent 09f0bc87a9
commit ac94458485
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 53 additions and 50 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

103
gnu/packages/guile-xyz.scm
View file

@ -2572,57 +2572,60 @@ (define-public guile-persist
(license license:lgpl2.0+))) (license license:lgpl2.0+)))
(define-public python-on-guile (define-public python-on-guile
(let ((commit "00a51a23247f1edc4ae8eda72b30df5cd7d0015f") (package
(revision "3")) (name "python-on-guile")
(package (version "1.2.3.4")
(name "python-on-guile") (home-page "https://gitlab.com/python-on-guile/python-on-guile")
(version (git-version "0.1.0" revision commit)) (source (origin
(source (origin (method git-fetch)
(method git-fetch) (uri (git-reference (url home-page)
(uri (git-reference (commit (string-append "v" version))))
(url "https://git.elephly.net/software/python-on-guile.git") (file-name (git-file-name name version))
(commit commit))) (sha256
(file-name (git-file-name name version)) (base32
(sha256 "1qn5f79z43jh0rqh39a0qal81nsnw3cd5pj0d1j5cm3nhj5s64a7"))))
(base32 (build-system gnu-build-system)
"03rpnqr08rqr3gay128g564rwk8w4jbj28ss6b46z1d4vjs4nk68")))) (arguments
(build-system gnu-build-system) `(#:parallel-build? #f ;not supported
(arguments #:make-flags '("GUILE_AUTO_COMPILE=0") ;to prevent guild warnings
`(#:parallel-build? #f ; not supported #:phases
#:make-flags '("GUILE_AUTO_COMPILE=0") ;to prevent guild warnings (modify-phases %standard-phases
(add-after 'unpack 'chdir
#:phases (lambda _ (chdir "modules") #t))
(modify-phases %standard-phases (add-after 'chdir 'augment-GUILE_LOAD_PATH
(add-after 'unpack 'chdir (lambda _
(lambda _ (chdir "modules") #t)) ;; TODO: It would be better to patch the Makefile.
(add-after 'install 'wrap (setenv "GUILE_LOAD_PATH"
(lambda* (#:key outputs #:allow-other-keys) (string-append ".:"
;; Wrap the 'python' executable so it can find its (getenv "GUILE_LOAD_PATH")))
;; dependencies. #t))
(let ((out (assoc-ref outputs "out"))) (add-after 'install 'wrap
(wrap-program (string-append out "/bin/python") (lambda* (#:key outputs #:allow-other-keys)
`("GUILE_LOAD_PATH" ":" prefix ;; Wrap the 'python' executable so it can find its
(,(getenv "GUILE_LOAD_PATH"))) ;; dependencies.
`("GUILE_LOAD_COMPILED_PATH" ":" prefix (let ((out (assoc-ref outputs "out")))
(,(getenv "GUILE_LOAD_COMPILED_PATH")))) (wrap-program (string-append out "/bin/python")
#t)))))) `("GUILE_LOAD_PATH" ":" prefix
(inputs (,(getenv "GUILE_LOAD_PATH")))
`(("guile" ,guile-2.2))) `("GUILE_LOAD_COMPILED_PATH" ":" prefix
(propagated-inputs (,(getenv "GUILE_LOAD_COMPILED_PATH"))))
`(("guile-persist" ,guile-persist) #t))))))
("guile-readline" ,guile-readline) (inputs
("guile-stis-parser" ,guile-stis-parser))) `(("guile" ,guile-3.0)))
(native-inputs (propagated-inputs
`(("autoconf" ,autoconf) `(("guile-persist" ,guile-persist)
("automake" ,automake) ("guile-readline" ,guile-readline)
("libtool" ,libtool) ("guile-stis-parser" ,guile-stis-parser)))
("pkg-config" ,pkg-config))) (native-inputs
(home-page "https://gitlab.com/python-on-guile/python-on-guile/") `(("autoconf" ,autoconf)
(synopsis "Python implementation in Guile") ("automake" ,automake)
(description ("libtool" ,libtool)
"This package allows you to compile a Guile Python file to any target ("pkg-config" ,pkg-config)))
(synopsis "Python implementation in Guile")
(description
"This package allows you to compile a Guile Python file to any target
from @code{tree-il}.") from @code{tree-il}.")
(license license:lgpl2.0+)))) (license license:lgpl2.0+)))
(define-public guile-file-names (define-public guile-file-names
(package (package