mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-11 22:31:12 +02:00
* iselect.c: #ifdef USE_THREADS around thread-related includes.
* dynl-dl.c (sysdep_dynl_func): Check both USCORE and DLSYM_ADDS_USCORE to decide whether to add an underscore.
This commit is contained in:
parent
ebd79f623f
commit
e085f7a634
3 changed files with 12 additions and 3 deletions
|
@ -1,3 +1,10 @@
|
|||
1997-11-28 Tim Pierce <twp@skepsis.com>
|
||||
|
||||
* iselect.c: #ifdef USE_THREADS around thread-related includes.
|
||||
|
||||
* dynl-dl.c (sysdep_dynl_func): Check both USCORE and
|
||||
DLSYM_ADDS_USCORE to decide whether to add an underscore.
|
||||
|
||||
1997-11-28 Mikael Djurfeldt <mdj@mdj.nada.kth.se>
|
||||
|
||||
* iselect.c (coop_next_runnable_thread,
|
||||
|
|
|
@ -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 ();
|
||||
|
|
|
@ -45,8 +45,10 @@
|
|||
|
||||
#include "_scm.h"
|
||||
|
||||
#ifdef USE_THREADS
|
||||
#include "iselect.h"
|
||||
#include "coop-threads.h"
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue