* iselect.c: #ifdef USE_THREADS around thread-related includes.

[bpt/guile.git] / libguile / dynl-dl.c

diff --git a/libguile/dynl-dl.c b/libguile/dynl-dl.c
index 24def72..4de429d 100644 (file)
--- a/libguile/dynl-dl.c
+++ b/libguile/dynl-dl.c
@@ -89,14 +89,14 @@ sysdep_dynl_func (symb, handle, subr)
     char *err;
     char *usymb;
 
-#ifdef DLSYM_ADDS_USCORE
-    fptr = dlsym (handle, symb);
-#else
+#if defined(USCORE) && !defined(DLSYM_ADDS_USCORE)
     usymb = (char *) malloc (strlen (symb) + 2);
     *usymb = '_';
     strcpy (usymb + 1, symb);
     fptr = dlsym (handle, usymb);
     free (usymb);
+#else
+    fptr = dlsym (handle, symb);
 #endif
 
     err = (char *)dlerror ();