fix threads

This commit is contained in:
U-w7\vsc 2013-11-16 18:51:32 +00:00
parent 1b5aa1a969
commit 3aa994313b

View File

@ -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 */