ok
Direktori : /usr/share/perl5/ExtUtils/CBuilder/Platform/ |
Current File : //usr/share/perl5/ExtUtils/CBuilder/Platform/dec_osf.pm |
package ExtUtils::CBuilder::Platform::dec_osf; use strict; use ExtUtils::CBuilder::Platform::Unix; use File::Spec; use vars qw($VERSION @ISA); @ISA = qw(ExtUtils::CBuilder::Platform::Unix); $VERSION = '0.280206'; sub link_executable { my $self = shift; # $Config{ld} is 'ld' but that won't work: use the cc instead. local $self->{config}{ld} = $self->{config}{cc}; return $self->SUPER::link_executable(@_); } 1;