1#!./perl
2
3use strict;
4use warnings;
5
6use Test::More;
7use XS::APItest;
8
9is(test_CvREFCOUNTED_ANYSV(), 0, "Bulk test internal CvREFCOUNTED_ANYSV API");
10
11# TODO: A test of operating via cv_clone()
12#   Unfortunately that's very difficult to arrange, because cv_clone() itself
13#   requires the CV to have a CvPADLIST, and that macro requires !CvISXSUB.
14#   We could instead go via cv_clone_into() but that isn't exposed outside of
15#   perl core.
16#   I don't know how to unit-test that one.
17
18done_testing;
19