[ Avaa Bypassed ]




Upload:

Command:

hmhc3928@52.15.190.187: ~ $
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;

Filemanager

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