me
/
guix
Archived
1
0
Fork 0

gnu: sbcl-iolib: Update to 0.8.4.

* gnu/packages/lisp-xyz.scm (sbcl-iolib): Update to 0.8.4.
master
Pierre Neidhardt 2021-06-09 08:00:28 +02:00
parent 86bb77608d
commit 054ebbf7db
No known key found for this signature in database
GPG Key ID: 9BDCF497A4BBCC7F
1 changed files with 47 additions and 50 deletions

View File

@ -5858,59 +5858,56 @@ formats.")
(sbcl-package->ecl-package sbcl-swap-bytes)) (sbcl-package->ecl-package sbcl-swap-bytes))
(define-public sbcl-iolib (define-public sbcl-iolib
;; Latest release is from June 2017. (package
(let ((commit "7f5ea3a8457a29d224b24653c2b3657fb1898021") (name "sbcl-iolib")
(revision "2")) (version "0.8.4")
(package (home-page "https://github.com/sionescu/iolib")
(name "sbcl-iolib") (source
(version (git-version "0.8.3" revision commit)) (origin
(home-page "https://github.com/sionescu/iolib") (method git-fetch)
(source (uri (git-reference
(origin (url home-page)
(method git-fetch) (commit (string-append "v" version))))
(uri (git-reference (file-name (git-file-name name version))
(url home-page) (sha256
(commit commit))) (base32
(file-name (git-file-name name version)) "1f43jqqqwp9n7xksqxw91myapsdbc2dxck6nd6flakbnp9haylyq"))))
(sha256 (build-system asdf-build-system/sbcl)
(base32 (inputs
"1bg5w7lm61hqk4b0svmri8a590q36z76jfa0sdgzb39r98c04w12")))) `(("alexandria" ,sbcl-alexandria)
(build-system asdf-build-system/sbcl) ("bordeaux-threads" ,sbcl-bordeaux-threads)
(inputs ("cffi" ,sbcl-cffi)
`(("alexandria" ,sbcl-alexandria) ("idna" ,sbcl-idna)
("bordeaux-threads" ,sbcl-bordeaux-threads) ("libfixposix" ,libfixposix)
("cffi" ,sbcl-cffi) ("split-sequence" ,sbcl-split-sequence)
("idna" ,sbcl-idna) ("swap-bytes" ,sbcl-swap-bytes)))
("libfixposix" ,libfixposix) (arguments
("split-sequence" ,sbcl-split-sequence) '(#:asd-files '("iolib.asdf.asd"
("swap-bytes" ,sbcl-swap-bytes))) "iolib.conf.asd"
(arguments "iolib.common-lisp.asd"
'(#:asd-files '("iolib.asdf.asd" "iolib.base.asd"
"iolib.conf.asd" "iolib.asd")
"iolib.common-lisp.asd" #:asd-systems '("iolib"
"iolib.base.asd" "iolib/os")
"iolib.asd") #:phases
#:asd-systems '("iolib" (modify-phases %standard-phases
"iolib/os") (add-after 'unpack 'fix-paths
#:phases (lambda* (#:key inputs #:allow-other-keys)
(modify-phases %standard-phases (substitute* "src/syscalls/ffi-functions-unix.lisp"
(add-after 'unpack 'fix-paths (("\\(:default \"libfixposix\"\\)")
(lambda* (#:key inputs #:allow-other-keys) (string-append
(substitute* "src/syscalls/ffi-functions-unix.lisp" "(:default \""
(("\\(:default \"libfixposix\"\\)") (assoc-ref inputs "libfixposix") "/lib/libfixposix\")")))
(string-append ;; Socket tests need Internet access, disable them.
"(:default \"" (substitute* "iolib.asd"
(assoc-ref inputs "libfixposix") "/lib/libfixposix\")"))) (("\\(:file \"sockets\" :depends-on \\(\"pkgdcl\" \"defsuites\"\\)\\)")
;; Socket tests need Internet access, disable them. "")))))))
(substitute* "iolib.asd" (synopsis "Common Lisp I/O library")
(("\\(:file \"sockets\" :depends-on \\(\"pkgdcl\" \"defsuites\"\\)\\)") (description "IOlib is to be a better and more modern I/O library than
"")))))))
(synopsis "Common Lisp I/O library")
(description "IOlib is to be a better and more modern I/O library than
the standard Common Lisp library. It contains a socket library, a DNS the standard Common Lisp library. It contains a socket library, a DNS
resolver, an I/O multiplexer(which supports @code{select(2)}, @code{epoll(4)} resolver, an I/O multiplexer(which supports @code{select(2)}, @code{epoll(4)}
and @code{kqueue(2)}), a pathname library and file-system utilities.") and @code{kqueue(2)}), a pathname library and file-system utilities.")
(license license:expat)))) (license license:expat)))
(define-public cl-iolib (define-public cl-iolib
(let ((parent (sbcl-package->cl-source-package sbcl-iolib))) (let ((parent (sbcl-package->cl-source-package sbcl-iolib)))