Alpha OSF/1 fix

This commit is contained in:
Guido van Rossum 1995-01-09 17:50:47 +00:00
parent 37431fbbd0
commit 2565bff40a
1 changed files with 4 additions and 1 deletions

View File

@ -93,9 +93,12 @@ int start_new_thread _P2(func, void (*func) _P((void *)), arg, void *arg)
long get_thread_ident _P0()
{
pthread_t threadid;
if (!initialized)
init_thread();
return (long) pthread_self();
/* Jump through some hoops for Alpha OSF/1 */
threadid = pthread_self();
return (long) *(long *) &threadid;
}
static void do_exit_thread _P1(no_cleanup, int no_cleanup)