File tree Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Original file line number Diff line number Diff line change @@ -2296,6 +2296,7 @@ PoisonWith(0xEF) for catching access to freed memory.
2296
2296
2297
2297
#define MEM_SIZE_MAX ((MEM_SIZE)~0)
2298
2298
2299
+ #define _PERL_STRLEN_ROUNDUP_UNCHECKED (n ) (((n) - 1 + PERL_STRLEN_ROUNDUP_QUANTUM) & ~((MEM_SIZE)PERL_STRLEN_ROUNDUP_QUANTUM - 1))
2299
2300
2300
2301
#ifdef PERL_MALLOC_WRAP
2301
2302
@@ -2343,15 +2344,15 @@ PoisonWith(0xEF) for catching access to freed memory.
2343
2344
2344
2345
#define MEM_WRAP_CHECK_ (n ,t ) MEM_WRAP_CHECK(n,t),
2345
2346
2346
- #define PERL_STRLEN_ROUNDUP (n ) ((void)(((n) > MEM_SIZE_MAX - 2 * PERL_STRLEN_ROUNDUP_QUANTUM) ? (croak_memory_wrap(),0): 0),((n-1+PERL_STRLEN_ROUNDUP_QUANTUM)&~((MEM_SIZE)PERL_STRLEN_ROUNDUP_QUANTUM-1) ))
2347
+ #define PERL_STRLEN_ROUNDUP (n ) ((void)(((n) > MEM_SIZE_MAX - 2 * PERL_STRLEN_ROUNDUP_QUANTUM) ? (croak_memory_wrap(),0) : 0), _PERL_STRLEN_ROUNDUP_UNCHECKED(n ))
2347
2348
#else
2348
2349
2349
2350
#define MEM_WRAP_CHECK (n ,t )
2350
2351
#define MEM_WRAP_CHECK_1 (n ,t ,a )
2351
2352
#define MEM_WRAP_CHECK_2 (n ,t ,a ,b )
2352
2353
#define MEM_WRAP_CHECK_ (n ,t )
2353
2354
2354
- #define PERL_STRLEN_ROUNDUP (n ) (((n-1+PERL_STRLEN_ROUNDUP_QUANTUM)&~((MEM_SIZE)PERL_STRLEN_ROUNDUP_QUANTUM-1)) )
2355
+ #define PERL_STRLEN_ROUNDUP (n ) _PERL_STRLEN_ROUNDUP_UNCHECKED(n )
2355
2356
2356
2357
#endif
2357
2358
You can’t perform that action at this time.
0 commit comments