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 | c6a08c253a17bd25821c6e2e032d50a066956a42 (patch) | |
| tree | 306d5bba91e6b9aa5993f82d39257e0e89132ee8 /ext/DynaLoader/dl_hpux.xs | |
| parent | 0915168dfc2c6c56bf2e559bd2f0c2756592f6ec (diff) | |
| download | perl-c6a08c253a17bd25821c6e2e032d50a066956a42.tar.gz | |
Fixes for #12627.
p4raw-id: //depot/perl@12634
Diffstat (limited to 'ext/DynaLoader/dl_hpux.xs')
| -rw-r--r-- | ext/DynaLoader/dl_hpux.xs | 2 |
1 files changed, 1 insertions, 1 deletions
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); |