gnu: sbcl-usocket: Update to 0.8.3.

* gnu/packages/lisp-xyz.scm (sbcl-usocket-boot0): Update to 0.8.3 and don't
  make this variable public.
  (sbcl-usocket-server)[inputs]: Replace portable-threads by bordeaux-threads.
  (ecl-socket): Rename variable to ecl-usocket.
This commit is contained in:
Guillaume Le Vaillant 2020-02-04 12:06:53 +01:00
parent f6a6f085a4
commit b23e6f5d9a
No known key found for this signature in database
GPG Key ID: 6BE8208ADF21FE3F

View File

@ -3177,44 +3177,43 @@ Lisp (from GBBopen project).")
(define-public ecl-portable-threada (define-public ecl-portable-threada
(sbcl-package->ecl-package sbcl-portable-threads)) (sbcl-package->ecl-package sbcl-portable-threads))
(define-public sbcl-usocket-boot0 (define sbcl-usocket-boot0
;; usocket's test rely on usocket-server which depends on usocket itself. ;; usocket's test rely on usocket-server which depends on usocket itself.
;; We break this cyclic dependency with -boot0 that packages usocket. ;; We break this cyclic dependency with -boot0 that packages usocket.
(let ((commit "86e7efbfe50101931edf4b67cdcfa7e221ecfde9")) (package
(package (name "sbcl-usocket-boot0")
(name "sbcl-usocket-boot0") (version "0.8.3")
(version (git-version "0.7.1" "1" commit)) (source
(source (origin
(origin (method git-fetch)
(method git-fetch) (uri (git-reference
(uri (git-reference (url "https://github.com/usocket/usocket/")
(url "https://github.com/usocket/usocket/") (commit (string-append "v" version))))
(commit commit))) (file-name (git-file-name "usocket" version))
(file-name (git-file-name "usocket" version)) (sha256
(sha256 (base32
(base32 "0x746wr2324l6bn7skqzgkzcbj5kd0zp2ck0c8rldrw0rzabg826"))))
"1lk6ipakrib7kdgzw44hrgmls9akp5pz4h35yynw0k5zwmmq6374")))) (build-system asdf-build-system/sbcl)
(build-system asdf-build-system/sbcl) (inputs
(inputs `(("split-sequence" ,sbcl-split-sequence)))
`(("split-sequence" ,sbcl-split-sequence))) (arguments
(arguments `(#:tests? #f
`(#:tests? #f #:asd-system-name "usocket"))
#:asd-system-name "usocket")) (home-page "https://common-lisp.net/project/usocket/")
(home-page "https://common-lisp.net/project/usocket/") (synopsis "Universal socket library for Common Lisp (server side)")
(synopsis "Universal socket library for Common Lisp (server side)") (description
(description "This library strives to provide a portable TCP/IP and UDP/IP socket
"This library strives to provide a portable TCP/IP and UDP/IP socket
interface for as many Common Lisp implementations as possible, while keeping interface for as many Common Lisp implementations as possible, while keeping
the abstraction and portability layer as thin as possible.") the abstraction and portability layer as thin as possible.")
(license license:expat)))) (license license:expat)))
(define-public sbcl-usocket-server (define-public sbcl-usocket-server
(package (package
(inherit sbcl-usocket-boot0) (inherit sbcl-usocket-boot0)
(name "sbcl-usocket-server") (name "sbcl-usocket-server")
(inputs (inputs
`(("usocket" ,sbcl-usocket-boot0) `(("bordeaux-threads" ,sbcl-bordeaux-threads)
("portable-threads" ,sbcl-portable-threads))) ("usocket" ,sbcl-usocket-boot0)))
(arguments (arguments
'(#:asd-system-name "usocket-server")) '(#:asd-system-name "usocket-server"))
(synopsis "Universal socket library for Common Lisp (server side)"))) (synopsis "Universal socket library for Common Lisp (server side)")))
@ -3240,7 +3239,7 @@ the abstraction and portability layer as thin as possible.")
(define-public cl-usocket (define-public cl-usocket
(sbcl-package->cl-source-package sbcl-usocket)) (sbcl-package->cl-source-package sbcl-usocket))
(define-public ecl-socket (define-public ecl-usocket
(sbcl-package->ecl-package sbcl-usocket)) (sbcl-package->ecl-package sbcl-usocket))
(define-public sbcl-s-xml (define-public sbcl-s-xml