toke.c:scan_str: Document args in one spot

[perl5.git] / perl.h

diff --git a/perl.h b/perl.h
index bdb64b3..d2c5568 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -1601,6 +1601,8 @@ typedef UVTYPE UV;
 #  endif
 #endif
 
+#define SSize_t_MAX (SSize_t)(~(size_t)0 >> 1)
+
 #ifndef HAS_QUAD
 # undef PERL_NEED_MY_HTOLE64
 # undef PERL_NEED_MY_LETOH64