More fixups for thrperl integration.

p4raw-id: //depot/perl@27

1 files changed, 5 insertions, 0 deletions

diff --git a/sv.h b/sv.h
index f52c09d43d..d58aeb1d84 100644
--- a/sv.h
+++ b/sv.h
@@ -243,6 +243,11 @@ struct xpvfm {
     long	xcv_depth;		/* >= 2 indicates recursive call */
     AV *	xcv_padlist;
     CV *	xcv_outside;
+#ifdef USE_THREADS
+    pthread_mutex_t *	xcv_mutexp;
+    pthread_cond_t *	xcv_condp;	/* signalled when owner leaves CV */
+    struct thread *	xcv_owner;	/* current owner thread */
+#endif /* USE_THREADS */
     U8		xcv_flags;
 
     I32		xfm_lines;