01-sanity.rakutest

use v6;
use Test;
use GTK::Simple;
use GTK::Simple::Scheduler;

plan *;

if %*ENV<DISPLAY> or $*DISTRO.is-win {
    my $g;
    lives-ok {$g = GTK::Simple::App.new}, "Can create GTK::Simple::App instance.";
    lives-ok {GTK::Simple::Scheduler.new.cue: {$g.exit}}, "Can use GTK::Simple::Scheduler to cue app exit.";
    lives-ok {$g.run}, "Running the app works.";
}

done-testing;