3 use Test::More tests => 1;
5 sub fun :lvalue { return my $sv; }
8 my ($usepack, $use, $inpack, $name, $proto) = @_;
12 return join(': ', $proto, $cr->());
19 use Devel::Declare fun => [ DECLARE_PROTO, \&handle_fun ];
24 is($foo->(), '$a, $b: woot', 'proto declarator ok');