gnu: guile-smc: Update to 0.6.4.

* gnu/packages/guile-xyz.scm (guile-smc): Update to 0.6.4.
[arguments]: Use GEXPs.

Change-Id: I351386df795a26866773fcf49934098f0cfee1e3
This commit is contained in:
Artyom V. Poptsov 2025-07-21 18:58:12 +03:00
parent 61ecd82b9b
commit 74440ac760
No known key found for this signature in database
GPG key ID: 935EBE0736DC857E

View file

@ -7186,7 +7186,7 @@ GitLab instance.")
(define-public guile-smc (define-public guile-smc
(package (package
(name "guile-smc") (name "guile-smc")
(version "0.6.3") (version "0.6.4")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@ -7196,35 +7196,35 @@ GitLab instance.")
(file-name (string-append name "-" version)) (file-name (string-append name "-" version))
(sha256 (sha256
(base32 (base32
"1gjwz1l2ls4xkkgg4d2vw3a1klc4var03ab4k6lq1jifdvc8n51f")))) "12zg0blap8rxjx9m5bkgz5bc4ym1shii3bs3w5j41a55f0fn3p68"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:make-flags '("GUILE_AUTO_COMPILE=0") ;to prevent guild warnings (list
#:modules (((guix build guile-build-system) #:make-flags #~(list "GUILE_AUTO_COMPILE=0") ;to prevent guild warnings
#:modules `(((guix build guile-build-system)
#:select (target-guile-effective-version)) #:select (target-guile-effective-version))
,@%default-gnu-modules) ,@%default-gnu-modules)
#:imported-modules ((guix build guile-build-system) #:imported-modules `((guix build guile-build-system)
,@%default-gnu-imported-modules) ,@%default-gnu-imported-modules)
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(delete 'strip) (delete 'strip)
(add-after 'install 'wrap-program (add-after 'install 'wrap-program
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((bin (string-append #$output "/bin"))
(bin (string-append out "/bin")) (guile-lib (assoc-ref inputs "guile-lib"))
(guile-lib (assoc-ref inputs "guile-lib")) (version (target-guile-effective-version))
(version (target-guile-effective-version)) (scm (string-append "/share/guile/site/"
(scm (string-append "/share/guile/site/" version))
version)) (go (string-append "/lib/guile/"
(go (string-append "/lib/guile/" version "/site-ccache")))
version "/site-ccache"))) (wrap-program (string-append bin "/smc")
(wrap-program (string-append bin "/smc") `("GUILE_LOAD_PATH" prefix
`("GUILE_LOAD_PATH" prefix (,(string-append #$output scm)
(,(string-append out scm) ,(string-append guile-lib scm)))
,(string-append guile-lib scm))) `("GUILE_LOAD_COMPILED_PATH" prefix
`("GUILE_LOAD_COMPILED_PATH" prefix (,(string-append #$output go)
(,(string-append out go) ,(string-append guile-lib go))))))))))
,(string-append guile-lib go))))))))))
(native-inputs (native-inputs
(list autoconf (list autoconf
automake automake