This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: Increase debug buffer size
authorKarl Williamson <khw@cpan.org>
Sun, 4 Mar 2018 01:56:25 +0000 (18:56 -0700)
committerKarl Williamson <khw@cpan.org>
Sun, 4 Mar 2018 02:55:58 +0000 (19:55 -0700)
A case was found where this was too small

locale.c

index a86a028..7192916 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -5171,7 +5171,7 @@ S_setlocale_debug_string(const int category,        /* category number,
 
     /* initialise to a non-null value to keep it out of BSS and so keep
      * -DPERL_GLOBAL_STRUCT_PRIVATE happy */
-    static char ret[128] = "If you can read this, thank your buggy C"
+    static char ret[256] = "If you can read this, thank your buggy C"
                            " library strlcpy(), and change your hints file"
                            " to undef it";