amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: sbcl-static-dispatch: Update to 0.3-1.6243afc.

Browse source 
* gnu/packages/lisp-xyz.scm (sbcl-static-dispatch): Update to 0.3-1.6243afc.
  [propagated-inputs]: Remove cl-environment.
  [inputs]: Add sbcl-cl-environment.
  [arguments]: Remove workaround for arrows.

Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
This commit is contained in:
Sharlatan Hellseher 2021-02-03 01:30:33 +00:00 • committed by Guillaume Le Vaillant
parent 0ee538c2a2
commit 3b4aede54a
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F
1 changed files with 30 additions and 51 deletions
Download patch file Download diff file Expand all files Collapse all files

41
gnu/packages/lisp-xyz.scm
View file

@ -12412,53 +12412,32 @@ CLTL2 environment access API.")
(sbcl-package->ecl-package sbcl-cl-environments)) (sbcl-package->ecl-package sbcl-cl-environments))
(define-public sbcl-static-dispatch (define-public sbcl-static-dispatch
(let ((commit "6243afcd152854c52ba33daef7394367b657d9c6")
(revision "1"))
(package (package
(name "sbcl-static-dispatch") (name "sbcl-static-dispatch")
(version "0.3") (version (git-version "0.3" revision commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/alex-gutev/static-dispatch") (url "https://github.com/alex-gutev/static-dispatch")
(commit (string-append "v" version)))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name "static-dispatch" version))
(sha256 (sha256
(base32 "1wp5yz8liqqic3yifqf33qhccd755pd7ycvsq1j4i7k3f1wm18i0")))) (base32 "1lli9ar1xbnhkgb5d01rlw4pvfylg2arrw68np2c07fpkkafimg7"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(native-inputs
`(("prove" ,sbcl-prove)))
(inputs (inputs
`(("agutil" ,sbcl-agutil) `(("agutil" ,sbcl-agutil)
("alexandria" ,sbcl-alexandria) ("alexandria" ,sbcl-alexandria)
("anaphora" ,sbcl-anaphora) ("anaphora" ,sbcl-anaphora)
("arrows" ,sbcl-arrows) ("arrows" ,sbcl-arrows)
("cl-environments" ,sbcl-cl-environments)
("closer-mop" ,sbcl-closer-mop) ("closer-mop" ,sbcl-closer-mop)
("iterate" ,sbcl-iterate) ("iterate" ,sbcl-iterate)
("trivia" ,sbcl-trivia))) ("trivia" ,sbcl-trivia)))
(propagated-inputs
;; FIXME: `sbcl-cl-environments' input fails with
;;
;; compiling #<CL-SOURCE-FILE "collectors" "collectors">
;; Unhandled SB-INT:SIMPLE-FILE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
;; {1008238213}>:
;; Error opening #P"/.../cl-environments/src/common/package-tmp5GEXGEG5.fasl":
;; Permission denied
`(("cl-environments" ,cl-environments)))
(native-inputs
`(("prove" ,sbcl-prove)))
(arguments
`(#:phases
(modify-phases %standard-phases
;; Use `arrows' instead of cl-arrows which is abandoned and unlicensed.
;; https://github.com/nightfly19/cl-arrows/issues/5
(add-after 'unpack 'use-arrows-instead-of-cl-arrows
(lambda _
(for-each
(lambda (file)
(substitute* file
((":cl-arrows") ":arrows")))
'("static-dispatch.asd"
"src/package.lisp"
"test/methods.lisp"
"test/test.lisp")))))))
(home-page "https://github.com/alex-gutev/static-dispatch") (home-page "https://github.com/alex-gutev/static-dispatch")
(synopsis "Static generic function dispatch for Common Lisp") (synopsis "Static generic function dispatch for Common Lisp")
(description "Static dispatch is a Common Lisp library, inspired by (description "Static dispatch is a Common Lisp library, inspired by
@ -12473,7 +12452,7 @@ functions, such as adding/removing methods at runtime are not required. An
example of such a case is a generic equality comparison function. Currently example of such a case is a generic equality comparison function. Currently
generic functions are considered far too slow to implement generic arithmetic generic functions are considered far too slow to implement generic arithmetic
and comparison operations when used heavily in numeric code.") and comparison operations when used heavily in numeric code.")
(license license:expat))) (license license:expat))))
(define-public cl-static-dispatch (define-public cl-static-dispatch
(sbcl-package->cl-source-package sbcl-static-dispatch)) (sbcl-package->cl-source-package sbcl-static-dispatch))