1use strict;
2use warnings;
3use FindBin qw($Bin);
4use File::Spec::Functions;
5use Test::More;
6use lib 't/lib';
7
8BEGIN {
9    # Enable XSAccessor check
10    $Class::Accessor::Grouped::hasXS = undef;
11    
12    require AccessorGroups;
13}
14 
15plan skip_all => 'Class::XSAccessor not available'
16    unless Class::Accessor::Grouped::_hasXS();
17
18require( catfile($Bin, 'accessors.t') );