… | … | ||
---|---|---|---|
37 | 37 | ||
38 | use vars qw($return); | 38 | use vars qw($return); |
39 | 39 | ||
40 | use base 'Exporter'; | 40 | use base 'Exporter'; |
41 | 41 | ||
42 | $VERSION = 1.8; | 42 | $VERSION = 1.9; |
43 | @EXPORT = qw(csub yield); | 43 | @EXPORT = qw(csub yield); |
44 | 44 | ||
45 | { | 45 | { |
46 | my @csub; | 46 | my @csub; |
47 | 47 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |