108-map_type.t revision 1.1.1.2
1#!/usr/bin/perl 2use strict; 3use warnings; 4use Test::More qw(no_plan); # tests => 7; 5use ExtUtils::ParseXS::Utilities qw( 6 map_type 7); 8 9#print "\t" . map_type($self->{ret_type}, 'RETVAL', $self->{hiertype}) . ";\n" 10#print "\t" . map_type($var_type, $var_name, $self->{hiertype}); 11#print "\t" . map_type($var_type, undef, $self->{hiertype}); 12 13pass("Passed all tests in $0"); 14