sv_2mortal(NEWSV(0,0)) better written as sv_newmortal()

p4raw-id: //depot/perl@23796

diff --git a/utf8.c b/utf8.c
index c6276c7..4cd5509 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -1574,7 +1574,7 @@ SV*
 Perl_swash_init(pTHX_ char* pkg, char* name, SV *listsv, I32 minbits, I32 none)
 {
     SV* retval;
-    SV* tokenbufsv = sv_2mortal(NEWSV(0,0));
+    SV* tokenbufsv = sv_newmortal();
     dSP;
     size_t pkg_len = strlen(pkg);
     size_t name_len = strlen(name);