From c9cfbf5beb48315e69a051349cb6bfe7deb9ebfe Mon Sep 17 00:00:00 2001
From: Rob Browning <rlb@defaultvalue.org>
Date: Wed, 9 Oct 2002 21:15:59 +0000
Subject: [PATCH] * guile.c (main): change to call scm_lt_dlpreload_default and
 pass in lt_preloaded_symbols, a value libtool automagically adds to the
 binary.

---
 libguile/guile.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/libguile/guile.c b/libguile/guile.c
index b96262008..6f00fee74 100644
--- a/libguile/guile.c
+++ b/libguile/guile.c
@@ -89,7 +89,9 @@ int
 main (int argc, char **argv)
 {
 #if defined (DYNAMIC_LINKING) && !defined (__MINGW32__)
-  scm_lt_dlset_preloaded_symbols ();
+  /* libtool automagically inserts this variable into your executable... */
+  extern const scm_lt_dlsymlist lt_preloaded_symbols[];
+  scm_lt_dlpreload_default (lt_preloaded_symbols);
 #endif
   scm_boot_guile (argc, argv, inner_main, 0);
   return 0; /* never reached */