xref: /openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/lib/TypemapTest/Foo.pm (revision 898184e3e61f9129feb5978fad5a8c6865f00b92) 
1package # hide from indexers
2  TypemapTest::Foo;
3use strict;
4use warnings;
5require ExtUtils::Typemaps;
6our @ISA = qw(ExtUtils::Typemaps);
7
8sub new {
9  my $class = shift;
10  my $obj = $class->SUPER::new(@_);
11  $obj->add_typemap(ctype => 'myfoo*', xstype => 'T_PV');
12  return $obj;
13}
14
151;
16