summaryrefslogtreecommitdiff
path: root/ext
diff options
context:
space:
mode:
authorChuck D. Phillips <cdp@hpescdp.fc.hp.com>1997-05-04 23:48:39 -0600
committerChip Salzenberg <chip@atlantic.net>1997-05-08 00:00:00 +1200
commitb13ecc090d5cf4072407e393a4f356f8f10dbce4 (patch)
tree4a410940871e57a8fad1112f56aa58c0f1092237 /ext
parent85f483a204da05f35df75385bcd8490f3f5fed89 (diff)
downloadperl-b13ecc090d5cf4072407e393a4f356f8f10dbce4.tar.gz
HPUX: patch for ext/DynaLoader/dl_hpux.xs
By default, doing a "make test" on a dynamically loaded module with unresolved symbols will result with a useless error message. Adding the BIND_VERBOSE flag will add the names of undefined symbols to the error message already printed to stderr. This does *not* affect default operation; only when PERL_DL_NONLAZY is set does it make a p5p-msgid: 199705050548.WAA21260@palrel1.hp.com
Diffstat (limited to 'ext')
-rw-r--r--ext/DynaLoader/dl_hpux.xs21
1 files changed, 17 insertions, 4 deletions
diff --git a/ext/DynaLoader/dl_hpux.xs b/ext/DynaLoader/dl_hpux.xs
index fea6284521..51d464e6de 100644
--- a/ext/DynaLoader/dl_hpux.xs
+++ b/ext/DynaLoader/dl_hpux.xs
@@ -3,6 +3,14 @@
* Version: 2.1, 1995/1/25
*/
+/* o Added BIND_VERBOSE to dl_nonlazy condition to add names of missing
+ * symbols to stderr message on fatal error.
+ *
+ * o Added BIND_NONFATAL comment to default condition.
+ *
+ * Chuck Phillips (cdp@fc.hp.com)
+ * Version: 2.2, 1997/5/4 */
+
#ifdef __hp9000s300
#define magic hpux_magic
#define MAGIC HPUX_MAGIC
@@ -48,10 +56,15 @@ dl_load_file(filename, flags=0)
DLDEBUG(1,PerlIO_printf(PerlIO_stderr(), "dl_load_file(%s,%x):\n", filename,flags));
if (flags & 0x01)
warn("Can't make loaded symbols global on this platform while loading %s",filename);
- if (dl_nonlazy)
- bind_type = BIND_IMMEDIATE;
- else
- bind_type = BIND_DEFERRED;
+ if (dl_nonlazy) {
+ bind_type = BIND_IMMEDIATE|BIND_VERBOSE;
+ } else {
+ bind_type = BIND_DEFERRED;
+ /* For certain libraries, like DCE, deferred binding often causes run
+ * time problems. Adding BIND_NONFATAL to BIND_IMMEDIATE still allows
+ * unresolved references in situations like this. */
+ /* bind_type = BIND_IMMEDIATE|BIND_NONFATAL; */
+ }
#ifdef DEBUGGING
if (dl_debug)
bind_type |= BIND_VERBOSE;