From 2b324e772e559e12f45783b61d264de4ab35dbf7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
 <grubba@grubba.org>
Date: Mon, 3 Nov 1997 04:17:41 +0100
Subject: [PATCH] Bugfix.

Rev: src/dynamic_load.c:1.21
---
 src/dynamic_load.c | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/src/dynamic_load.c b/src/dynamic_load.c
index f3bf9cde01..a752bc4b75 100644
--- a/src/dynamic_load.c
+++ b/src/dynamic_load.c
@@ -6,6 +6,10 @@
 #  include "module.h"
 #  include "stralloc.h"
 #  include "pike_macros.h"
+#ifdef DEBUG
+#include "main.h"
+#endif /* DEBUG */
+
 #endif
 
 #if !defined(HAVE_DLOPEN) && defined(HAVE_DLD_LINK) && defined(HAVE_DLD_GET_FUNC)
@@ -98,6 +102,11 @@ void f_load_module(INT32 args)
   module_name = sp[-args].u.string->str;
 
   module=dlopen(module_name, RTLD_NOW);
+#ifdef DEBUG
+  if (d_flag >= 1) {
+    fprintf(stderr, "dlopen() called.\n");
+  }
+#endif /* DEBUG */
   if(!module)
   {
     const char *err = dlerror();
-- 
GitLab