X7ROOT File Manager
Current Path:
/usr/share/perl5/vendor_perl/ExtUtils/CBuilder/Platform
usr
/
share
/
perl5
/
vendor_perl
/
ExtUtils
/
CBuilder
/
Platform
/
ðŸ“
..
📄
Unix.pm
(1.02 KB)
📄
VMS.pm
(10.05 KB)
ðŸ“
Windows
📄
Windows.pm
(8.75 KB)
📄
aix.pm
(625 B)
📄
android.pm
(1.19 KB)
📄
cygwin.pm
(932 B)
📄
darwin.pm
(520 B)
📄
dec_osf.pm
(428 B)
📄
linux.pm
(586 B)
📄
os2.pm
(2.35 KB)
Editing: cygwin.pm
package ExtUtils::CBuilder::Platform::cygwin; use warnings; use strict; use File::Spec; use ExtUtils::CBuilder::Platform::Unix; our $VERSION = '0.280230'; # VERSION our @ISA = qw(ExtUtils::CBuilder::Platform::Unix); # TODO: If a specific exe_file name is requested, if the exe created # doesn't have that name, we might want to rename it. Apparently asking # for an exe of "foo" might result in "foo.exe". Alternatively, we should # make sure the return value is correctly "foo.exe". # C.f http://rt.cpan.org/Public/Bug/Display.html?id=41003 sub link_executable { my $self = shift; return $self->SUPER::link_executable(@_); } sub link { my ($self, %args) = @_; my $lib = $self->{config}{useshrplib} ? 'libperl.dll.a' : 'libperl.a'; $args{extra_linker_flags} = [ File::Spec->catfile($self->perl_inc(), $lib), $self->split_like_shell($args{extra_linker_flags}) ]; return $self->SUPER::link(%args); } 1;
Upload File
Create Folder