Comparing Coro/t/01_process.t (file contents):
Revision 1.1 by root, Tue Jul 10 01:43:21 2001 UTC vs.
Revision 1.4 by root, Sat Nov 25 00:40:26 2006 UTC
1 | $|=1; |
1 | $|=1; |
2 | print "1..3\n"; |
2 | print "1..3\n"; |
3 | |
3 | |
4 | use Coro; |
4 | use Coro; |
5 | use Coro::Process; |
|
|
6 | |
5 | |
7 | sub p1 : Coro { |
6 | sub p1 : Coro { |
8 | print "ok 2\n"; |
7 | print "ok 2\n"; |
9 | } |
8 | } |
10 | |
9 | |
11 | print "ok 1\n"; |
10 | print "ok 1\n"; |
12 | yield; |
11 | cede; cede; |
13 | print "ok 3\n"; |
12 | print "ok 3\n"; |
14 | |
13 | |
Diff Legend
– |
Removed lines |
+ |
Added lines |
< |
Changed lines |
> |
Changed lines |