From 58fa88f86191fa9963b6377932084feebb2bba5c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Niels=20M=C3=B6ller?= <nisse@lysator.liu.se>
Date: Sun, 23 Mar 1997 19:17:14 +0100
Subject: [PATCH] Check if dlerror() returns NULL (seems to happen when running
 purify).

Rev: src/dynamic_load.c:1.14
---
 src/dynamic_load.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/dynamic_load.c b/src/dynamic_load.c
index 6c701f4a06..8a793fe635 100644
--- a/src/dynamic_load.c
+++ b/src/dynamic_load.c
@@ -57,8 +57,11 @@ void f_load_module(INT32 args)
   module=dlopen(module_name, RTLD_NOW);
   if(!module)
   {
+    char *err =  dlerror();
+    if (err)
+      err = "";
     error("load_module(\"%s\") failed: %s\n",
-	  sp[-args].u.string->str, dlerror());
+	  sp[-args].u.string->str, err);
   }
 #elif defined(USE_DLD)
   dld_create_reference("pike_module_init");
-- 
GitLab