summaryrefslogtreecommitdiff
path: root/ext/DynaLoader/DynaLoader_pm.PL
diff options
context:
space:
mode:
authorDoug MacEachern <dougm@covalent.net>2001-06-18 15:13:38 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-19 10:49:21 +0000
commitbff25830104646e483e71521172ce1d2ee03aaaa (patch)
treec6ef3942f6b8e599b4aced50cf1874b072a21557 /ext/DynaLoader/DynaLoader_pm.PL
parentcbec93472053303a097b494b2027e63ce8f57918 (diff)
downloadperl-bff25830104646e483e71521172ce1d2ee03aaaa.tar.gz
[patch] preserve @DynaLoader::dl_{librefs,modules}
Message-ID: <Pine.LNX.4.21.0106182210570.22114-100000@mako.covalent.net> p4raw-id: //depot/perl@10715
Diffstat (limited to 'ext/DynaLoader/DynaLoader_pm.PL')
-rw-r--r--ext/DynaLoader/DynaLoader_pm.PL6
1 files changed, 4 insertions, 2 deletions
diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL
index 266c9d030f..fa2ec0e8bc 100644
--- a/ext/DynaLoader/DynaLoader_pm.PL
+++ b/ext/DynaLoader/DynaLoader_pm.PL
@@ -80,8 +80,10 @@ $Is_MacOS = $^O eq 'MacOS';
@dl_require_symbols = (); # names of symbols we need
@dl_resolve_using = (); # names of files to link with
@dl_library_path = (); # path to look for files
-@dl_librefs = (); # things we have loaded
-@dl_modules = (); # Modules we have loaded
+
+#XSLoader.pm may have added elements before we were required
+#@dl_librefs = (); # things we have loaded
+#@dl_modules = (); # Modules we have loaded
# This is a fix to support DLD's unfortunate desire to relink -lc
@dl_resolve_using = dl_findfile('-lc') if $dlsrc eq "dl_dld.xs";