diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1997-11-19 22:10:51 -0800 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-11-25 14:16:29 +0000 |
| commit | 52e1cb5ebf5e5a8cd5d3d9673b540b0c0dfe20df (patch) | |
| tree | 078676a210b97f20bbebc123cfe028728a29a04e /win32 | |
| parent | 51dd5992be029393cb3f221313a1a6ec2a76c21a (diff) | |
| download | perl-52e1cb5ebf5e5a8cd5d3d9673b540b0c0dfe20df.tar.gz | |
AIX patch (including Configure support for {sched,pthread}_yield,
pthread initial detach state, renaming perl_thread to perl_os_thread
and struct thread to struct perl_thread):
Subject: Re: _54 on AIX
p4raw-id: //depot/perl@290
Diffstat (limited to 'win32')
| -rw-r--r-- | win32/win32thread.c | 4 | ||||
| -rw-r--r-- | win32/win32thread.h | 6 |
2 files changed, 5 insertions, 5 deletions
diff --git a/win32/win32thread.c b/win32/win32thread.c index 4dbc750b05..922bef4a5c 100644 --- a/win32/win32thread.c +++ b/win32/win32thread.c @@ -15,7 +15,7 @@ Perl_alloc_thread_key(void) } void -Perl_set_thread_self(struct thread *thr) +Perl_set_thread_self(struct perl_thread *thr) { #ifdef USE_THREADS /* Set thr->self. GetCurrentThread() retrurns a pseudo handle, need @@ -33,7 +33,7 @@ Perl_set_thread_self(struct thread *thr) #ifdef USE_THREADS int -Perl_thread_create(struct thread *thr, thread_func_t *fn) +Perl_thread_create(struct perl_thread *thr, thread_func_t *fn) { DWORD junk; diff --git a/win32/win32thread.h b/win32/win32thread.h index 76392cff77..d2dfe4225c 100644 --- a/win32/win32thread.h +++ b/win32/win32thread.h @@ -97,7 +97,7 @@ typedef HANDLE perl_mutex; } \ } STMT_END -#define THR ((struct thread *) TlsGetValue(thr_key)) +#define THR ((struct perl_thread *) TlsGetValue(thr_key)) #define THREAD_CREATE(t, f) Perl_thread_create(t, f) #define THREAD_POST_CREATE(t) NOOP #define THREAD_RET_TYPE DWORD WINAPI @@ -107,8 +107,8 @@ typedef THREAD_RET_TYPE thread_func_t(void *); START_EXTERN_C void Perl_alloc_thread_key _((void)); -int Perl_thread_create _((struct thread *thr, thread_func_t *fn)); -void Perl_set_thread_self _((struct thread *thr)); +int Perl_thread_create _((struct perl_thread *thr, thread_func_t *fn)); +void Perl_set_thread_self _((struct perl_thread *thr)); END_EXTERN_C #define INIT_THREADS NOOP |