| … | |
… | |
| 28 | |
28 | |
| 29 | =cut |
29 | =cut |
| 30 | |
30 | |
| 31 | package Coro::SemaphoreSet; |
31 | package Coro::SemaphoreSet; |
| 32 | |
32 | |
| 33 | no warnings qw(uninitialized); |
33 | BEGIN { eval { require warnings } && warnings->unimport ("uninitialized") } |
| 34 | |
34 | |
| 35 | use Coro (); |
35 | use Coro (); |
| 36 | |
36 | |
| 37 | $VERSION = 0.7; |
37 | $VERSION = 0.8; |
| 38 | |
38 | |
| 39 | =item new [inital count] |
39 | =item new [inital count] |
| 40 | |
40 | |
| 41 | Creates a new sempahore set with the given initial lock count for each |
41 | Creates a new sempahore set with the given initial lock count for each |
| 42 | individual semaphore. See L<Coro::Semaphore>. |
42 | individual semaphore. See L<Coro::Semaphore>. |
