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.2 by root, Mon Oct 23 14:49:51 2006 UTC vs.
Revision 1.3 by root, Tue Oct 24 03:17:40 2006 UTC

… …
12my $cn2 = 0; 12my $cn2 = 0;
13my $cn3 = 0; 13my $cn3 = 0;
14 14
15print "ok 1\n"; 15print "ok 1\n";
16 16
17$grp->feed_limit (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 (add $grp IO::AIO::aio_sleep 0)->cb (sub { 22 (add $grp IO::AIO::aio_sleep 0)->cb (sub {
22 $cn3++; 23 $cn3++;
23 }); 24 });
24}); 25});
25 26

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines