diff options
-rw-r--r-- | sv.h | 2 | ||||
-rw-r--r-- | toke.c | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -705,7 +705,7 @@ struct xpvio { # define SvNVx(sv) ((PL_Sv = (sv)), SvNV(PL_Sv)) # define SvPVx(sv, lp) ((PL_Sv = (sv)), SvPV(PL_Sv, lp)) # define SvPVutf8x(sv, lp) ((PL_Sv = (sv)), SvPVutf8(PL_Sv, lp)) -# define SvPVutf8x(sv, lp) ((PL_Sv = (sv)), SvPVbyte(PL_Sv, lp)) +# define SvPVbytex(sv, lp) ((PL_Sv = (sv)), SvPVbyte(PL_Sv, lp)) # define SvTRUE(sv) ( \ !sv \ ? 0 \ @@ -6801,12 +6801,12 @@ Perl_scan_num(pTHX_ char *start) /* if it starts with a v, it could be a version number */ case 'v': { - UV rev, ver, sver; char *pos = s; pos++; while (isDIGIT(*pos)) pos++; if (*pos == '.' && isDIGIT(pos[1])) { + UV rev; U8 tmpbuf[10]; U8 *tmpend; NV nshift = 1.0; |