Eliminate (AV *) casts in *.c.

p4raw-id: //depot/perl@34650

1 files changed, 2 insertions, 2 deletions

diff --git a/mathoms.c b/mathoms.c
index de032fe546..7cd5e2e8fc 100644
--- a/mathoms.c
+++ b/mathoms.c
@@ -609,7 +609,7 @@ AV *
 Perl_av_fake(pTHX_ register I32 size, register SV **strp)
 {
     register SV** ary;
-    register AV * const av = (AV*)newSV_type(SVt_PVAV);
+    register AV * const av = MUTABLE_AV(newSV_type(SVt_PVAV));
 
     PERL_ARGS_ASSERT_AV_FAKE;
 
@@ -1445,7 +1445,7 @@ Perl_hv_delete(pTHX_ HV *hv, const char *key, I32 klen_i32, I32 flags)
 AV *
 Perl_newAV(pTHX)
 {
-    return (AV*)newSV_type(SVt_PVAV);
+    return MUTABLE_AV(newSV_type(SVt_PVAV));
     /* sv_upgrade does AvREAL_only():
     AvALLOC(av) = 0;
     AvARRAY(av) = NULL;