X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2Fthreads%2Fthreads.xs;h=0d00c81679975a5dfe283b4b3828c816c50eb65d;hb=df9156bbad76be5c6d9d4ee4be47e7b2a5cb5fad;hp=1dc4e39b0fd2b906a6a86f8c5bc04d1b1e2d9c07;hpb=6a43d2f9dcd01889e3e3e78ab5de0a2ee646713a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs
index 1dc4e39..0d00c81 100755
--- a/ext/threads/threads.xs
+++ b/ext/threads/threads.xs
@@ -157,9 +157,9 @@ SV* Perl_thread_create(char* class, SV* init_function, SV* params) {
 
 #else
 #ifdef OLD_PTHREADS_API
-	pthread_create( &thread->thr, (pthread_attr_t)NULL, Perl_thread_run, thread);
+	pthread_create( &thread->thr, (pthread_attr_t)NULL, Perl_thread_run, (void *)thread);
 #else
-	pthread_create( &thread->thr, (pthread_attr_t*)NULL, Perl_thread_run, thread);
+	pthread_create( &thread->thr, (pthread_attr_t*)NULL, Perl_thread_run, (void *)thread);
 #endif
 #endif
 	MUTEX_UNLOCK(&create_mutex);