summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sv.h2
-rw-r--r--toke.c2
2 files changed, 2 insertions, 2 deletions
diff --git a/sv.h b/sv.h
index a16dcdd249..1374c87a5c 100644
--- a/sv.h
+++ b/sv.h
@@ -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 \
diff --git a/toke.c b/toke.c
index 8109c3e47a..035f06c020 100644
--- a/toke.c
+++ b/toke.c
@@ -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;