… | … | ||
---|---|---|---|
19 | } | 19 | } |
20 | 20 | ||
21 | $b = async { | 21 | $b = async { |
22 | # do a little unrolling... | 22 | # do a little unrolling... |
23 | while() { | 23 | while() { |
24 | cede; cede; cede; cede; cede; | ||
24 | cede; cede; cede; cede; cede; | 25 | cede; cede; cede; cede; cede; |
25 | } | 26 | } |
26 | }; | 27 | }; |
27 | 28 | ||
28 | cede; | 29 | cede; |
… | … | ||
57 | 58 | ||
58 | $c1 = new Coro::State sub { | 59 | $c1 = new Coro::State sub { |
59 | doit1(1,2,3,4,5,6,7,8,9); | 60 | doit1(1,2,3,4,5,6,7,8,9); |
60 | }; | 61 | }; |
61 | 62 | ||
62 | $c0->save (0); | 63 | #$c0->save (0); |
63 | $c1->save (-1); | 64 | #$c1->save (-1); |
64 | 65 | ||
65 | transfer($main, $c0); | 66 | transfer($main, $c0); |
66 | transfer($main, $c1); | 67 | transfer($main, $c1); |
67 | 68 | ||
68 | timethese 1000000, { | 69 | timethese 1000000, { |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |