summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-03-31 08:14:14 -0600
committerKarl Williamson <khw@cpan.org>2022-05-27 21:49:44 -0600
commit602ec335901a7c187560cdffa84a8e6a134fa3df (patch)
treec7f02173e82a058c1e4ce19c5ba7a26016964ca4
parent99df0210877da2cf8a8c220fc9cbe2d07ca989d7 (diff)
downloadperl-602ec335901a7c187560cdffa84a8e6a134fa3df.tar.gz
Add asserts for memmem parameters
-rw-r--r--util.h4
1 files changed, 3 insertions, 1 deletions
diff --git a/util.h b/util.h
index d3f903a863..99675d3e85 100644
--- a/util.h
+++ b/util.h
@@ -247,7 +247,9 @@ returning NULL if not found. The terminating NUL bytes are not compared.
#ifdef HAS_MEMMEM
# define ninstr(big, bigend, little, lend) \
- ((char *) memmem((big), (bigend) - (big), \
+ (__ASSERT_(bigend >= big) \
+ __ASSERT_(lend >= little) \
+ (char *) memmem((big), (bigend) - (big), \
(little), (lend) - (little)))
#else
# define ninstr(a,b,c,d) Perl_ninstr(a,b,c,d)