fix threads
This commit is contained in:
parent
1b5aa1a969
commit
3aa994313b
@ -54,6 +54,7 @@
|
||||
#endif
|
||||
#endif
|
||||
|
||||
|
||||
#include <SWI-Prolog.h>
|
||||
|
||||
#define COMMON(X) extern X
|
||||
@ -81,11 +82,10 @@ typedef uintptr_t word; /* Anonymous 4 byte object */
|
||||
typedef int bool;
|
||||
|
||||
|
||||
#ifndef THREADS
|
||||
|
||||
#define GLOBAL_LD (LOCAL_PL_local_data_p)
|
||||
|
||||
#if !defined(O_PLMT) && !defined(YAPOR)
|
||||
|
||||
#define LOCAL_LD (GLOBAL_LD)
|
||||
#define LD (GLOBAL_LD)
|
||||
#define ARG1_LD void
|
||||
@ -310,8 +310,5 @@ CloseList(Term t0, Term tail)
|
||||
}
|
||||
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
#endif /* PL_SHARED_INCLUDE */
|
||||
|
Reference in New Issue
Block a user