diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/c/stuff.xs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/c/stuff.xs.pm b/perl-install/c/stuff.xs.pm index 7a3bc6c2d..41d0b721a 100644 --- a/perl-install/c/stuff.xs.pm +++ b/perl-install/c/stuff.xs.pm @@ -451,7 +451,7 @@ from_utf8(s) RETVAL = s; if (cd != (iconv_t) (-1)) { int s_len = strlen(RETVAL); - char *buf = alloca(2 * s_len); + char *buf = alloca(s_len + 10); /* 10 for safety, it should not be needed, utf8 is *always* bigger than a special encoding */ { char *ptr = buf; int ptr_len = s_len; |