… | … | ||
---|---|---|---|
90 | print $s == 0 ? "" : "not ", "ok 6 # $s\n"; | 90 | print $s == 0 ? "" : "not ", "ok 6 # $s\n"; |
91 | 91 | ||
92 | kill INT => $$; | 92 | kill INT => $$; |
93 | 93 | ||
94 | $cv = AE::cv; | 94 | $cv = AE::cv; |
95 | $wt = AE::timer 0.01, 0, $cv; | 95 | $wt = AE::timer 0.2, 0, $cv; # maybe OS X needs more time here? |
96 | 96 | ||
97 | $s = 0; | 97 | $s = 0; |
98 | $cv->recv; | 98 | $cv->recv; |
99 | 99 | ||
100 | print $s == 3 ? "" : "not ", "ok 7 # $s\n"; | 100 | print $s == 3 ? "" : "not ", "ok 7 # $s\n"; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |