me
/
guix
Archived
1
0
Fork 0
Code

gnu: go: Make 'make-go-std' memoizing. 

* gnu/packages/golang.scm (make-go-std): Use 'mlambdaq'.
master
Ludovic Courtès 2022-06-02 14:40:57 +02:00
parent fb21085d25
commit 5b6b4ade7c
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 33 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gnu/packages/golang.scm
View File

@ -53,6 +53,7 @@
(define-module (gnu packages golang) (define-module (gnu packages golang)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (guix memoization)
#:use-module ((guix build utils) #:select (alist-replace)) #:use-module ((guix build utils) #:select (alist-replace))
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix git-download) #:use-module (guix git-download)
@ -840,7 +841,8 @@ in the style of communicating sequential processes (@dfn{CSP}).")
(define-public go go-1.17) (define-public go go-1.17)
(define-public (make-go-std go) (define make-go-std
(mlambdaq (go)
"Return a package which builds the standard library for Go compiler GO." "Return a package which builds the standard library for Go compiler GO."
(package (package
(name (string-append (package-name go) "-std")) (name (string-append (package-name go) "-std"))
@ -868,7 +870,9 @@ in the style of communicating sequential processes (@dfn{CSP}).")
(home-page (package-home-page go)) (home-page (package-home-page go))
(synopsis "Cached standard library build for Go") (synopsis "Cached standard library build for Go")
(description (package-description go)) (description (package-description go))
(license (package-license go)))) (license (package-license go)))))
(export make-go-std)
;; Make those public so they have a corresponding Cuirass job. ;; Make those public so they have a corresponding Cuirass job.
(define-public go-std-1.14 (make-go-std go-1.14)) (define-public go-std-1.14 (make-go-std go-1.14))