Commit | Line | Data |
---|---|---|
e6de4093 JK |
1 | #!/usr/bin/perl |
2 | use strict; | |
3 | use warnings; | |
4 | use Carp; | |
5 | use Cwd; | |
6 | use File::Spec; | |
7 | use File::Temp qw( tempdir ); | |
8 | use Test::More qw(no_plan); # tests => 7; | |
9 | use lib qw( lib ); | |
10 | use ExtUtils::ParseXS::Utilities qw( | |
11 | map_type | |
12 | ); | |
13 | ||
361d4be6 JK |
14 | #print "\t" . map_type($self->{ret_type}, 'RETVAL', $self->{hiertype}) . ";\n" |
15 | #print "\t" . map_type($var_type, $var_name, $self->{hiertype}); | |
16 | #print "\t" . map_type($var_type, undef, $self->{hiertype}); | |
17 | ||
e6de4093 | 18 | pass("Passed all tests in $0"); |