summaryrefslogtreecommitdiff
path: root/libguile/dynl.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/dynl.c')
-rw-r--r--libguile/dynl.c44
1 files changed, 14 insertions, 30 deletions
diff --git a/libguile/dynl.c b/libguile/dynl.c
index d2cf78b24..5f7b2e244 100644
--- a/libguile/dynl.c
+++ b/libguile/dynl.c
@@ -19,52 +19,36 @@
*/
-
-#ifdef HAVE_CONFIG_H
-# include <config.h>
-#endif
-
-#include <alloca.h>
-#include <string.h>
-
/* "dynl.c" dynamically link&load object files.
Author: Aubrey Jaffer
Modified for libguile by Marius Vollmer */
-#if 0 /* Disabled until we know for sure that it isn't needed */
-/* XXX - This is only here to drag in a definition of __eprintf. This
- is needed for proper operation of dynamic linking. The real
- solution would probably be a shared libgcc. */
-
-#undef NDEBUG
-#include <assert.h>
-
-static void
-maybe_drag_in_eprintf ()
-{
- assert (!maybe_drag_in_eprintf);
-}
+#ifdef HAVE_CONFIG_H
+# include <config.h>
#endif
-#include <stdlib.h>
+#include <alloca.h>
#include <stdio.h>
+#include <stdlib.h>
#include <string.h>
+#include <ltdl.h>
+
+#include "deprecation.h"
+#include "dynwind.h"
+#include "foreign.h"
+#include "gc.h"
#include "gsubr.h"
-#include "libpath.h"
-#include "dynl.h"
-#include "smob.h"
#include "keywords.h"
+#include "libpath.h"
#include "list.h"
#include "ports.h"
+#include "smob.h"
#include "strings.h"
-#include "deprecation.h"
-#include "dynwind.h"
-#include "foreign.h"
#include "threads.h"
-#include "gc.h"
-#include <ltdl.h>
+#include "dynl.h"
+
/* From the libtool manual: "Note that libltdl is not threadsafe,
i.e. a multithreaded application has to use a mutex for libltdl.".