ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-27 06:42:14 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: Add guile3.0-opengl.

Browse source 
* gnu/packages/gl.scm (guile3.0-opengl): New variable.
This commit is contained in:
Ricardo Wurmus 2020-03-14 17:30:19 +01:00
parent 59d10c3112
commit ad1edd03ad
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 21 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
gnu/packages/gl.scm
View file

@ -4,7 +4,7 @@
;;; Copyright © 2014, 2016 David Thompson <davet@gnu.org> ;;; Copyright © 2014, 2016 David Thompson <davet@gnu.org>
;;; Copyright © 2014, 2015, 2016, 2017 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2015, 2016, 2017 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2016 ng0 <ng0@n0.is> ;;; Copyright © 2016 ng0 <ng0@n0.is>
;;; Copyright © 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2016, 2017, 2018, 2020 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2016 David Thompson <davet@gnu.org> ;;; Copyright © 2016 David Thompson <davet@gnu.org>
;;; Copyright © 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
@ -603,6 +603,26 @@ (define (dynamic-link-substitute file lib input)
OpenGL graphics API.") OpenGL graphics API.")
(license license:lgpl3+))) (license license:lgpl3+)))
(define-public guile3.0-opengl
(package
(inherit guile-opengl)
(name "guile3.0-opengl")
(arguments
(substitute-keyword-arguments (package-arguments guile-opengl)
((#:phases phases)
`(modify-phases ,phases
(add-after 'unpack 'build-with-guile-3.0
(lambda _
(substitute* "configure"
(("_guile_versions_to_search=\"")
"_guile_versions_to_search=\"3.0 "))
#t))))))
(inputs
`(("guile" ,guile-3.0)
("mesa" ,mesa)
("glu" ,glu)
("freeglut" ,freeglut)))))
(define-public libepoxy (define-public libepoxy
(package (package
(name "libepoxy") (name "libepoxy")