[win32] Fix minor problems with non USE_THREADS build. win32 branch

now looks 5.004_57-ready.

p4raw-id: //depot/win32/perl@456

diff --git a/thread.h b/thread.h
index 1b1ddf9..07604f6 100644 (file)
--- a/thread.h
+++ b/thread.h
@@ -217,6 +217,8 @@ typedef struct condpair {
 #define COND_BROADCAST(c)
 #define COND_WAIT(c, m)
 #define COND_DESTROY(c)
+#define LOCK_SV_MUTEX
+#define UNLOCK_SV_MUTEX
 
 #define THR
 /* Rats: if dTHR is just blank then the subsequent ";" throws an error */

diff --git a/win32/makedef.pl b/win32/makedef.pl
index ddf01fd..e0312e2 100644 (file)
--- a/win32/makedef.pl
+++ b/win32/makedef.pl
@@ -219,6 +219,7 @@ Perl_nthreads
 Perl_nthreads_cond
 Perl_per_thread_magicals
 Perl_thread_create
+Perl_threadnum
 Perl_find_threadsv
 Perl_threadsv_names
 Perl_thrsv