use strict;
use warnings;
-use Test::More tests => 13 * (3 + 4) + 5;
+use Test::More tests => 14 * (3 + 4) + 5;
use Config qw/%Config/;
[ 'get', '$c', 'my $c = 1', '1 for 1 .. $c',
[ 'enteriter', 'B::LOOP' ] ],
[ 'free','$c', 'my $c = 1', 'last', [ 'last', 'B::OP' ] ],
+ [ 'free','$c', 'L:{my $c = 1', 'last L}', [ 'last', 'B::OP' ] ],
);
our $done;