1#!perl -w 2 3use strict; 4use utf8; 5use Test::More 'no_plan'; 6 7use_ok('XS::APItest'); 8 9*hint_exists = *hint_exists = \&XS::APItest::Hash::refcounted_he_exists; 10*hint_fetch = *hint_fetch = \&XS::APItest::Hash::refcounted_he_fetch; 11 12require '../../t/op/caller.pl'; 13 14ok test_newFOROP_without_slab(), 15 'no assertion failures when allocating FOROP without slab'; 16