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,\n\$b: woot", 'proto declarator ok');