The one that got away in #7984.

Subject: Re: dTHR - what and why?
Message-ID: <20001205111552.A4647@firedrake.org>

p4raw-id: //depot/perl@7987

diff --git a/sv.h b/sv.h
index 425acc3..b155ece 100644 (file)
--- a/sv.h
+++ b/sv.h
@@ -801,7 +801,6 @@ Taints an SV if tainting is enabled
 #define SvTAINT(sv)                    \
     STMT_START {                       \
        if (PL_tainting) {              \
-           dTHR;                       \
            if (PL_tainted)             \
                SvTAINTED_on(sv);       \
        }                               \