initialise PL_watch_pvx
authorDavid Mitchell <davem@iabyn.com>
Fri, 11 Apr 2014 20:45:02 +0000 (21:45 +0100)
committerDavid Mitchell <davem@iabyn.com>
Fri, 11 Apr 2014 20:45:02 +0000 (21:45 +0100)
This global var is only used in debugging builds, but with
PERL_GLOBAL_STRUCT_PRIVATE builds, it gives valgrind errors. Just
initialise it to NULL.

I was originally trying to replicate smoke failures of
dist/Thread-Queue/t/07_lock.t under PERL_GLOBAL_STRUCT_PRIVATE, and
valgrind complained.

perlvars.h

index aa724e8..7bafa40 100644 (file)
@@ -97,7 +97,7 @@ PERLVAR(G, hints_mutex, perl_mutex)    /* Mutex for refcounted he refcounting */
 #endif
 
 #ifdef DEBUGGING
-PERLVAR(G, watch_pvx,  char *)
+PERLVARI(G, watch_pvx, char *, NULL)
 #endif
 
 /*