aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-10-14 15:24:19 +0200
committerLudovic Courtès <ludo@gnu.org>2017-10-14 17:07:36 +0200
commit8380a1817603e0f2b30fca2bc26923f6c93ae1c7 (patch)
tree94f2599dfcb335e2dd16db59b6fd630669898d04
parent44394ef91796dcc86bdef0b4053f996142c6fc11 (diff)
downloadguix-8380a1817603e0f2b30fca2bc26923f6c93ae1c7.tar
guix-8380a1817603e0f2b30fca2bc26923f6c93ae1c7.tar.gz
gnu: guile-sdl, guile-sly: Switch to Guile 2.2.
* gnu/packages/sdl.scm (guile-sdl)[inputs]: Replace GUILE-2.0 with GUILE-2.2. [arguments]: Add 'skip-cursor-test' phase. * gnu/packages/guile.scm (guile-sly)[propagated-inputs]: Switch to GUILE-2.2.
-rw-r--r--gnu/packages/guile.scm2
-rw-r--r--gnu/packages/sdl.scm12
2 files changed, 12 insertions, 2 deletions
diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 6ab120770d..55aeff172d 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -1374,7 +1374,7 @@ users and in some situations.")
(native-inputs
`(("pkg-config" ,pkg-config)))
(propagated-inputs
- `(("guile" ,guile-2.0)
+ `(("guile" ,guile-2.2)
("guile-sdl" ,guile-sdl)
("guile-opengl" ,guile-opengl)))
(inputs
diff --git a/gnu/packages/sdl.scm b/gnu/packages/sdl.scm
index bdf36f3b02..d3edac14ff 100644
--- a/gnu/packages/sdl.scm
+++ b/gnu/packages/sdl.scm
@@ -403,7 +403,7 @@ directory.")
("xorg-server" ,xorg-server)
("libjpeg" ,libjpeg)))
(inputs
- `(("guile" ,guile-2.0)
+ `(("guile" ,guile-2.2)
("sdl-union" ,(sdl-union))))
(arguments
'(#:configure-flags
@@ -446,6 +446,16 @@ directory.")
(system (format #f "~a/bin/Xvfb :1 &"
(assoc-ref inputs "xorg-server")))
(setenv "DISPLAY" ":1")
+ #t))
+ (add-before 'check 'skip-cursor-test
+ (lambda _
+ ;; XXX: This test sometimes enters an endless loop, and sometimes
+ ;; crashes with:
+ ;; guile: xcb_io.c:147: append_pending_request: Assertion `!xcb_xlib_unknown_seq_number' failed.
+ ;; Skip it.
+ (substitute* "test/cursor.scm"
+ (("\\(SDL:init .*" all)
+ (string-append "(exit 77) ;" all "\n")))
#t)))))
(synopsis "Guile interface for SDL (Simple DirectMedia Layer)")
(description "Guile-SDL is a set of bindings to the Simple DirectMedia