suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

win32: create threads in the right way for C library

Browse Source
This commit is contained in:
Matthew Flatt 2011-04-20 11:25:15 -06:00
parent 714df5598c
commit 231cf7db48
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/racket/src/mzrt.c
View File

@ -23,6 +23,7 @@ START_XFORM_SUSPEND;
/* platform headers */ /* platform headers */
#ifdef WIN32 #ifdef WIN32
# include <windows.h> # include <windows.h>
# include <process.h>
#else #else
# include <pthread.h> # include <pthread.h>
# include <signal.h> # include <signal.h>
@ -235,7 +236,7 @@ mz_proc_thread* mz_proc_thread_create_w_stacksize(mz_proc_thread_start start_pro
stub_data->data = data; stub_data->data = data;
stub_data->thread = thread; stub_data->thread = thread;
# ifdef WIN32 # ifdef WIN32
thread->threadid = CreateThread(NULL, stacksize, mzrt_win_thread_stub, stub_data, 0, NULL); thread->threadid = (HANDLE)_beginthreadex(NULL, stacksize, mzrt_win_thread_stub, stub_data, 0, NULL);
# else # else
# ifdef MZ_PRECISE_GC # ifdef MZ_PRECISE_GC
pthread_create(&thread->threadid, attr, mzrt_thread_stub, stub_data); pthread_create(&thread->threadid, attr, mzrt_thread_stub, stub_data);
@ -301,7 +302,7 @@ int mz_proc_thread_detach(mz_proc_thread *thread) {
void mz_proc_thread_exit(void *rc) { void mz_proc_thread_exit(void *rc) {
#ifdef WIN32 #ifdef WIN32
ExitThread((DWORD)rc); _endthreadex((unsigned)rc);
#else #else
# ifndef MZ_PRECISE_GC # ifndef MZ_PRECISE_GC
pthread_exit(rc); pthread_exit(rc);