me
/
guix
Archived
1
0
Fork 0

gnu: cl-sdl2: Remove input labels.

* gnu/packages/lisp.scm (sbcl-sdl2):
  [arguments]{asd-systems}: Add sdl2/examples.
  {phases}<fix-path>: Remove trailing #f from lambda, use
  search-input-file to link SO library.
  [inputs]: Remove labels, add sbcl-cl-opengl.

Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
Sharlatan Hellseher 2023-02-24 22:23:46 +00:00 committed by Guillaume Le Vaillant
parent 4ca869d151
commit 945edb8654
No known key found for this signature in database
GPG Key ID: 6BE8208ADF21FE3F
1 changed files with 11 additions and 10 deletions

View File

@ -20138,21 +20138,22 @@ except system libraries.")
(base32 "0sjy4k04k0hdhwpr57ns16ag3za0kz4laclbk17i91ql7qdjw9z2")))) (base32 "0sjy4k04k0hdhwpr57ns16ag3za0kz4laclbk17i91ql7qdjw9z2"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(arguments (arguments
`(#:phases `(#:asd-systems '("sdl2" "sdl2/examples")
#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'fix-paths (add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/library.lisp" (substitute* "src/library.lisp"
(("libSDL2-2.0.so.0" all) (("libSDL2-2.0.so.0")
(string-append (assoc-ref inputs "libsdl2") "/lib/" all))) (search-input-file inputs "/lib/libSDL2-2.0.so.0"))))))))
#t)))))
(inputs (inputs
`(("alexandria" ,sbcl-alexandria) (list sbcl-alexandria
("cl-autowrap" ,sbcl-cl-autowrap) sbcl-cl-autowrap
("cl-ppcre" ,sbcl-cl-ppcre) sbcl-cl-opengl
("libsdl2" ,sdl2) sbcl-cl-ppcre
("trivial-channels" ,sbcl-trivial-channels) sbcl-trivial-channels
("trivial-features" ,sbcl-trivial-features))) sbcl-trivial-features
sdl2))
(home-page "https://github.com/lispgames/cl-sdl2") (home-page "https://github.com/lispgames/cl-sdl2")
(synopsis "Common Lisp bindings for SDL2 using C2FFI") (synopsis "Common Lisp bindings for SDL2 using C2FFI")
(description (description