TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: Add cl-opengl.

Browse source 
* gnu/packages/lisp-xyz.scm: (sbcl-cl-opengl, cl-opengl, ecl-cl-opengl):
  New variables.

Signed-off-by: Guillaume Le Vaillant <glv@posteo.net>
This commit is contained in:
Sharlatan Hellseher 2021-04-02 21:46:37 +01:00 committed by Guillaume Le Vaillant
parent 39f69aff21
commit 83ecb38148
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F
1 changed files with 53 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -64,6 +64,7 @@ (define-module (gnu packages lisp-xyz)
#:use-module (gnu packages file)
#:use-module (gnu packages fonts)
#:use-module (gnu packages fontutils)
#:use-module (gnu packages gl)
#:use-module (gnu packages glib)
#:use-module (gnu packages gtk)
#:use-module (gnu packages imagemagick)
@ -15564,3 +15565,55 @@ (define-public ecl-cl-conspack
(define-public cl-conspack
(sbcl-package->cl-source-package sbcl-cl-conspack))
(define-public sbcl-cl-opengl
(let ((commit "e2d83e0977b7e7ac3f3d348d8ccc7ccd04e74d59")
(revision "1"))
(package
(name "sbcl-cl-opengl")
(version (git-version "0.1.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/3b/cl-opengl")
(commit commit)))
(file-name (git-file-name "cl-opengl" version))
(sha256
(base32 "0mhqmll09f079pnd6mgswz9nvr6h5n27d4q7zpmm2igf1v460id7"))))
(build-system asdf-build-system/sbcl)
(arguments
`(#:asd-systems '("cl-opengl" "cl-glu" "cl-glut")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'patch-lib-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "gl/library.lisp"
(("libGL.so" all)
(string-append (assoc-ref inputs "mesa") "/lib/" all)))
(substitute* "glu/library.lisp"
(("libGLU.so" all)
(string-append (assoc-ref inputs "glu") "/lib/" all)))
(substitute* "glut/library.lisp"
(("libglut.so" all)
(string-append (assoc-ref inputs "freeglut") "/lib/" all)))
#t)))))
(inputs
`(("alexandria" ,sbcl-alexandria)
("cffi" ,sbcl-cffi)
("float-features" ,sbcl-float-features)
("freeglut" ,freeglut)
("glu" ,glu)
("mesa" ,mesa)))
(home-page "https://github.com/3b/cl-opengl")
(synopsis "Common Lisp bindings to OpenGL, GLU and GLUT APIs")
(description
"This package provides a set of bindings and utilities for accessing the
OpenGL (Mesa), GLU and GLUT (FreeGLUT) APIs using CFFI.")
(license license:bsd-3))))
(define-public ecl-cl-opengl
(sbcl-package->ecl-package sbcl-cl-opengl))
(define-public cl-opengl
(sbcl-package->cl-source-package sbcl-cl-opengl))