mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-11-14 06:17:15 +00:00
Code Issues 1 Releases Wiki Activity

Add thread example.

Browse Source 
Also remove reference to pthread_t in the JanetThread structure.
This commit is contained in:
Calvin Rose
2019-12-01 20:47:22 -06:00
parent 6a763aac95
commit 8f31a53276
3 changed files with 20 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/core/thread.c
View File

@@ -192,7 +192,6 @@ static JanetThread *janet_make_thread(JanetThreadShared *shared, JanetTable *dic
thread->shared = shared;
thread->kind = who;
thread->dict = dict;
thread->handle = NULL;
return thread;
}
@@ -213,7 +212,6 @@ static int thread_worker(JanetThreadShared *shared) {
/* Create self thread */
JanetThread *thread = janet_make_thread(shared, dict, JANET_THREAD_SELF);
thread->handle = handle;
Janet threadv = janet_wrap_abstract(thread);
/* Unmarshal the function */
@@ -251,7 +249,8 @@ static void *janet_pthread_wrapper(void *param) {
static void janet_thread_start_child(JanetThread *thread) {
JanetThreadShared *shared = thread->shared;
int error = pthread_create(&thread->handle, NULL, janet_pthread_wrapper, shared);
pthread_t handle;
int error = pthread_create(&handle, NULL, janet_pthread_wrapper, shared);
if (error) {
thread->shared = NULL; /* Prevent GC from trying to mess with shared memory here */
janet_shared_destroy(shared);