lib/ExtUtils/CBuilder/Platform/cygwin.pm

   1 package ExtUtils::CBuilder::Platform::cygwin;
   2
   3 use strict;
   4 use File::Spec;
   5 use ExtUtils::CBuilder::Platform::Unix;
   6
   7 use vars qw($VERSION @ISA);
   8 $VERSION = '0.12';
   9 @ISA = qw(ExtUtils::CBuilder::Platform::Unix);
  10
  11 sub link_executable {
  12   my $self = shift;
  13   # $Config{ld} is set up as a special script for building
  14   # perl-linkable libraries.  We don't want that here.
  15   local $self->{config}{ld} = 'gcc';
  16   return $self->SUPER::link_executable(@_);
  17 }
  18
  19 sub link {
  20   my ($self, %args) = @_;
  21
  22   $args{extra_linker_flags} = [
  23     File::Spec->catdir($self->perl_inc(), 'libperl.dll.a'),
  24     $self->split_like_shell($args{extra_linker_flags})
  25   ];
  26
  27   return $self->SUPER::link(%args);
  28 }
  29
  30 1;