| … | |
… | |
| 25 | =cut |
25 | =cut |
| 26 | |
26 | |
| 27 | package Coro::Channel; |
27 | package Coro::Channel; |
| 28 | |
28 | |
| 29 | use Coro (); |
29 | use Coro (); |
| 30 | no warnings qw(uninitialized); |
30 | BEGIN { eval { require warnings } && warnings->unimport ("uninitialized") } |
| 31 | |
31 | |
| 32 | $VERSION = 0.51; |
32 | $VERSION = 1.31; |
| 33 | |
33 | |
| 34 | =item $q = new Coro:Channel $maxsize |
34 | =item $q = new Coro:Channel $maxsize |
| 35 | |
35 | |
| 36 | Create a new channel with the given maximum size (unlimited if C<maxsize> |
36 | Create a new channel with the given maximum size (unlimited if C<maxsize> |
| 37 | is omitted). Giving a size of one gives you a traditional channel, i.e. a |
37 | is omitted). Giving a size of one gives you a traditional channel, i.e. a |
| … | |
… | |
| 98 | |
98 | |
| 99 | =back |
99 | =back |
| 100 | |
100 | |
| 101 | =head1 AUTHOR |
101 | =head1 AUTHOR |
| 102 | |
102 | |
| 103 | Marc Lehmann <pcg@goof.com> |
103 | Marc Lehmann <schmorp@schmorp.de> |
| 104 | http://www.goof.com/pcg/marc/ |
104 | http://home.schmorp.de/ |
| 105 | |
105 | |
| 106 | =cut |
106 | =cut |
| 107 | |
107 | |
