diff options
-rw-r--r-- | ext/DynaLoader/XSLoader_pm.PL | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/ext/DynaLoader/XSLoader_pm.PL b/ext/DynaLoader/XSLoader_pm.PL index d95cdb05cd..2f8b3e893e 100644 --- a/ext/DynaLoader/XSLoader_pm.PL +++ b/ext/DynaLoader/XSLoader_pm.PL @@ -82,12 +82,17 @@ print OUT <<'EOT'; my $boot_symbol_ref; +EOT + if ($^O eq 'darwin') { +print OUT <<'EOT'; if ($boot_symbol_ref = dl_find_symbol(0, $bootname)) { goto boot; #extension library has already been loaded, e.g. darwin } +EOT } +print OUT <<'EOT'; # Many dynamic extension loading problems will appear to come from # this section of code: XYZ failed at line 123 of DynaLoader.pm. # Often these errors are actually occurring in the initialisation |