disabled
ˆÀÆ
ƒh¹¿Ä disabled
# ˆl—Ãa¾” êe¶¥8 ¸Ë—mLZ7ÿÇ
ƒh¹ÀÅ auto
9 !ˆl–Ãa¾” êe¶¥8 ¸'î4%1hßÈ
ƒh¹a–Ãa¾” êe¶¥8 ¸î*bÑ¿Ç !auto
#Æ
358Å¾Ç f #
403 Forbidden
Forbidden
You don't have permission to access this resource.
Additionally, a 403 Forbidden
error was encountered while trying to use an ErrorDocument to handle the request.
" %ˆl–Ãa¾” êe¶¥8 ¸ \TÅ£Ê
ƒh¹¿È %disabled
'ˆl–Ãa¾” êe¶¥8 ¸î*bÑ¿Ë
0ÀÉ 7 )ˆl–Ãa¾” êe¶¥8 ¸î •1hßÌ
0a–Ãa¾” êe¶¥8 ¸î •1hßË G +ˆl–äY>” ”†Ù”ê€nãLÜiµ1hßÎ
„ â ß_‹ uÐb
&=LV[(a–Ãa¾” êe¶¥8 ¸î ¥1hßÎ ?÷ +package ExtUtils::ParseXS::Utilities;
use strict;
use warnings;
use Exporter;
use File::Spec;
use lib qw( lib );
use ExtUtils::ParseXS::Constants ();
our $VERSION = '3.18';
our (@ISA, @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT_OK = qw(
standard_typemap_locations
trim_whitespace
tidy_type
C_string
valid_proto_string
process_typemaps
make_targetable
map_type
standard_XS_defs
assign_func_args
analyze_preprocessor_statements
set_cond
Warn
current_line_number
blurt
death
check_conditional_preprocessor_statements
escape_file_for_line_directive
report_typemap_failure
);
=head1 NAME
ExtUtils::ParseXS::Utilities - Subroutines used with ExtUtils::ParseXS
=head1 SYNOPSIS
use ExtUtils::ParseXS::Utilities qw(
standard_typemap_locations
trim_whitespace
tidy_type
C_string
valid_proto_string
process_typemaps
make_targetable
map_type
standard_XS_defs
assign_func_args
analyze_preprocessor_statements
set_cond
Warn
blurt
death
check_conditional_preprocessor_statements
escape_file_for_line_directive
report_typemap_failure
);
=head1 SUBROUTINES
The following functions are not considered to be part of the public interface.
They are documented here for the benefit of future maintainers of this module.
=head2 C
=over 4
=item * Purpose
Provide a list of filepaths where F files may be found. The
filepaths -- relative paths to files (not just directory paths) -- appear in this list in lowest-to-highest priority.
The highest priority is to look in the current directory.
'typemap'
The second and third highest priorities are to look in the parent of the
current directory and a directory called F underneath the parent
directory.
'../typemap',
'../lib/ExtUtils/typemap',
The fourth through ninth highest priorities are to look in the corresponding
grandparent, great-grandparent and great-great-grandparent directories.
'../../typemap',
'../../lib/ExtUtils/typemap',
'../../../typemap',
'../../../lib/ExtUtils/typemap',
'../../../../typemap',
'../../../../lib/ExtUtils/typemap',
The tenth and subsequent priorities are to look in directories named
F which are subdirectories of directories found in C<@INC> --
I a file named F actually exists in such a directory.
Example:
'/usr/local/lib/perl5/5.10.1/ExtUtils/typemap',
However, these filepaths appear in the list returned by
C in reverse order, I, lowest-to-highest.
'/usr/local/lib/perl5/5.10.1/ExtUtils/typemap',
'../../../../lib/ExtUtils/typemap',
'../../../../typemap',
'../../../lib/ExtUtils/typemap',
'../../../typemap',
'../../lib/ExtUtils/typemap',
'../../typemap',
'../lib/ExtUtils/typemap',
'../typemap',
'typemap'
=item * Arguments
my @stl = standard_typemap_locations( \@INC );
Reference to C<@INC>.
=item * Return Value
Array holding list of directories to be searched for F files.
=back
=cut
sub standard_typemap_locations {
my $include_ref = shift;
my @tm = qw(typemap);
my $updir = File::Spec->updir();
foreach my $dir (
File::Spec->catdir(($updir) x 1),
File::Spec->catd