#!perl
# Test handling of XSUBs in pp_entersub
use Test::More tests => 1;
use XS::APItest;
$ref = XS::APItest::newRV($_+1);
is \$$ref, $ref, 'XSUBs do not get to see PADTMPs';
#!perl
# Test handling of XSUBs in pp_entersub
use Test::More tests => 1;
use XS::APItest;
$ref = XS::APItest::newRV($_+1);
is \$$ref, $ref, 'XSUBs do not get to see PADTMPs';