ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/IO-AIO/t/07_feeder.t
(Generate patch)

Comparing IO-AIO/t/07_feeder.t (file contents):
Revision 1.3 by root, Tue Oct 24 03:17:40 2006 UTC vs.
Revision 1.4 by root, Tue Oct 24 11:57:30 2006 UTC

17limit $grp 5; 17limit $grp 5;
18$grp->feed (sub { 18$grp->feed (sub {
19 return if $cn2 >= 10; 19 return if $cn2 >= 10;
20 $cn2++; 20 $cn2++;
21 aioreq_pri $cn2; 21 aioreq_pri $cn2;
22 (add $grp IO::AIO::aio_sleep 0)->cb (sub { 22 (add $grp IO::AIO::aio_busy 0)->cb (sub {
23 $cn3++; 23 $cn3++;
24 }); 24 });
25}); 25});
26 26
27print $cn2 == 5 ? "" : "not ", "ok 2\n"; 27print $cn2 == 5 ? "" : "not ", "ok 2\n";

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines