fix field names with a single quote in them (patch from Jason Plum)
[p5sagit/Class-Accessor-Grouped.git] / t / accessors_xs.t
1 use strict;
2 use warnings;
3 use FindBin qw($Bin);
4 use File::Spec::Functions;
5 use Test::More;
6 use lib 't/lib';
7
8 use AccessorGroups ();
9  
10 plan skip_all => 'Class::XSAccessor not available'
11     unless Class::Accessor::Grouped::_hasXS();
12
13 require( catfile($Bin, 'accessors.t') );