From 3eac21f49bc763a6c0044b4afbc0c7ece760144f Mon Sep 17 00:00:00 2001
From: markm <markm@FreeBSD.org>
Date: Sat, 16 Mar 2002 20:14:30 +0000
Subject: Vendor import Perl 5.6.1

---
 contrib/perl5/lib/ExtUtils/MM_OS2.pm | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'contrib/perl5/lib/ExtUtils/MM_OS2.pm')

diff --git a/contrib/perl5/lib/ExtUtils/MM_OS2.pm b/contrib/perl5/lib/ExtUtils/MM_OS2.pm
index 430235a..cd6a1e4 100644
--- a/contrib/perl5/lib/ExtUtils/MM_OS2.pm
+++ b/contrib/perl5/lib/ExtUtils/MM_OS2.pm
@@ -93,6 +93,22 @@ sub perl_archive
  return "\$(PERL_INC)/libperl\$(LIB_EXT)";
 }
 
+=item perl_archive_after
+
+This is an internal method that returns path to a library which
+should be put on the linker command line I<after> the external libraries
+to be linked to dynamic extensions.  This may be needed if the linker
+is one-pass, and Perl includes some overrides for C RTL functions,
+such as malloc().
+
+=cut 
+
+sub perl_archive_after
+{
+ return "\$(PERL_INC)/libperl_override\$(LIB_EXT)" unless $OS2::is_aout;
+ return "";
+}
+
 sub export_list
 {
  my ($self) = @_;
-- 
cgit v1.1