diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-25 01:53:03 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-25 01:53:03 +0000 |
| commit | 485ac1e2956473f8be37624cc041681320270275 (patch) | |
| tree | 306d5bba91e6b9aa5993f82d39257e0e89132ee8 /ext/DynaLoader | |
| parent | 61c7372d2d13c6fd4dc7ddf77ab92116504fc392 (diff) | |
| download | perl-485ac1e2956473f8be37624cc041681320270275.tar.gz | |
Fixes for #12627.
p4raw-id: //depot/perl@12634
Diffstat (limited to 'ext/DynaLoader')
| -rw-r--r-- | ext/DynaLoader/dl_aix.xs | 2 | ||||
| -rw-r--r-- | ext/DynaLoader/dl_hpux.xs | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/ext/DynaLoader/dl_aix.xs b/ext/DynaLoader/dl_aix.xs index c3f2c119f1..865cba1572 100644 --- a/ext/DynaLoader/dl_aix.xs +++ b/ext/DynaLoader/dl_aix.xs @@ -26,6 +26,8 @@ #include "XSUB.h" #include <dlfcn.h> +#include "dlutils.c" /* SaveError() etc */ + #else /* diff --git a/ext/DynaLoader/dl_hpux.xs b/ext/DynaLoader/dl_hpux.xs index 8fd6348c93..a7119ba368 100644 --- a/ext/DynaLoader/dl_hpux.xs +++ b/ext/DynaLoader/dl_hpux.xs @@ -58,8 +58,8 @@ dl_load_file(filename, flags=0) PREINIT: shl_t obj = NULL; int i, max, bind_type; - CODE: dMY_CXT; + CODE: DLDEBUG(1,PerlIO_printf(Perl_debug_log, "dl_load_file(%s,%x):\n", filename,flags)); if (flags & 0x01) Perl_warn(aTHX_ "Can't make loaded symbols global on this platform while loading %s",filename); |