Encourage compilers to tail call optimise in sv_savepv, sv_savepvn

and sv_savesharedpv. Need to create non-void returning versions of
Copy and Zero, as the existing macros deliberately cast to (void)

p4raw-id: //depot/perl@23126

1 files changed, 1 insertions, 2 deletions

diff --git a/perl.c b/perl.c
index f387cf1f75..7eb121e088 100644
--- a/perl.c
+++ b/perl.c
@@ -190,8 +190,7 @@ perl_alloc(void)
     my_perl = (PerlInterpreter*)PerlMem_malloc(sizeof(PerlInterpreter));
 
     INIT_TLS_AND_INTERP;
-    Zero(my_perl, 1, PerlInterpreter);
-    return my_perl;
+    return ZeroD(my_perl, 1, PerlInterpreter);
 }
 #endif /* PERL_IMPLICIT_SYS */