Eliminate (SV *) casts from sv.c and [tu]*.c, except for the cast in

Perl_sv_magicext(), which is documented.

p4raw-id: //depot/perl@34671

1 files changed, 1 insertions, 1 deletions

diff --git a/taint.c b/taint.c
index 034c6e3905..bbfc248c3e 100644
--- a/taint.c
+++ b/taint.c
@@ -97,7 +97,7 @@ Perl_taint_env(pTHX)
     /* If there's no %ENV hash of if it's not magical, croak, because
      * it probably doesn't reflect the actual environment */
     if (!GvHV(PL_envgv) || !(SvRMAGICAL(GvHV(PL_envgv))
-	    && mg_find((SV*)GvHV(PL_envgv), PERL_MAGIC_env))) {
+	    && mg_find((const SV *)GvHV(PL_envgv), PERL_MAGIC_env))) {
 	const bool was_tainted = PL_tainted;
 	const char * const name = GvENAME(PL_envgv);
 	PL_tainted = TRUE;