Make uv_to_utf8() to zero-terminate its output buffer,

always use (at least) UTF8_MAXLEN + 1 U8s deep buffer.

p4raw-id: //depot/perl@7967

1 files changed, 1 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index 0c803d44c7..7b680910e7 100644
--- a/toke.c
+++ b/toke.c
@@ -7183,7 +7183,7 @@ vstring:
 		pos++;
 	    if (!isALPHA(*pos)) {
 		UV rev;
-		U8 tmpbuf[UTF8_MAXLEN];
+		U8 tmpbuf[UTF8_MAXLEN+1];
 		U8 *tmpend;
 		bool utf8 = FALSE;
 		s++;				/* get past 'v' */