package ExtUtils::CBuilder::Platform::cygwin; use strict; use File::Spec; use ExtUtils::CBuilder::Platform::Unix; use vars qw($VERSION @ISA); $VERSION = '0.280206'; @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;
Name | Type | Size | Permission | Actions |
---|---|---|---|---|
Windows | Folder | 0755 |
|
|
Unix.pm | File | 1.02 KB | 0644 |
|
VMS.pm | File | 10.75 KB | 0644 |
|
Windows.pm | File | 8.83 KB | 0644 |
|
aix.pm | File | 621 B | 0644 |
|
cygwin.pm | File | 928 B | 0644 |
|
darwin.pm | File | 516 B | 0644 |
|
dec_osf.pm | File | 424 B | 0644 |
|
os2.pm | File | 2.67 KB | 0644 |
|