Make sure we don't take the OP_REFCNT mutex twice on perl 5.9.2 and below

[perl/modules/indirect.git] / t / lib / indirect / Test3.pm

no indirect ":fatal";
my $x;
if ($x) {
my $y = qq{abcdef
 @{[new $x]}
 };
}
1;