diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 1997-11-07 01:37:28 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 1997-11-07 01:37:28 +0000 |
| commit | e77eedc24c0252a902559034f2aa207f216529cc (patch) | |
| tree | d59ef6c28b87613607887003bd9d900644335b67 /thread.h | |
| parent | 4e35701fd273ba8d0093a29660dee38a92408e9b (diff) | |
| parent | 5756a3ac9bce8d31d81b13d0e57cdc87e2565fe4 (diff) | |
| download | perl-e77eedc24c0252a902559034f2aa207f216529cc.tar.gz | |
Raw integrate of latest perl
p4raw-id: //depot/ansiperl@208
Diffstat (limited to 'thread.h')
| -rw-r--r-- | thread.h | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -199,10 +199,12 @@ struct thread { /* XXX Sort stuff, firstgv, secongv and so on? */ - SV * Toursv; - HV * Tcvcache; + SV * oursv; + HV * cvcache; perl_thread self; /* Underlying thread object */ U32 flags; + AV * magicals; /* Per-thread magicals */ + AV * specific; /* Thread-specific user data */ perl_mutex mutex; /* For the fields others can change */ U32 tid; struct thread *next, *prev; /* Circular linked list of threads */ @@ -210,7 +212,7 @@ struct thread { #ifdef ADD_THREAD_INTERN struct thread_intern i; /* Platform-dependent internals */ #endif - char trailing_nul; /* For the sake of thrsv, t->Toursv */ + char trailing_nul; /* For the sake of thrsv and oursv */ }; typedef struct thread *Thread; @@ -286,7 +288,6 @@ typedef struct condpair { #undef dirty #undef localizing -#define oursv (thr->Toursv) #define stack_base (thr->Tstack_base) #define stack_sp (thr->Tstack_sp) #define stack_max (thr->Tstack_max) @@ -341,7 +342,6 @@ typedef struct condpair { #define top_env (thr->Ttop_env) #define runlevel (thr->Trunlevel) -#define cvcache (thr->Tcvcache) #else /* USE_THREADS is not defined */ #define MUTEX_LOCK(m) |