5 use Test::Requires 'Filter::Util::Call';
10 use Filter::Util::Call qw(filter_add filter_del);
12 sub my_quote($) { $_[0] }
16 BEGIN { Devel::Declare->setup_for(__PACKAGE__, { my_quote => { const => sub { } } }); }
17 BEGIN { filter_add(sub { filter_del(); $_ .= "ok \$i++ == 0;"; return 1; }); }