Use SSize_t for read lock counter

We have tests to make sure this doesn't go negative, but wrongly
declared the variable as unsigned.

Spotted by Craig Berry.

diff --git a/perl.h b/perl.h
index cbb6905..9627f34 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3345,7 +3345,7 @@ typedef pthread_key_t     perl_key;
 typedef struct {
     perl_mutex lock;
     perl_cond  wakeup;
-    Size_t     readers_count;
+    SSize_t    readers_count;
 } perl_RnW1_mutex_t;