t/op/sigdispatch.t: TODO tests that don't work on some Android builds
authorJess Robinson <castaway@desert-island.me.uk>
Fri, 19 Apr 2013 11:08:34 +0000 (12:08 +0100)
committerBrian Fraser <fraserbn@gmail.com>
Sun, 26 Jan 2014 17:44:22 +0000 (14:44 -0300)
t/op/sigdispatch.t

index 1105504..9c583f7 100644 (file)
@@ -97,7 +97,9 @@ TODO:
        # of a reliable way to probe for this, so for now, just skip the
        # tests on production releases
        skip("some OSes hang here", 3) if (int($]*1000) & 1) == 0;
-
+    
+  TODO: {
+       local $::TODO = "Issues on Android" if $^O =~ /android/;
        my $action = POSIX::SigAction->new(sub { $gotit--, die }, POSIX::SigSet->new, 0);
        POSIX::sigaction(&POSIX::SIGALRM, $action);
        eval {
@@ -110,6 +112,7 @@ TODO:
        is $gotit, 0, 'Received both signals';
     }
 }
+}
 
 SKIP: {
     skip("alarm cannot interrupt blocking system calls on $^O", 2)