From: Artur Bergman <sky@nanisky.com>
Date: Fri, 21 Sep 2001 08:12:39 +0000 (+0000)
Subject:  Attempt to fix solaris issue raised by Andy Dougherty.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5b414d21a66f6678db9e3b0b53e1373d029cf767;p=p5sagit%2Fp5-mst-13.2.git

 Attempt to fix solaris issue raised by Andy Dougherty.

p4raw-id: //depot/perl@12104
---

diff --git a/ext/threads/threads.h b/ext/threads/threads.h
index bf0e580..ddfe29e 100755
--- a/ext/threads/threads.h
+++ b/ext/threads/threads.h
@@ -47,7 +47,7 @@ shared_sv* threads;
 #ifdef WIN32
 THREAD_RET_TYPE Perl_thread_run(LPVOID arg);
 #else
-void Perl_thread_run(ithread* thread);
+void Perl_thread_run(void * arg);
 #endif
 void Perl_thread_destruct(ithread* thread);
 
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs
index 82786e2..3e9a1f9 100755
--- a/ext/threads/threads.xs
+++ b/ext/threads/threads.xs
@@ -12,10 +12,10 @@
 
 #ifdef WIN32
 THREAD_RET_TYPE Perl_thread_run(LPVOID arg) {
-	ithread* thread = (ithread*) arg;
 #else
-void Perl_thread_run(ithread* thread) {
+void Perl_thread_run(void * arg) {
 #endif
+	ithread* thread = (ithread*) arg;
 	SV* thread_tid_ptr;
 	SV* thread_ptr;
 	dTHXa(thread->interp);