Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Only upgrade when necessary

  • Loading branch information...
commit 0f18891dd57b91158a442c0a3154f5aa62604dc4 1 parent 61154ac
@Leont Leont authored Father Chrysostomos committed
Showing with 1 addition and 1 deletion.
  1. +1 −1  doio.c
View
2  doio.c
@@ -2275,7 +2275,7 @@ Perl_do_shmio(pTHX_ I32 optype, SV **mark, SV **sp)
/* suppress warning when reading into undef var (tchrist 3/Mar/00) */
if (! SvOK(mstr))
sv_setpvs(mstr, "");
- sv_upgrade(mstr, SVt_PV);
+ SvUPGRADE(mstr, SVt_PV);
SvPOK_only(mstr);
mbuf = SvGROW(mstr, (STRLEN)msize+1);
Please sign in to comment.
Something went wrong with that request. Please try again.