ui.backend.gtk: only run the tests on linux
parent
9d95602591
commit
d6a9122967
|
@ -1,5 +1,5 @@
|
||||||
USING: alien.syntax classes.struct gdk.ffi tools.test ui.backend.gtk
|
USING: alien.syntax classes.struct gdk.ffi kernel system tools.test
|
||||||
ui.gestures ;
|
ui.backend.gtk ui.gestures ;
|
||||||
IN: ui.backend.gtk.tests
|
IN: ui.backend.gtk.tests
|
||||||
|
|
||||||
: gdk-key-release-event ( -- event )
|
: gdk-key-release-event ( -- event )
|
||||||
|
@ -47,6 +47,8 @@ IN: ui.backend.gtk.tests
|
||||||
{ is_modifier 1 }
|
{ is_modifier 1 }
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
|
! The Mac build servers doesn't have the gtk libs
|
||||||
|
os linux? [
|
||||||
{
|
{
|
||||||
T{ key-down f f "F2" }
|
T{ key-down f f "F2" }
|
||||||
T{ key-up f f "H" }
|
T{ key-up f f "H" }
|
||||||
|
@ -56,3 +58,4 @@ IN: ui.backend.gtk.tests
|
||||||
gdk-key-release-event key-event>gesture
|
gdk-key-release-event key-event>gesture
|
||||||
gdk-space-key-press-event key-event>gesture
|
gdk-space-key-press-event key-event>gesture
|
||||||
] unit-test
|
] unit-test
|
||||||
|
] when
|
||||||
|
|
Loading…
Reference in New Issue