| … | … | ||
|---|---|---|---|
| 42 | sub new { | 42 | sub new { |
| 43 | # [\@contents, [$getwait], $maxsize, [$putwait]]; | 43 | # [\@contents, [$getwait], $maxsize, [$putwait]]; |
| 44 | bless [[], [], $_[1] || (1e30),[]], $_[0]; | 44 | bless [[], [], $_[1] || (1e30),[]], $_[0]; |
| 45 | } | 45 | } |
| 46 | 46 | ||
| 47 | =item $q->put($scalar) | 47 | =item $q->put ($scalar) |
| 48 | 48 | ||
| 49 | Put the given scalar into the queue. | 49 | Put the given scalar into the queue. |
| 50 | 50 | ||
| 51 | =cut | 51 | =cut |
| 52 | 52 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |