From c301d6064f299b8a77670348b81d25d2d94d6a2f Mon Sep 17 00:00:00 2001 From: Dave Mitchell Date: Mon, 15 Jan 2007 14:16:53 +0000 Subject: extend threads 'veto cleanup' to perl_free and system stuff p4raw-id: //depot/perl@29827 --- perlvars.h | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'perlvars.h') diff --git a/perlvars.h b/perlvars.h index 94792fe0da..4970146b07 100644 --- a/perlvars.h +++ b/perlvars.h @@ -146,3 +146,8 @@ PERLVAR(Ghints_mutex, perl_mutex) /* Mutex for refcounted he refcounting */ #if defined(USE_ITHREADS) PERLVAR(Gperlio_mutex, perl_mutex) /* Mutex for perlio fd refcounts */ #endif + +/* this is currently set without MUTEX protection, so keep it a type which + * can be set atomically (ie not a bit field) */ +PERLVARI(Gveto_cleanup, int, FALSE) /* exit without cleanup */ + -- cgit v1.2.1