Change docs display for PERL_UNUSED_foo

[perl5.git] / regen / reentr.pl

diff --git a/regen/reentr.pl b/regen/reentr.pl
index 94721e9..ba2e1c8 100644 (file)
--- a/regen/reentr.pl
+++ b/regen/reentr.pl
@@ -818,7 +818,7 @@ print $c <<"EOF";
 
 #define RenewDouble(data_pointer, size_pointer, type) \\
     STMT_START { \\
-       const size_t size = *(size_pointer) * 2; \\
+       const size_t size = MAX(*(size_pointer), 1) * 2; \\
        Renew((data_pointer), (size), type); \\
        *(size_pointer) = size; \\
     } STMT_END