From 43eccc533fed1303eeec148d6c1374a54c054e86 Mon Sep 17 00:00:00 2001
From: Karl Williamson <khw@cpan.org>
Date: Sat, 27 Sep 2025 18:46:30 -0600
Subject: [PATCH] embed.fnc: Change NULLOK to NN for several functions

Inspection showed these were wrongly categorized
---
 embed.fnc | 8 ++++----
 proto.h   | 8 ++++----
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/embed.fnc b/embed.fnc
index 6c4412df7d..5f3c2db4b7 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -3687,26 +3687,26 @@ Cp	|UV	|to_uni_upper	|UV c					\
 				|NN STRLEN *lenp
 Cp	|UV	|to_utf8_fold_flags_					\
 				|NN const U8 *p 			\
-				|NULLOK const U8 *e			\
+				|NN const U8 *e 			\
 				|NN U8 *ustrp				\
 				|NULLOK STRLEN *lenp			\
 				|U8 flags
 
 Cp	|UV	|to_utf8_lower_flags_					\
 				|NN const U8 *p 			\
-				|NULLOK const U8 *e			\
+				|NN const U8 *e 			\
 				|NN U8 *ustrp				\
 				|NULLOK STRLEN *lenp			\
 				|bool flags
 Cp	|UV	|to_utf8_title_flags_					\
 				|NN const U8 *p 			\
-				|NULLOK const U8 *e			\
+				|NN const U8 *e 			\
 				|NN U8 *ustrp				\
 				|NULLOK STRLEN *lenp			\
 				|bool flags
 Cp	|UV	|to_utf8_upper_flags_					\
 				|NN const U8 *p 			\
-				|NULLOK const U8 *e			\
+				|NN const U8 *e 			\
 				|NN U8 *ustrp				\
 				|NULLOK STRLEN *lenp			\
 				|bool flags
diff --git a/proto.h b/proto.h
index fca80a5ef8..5302f6977f 100644
--- a/proto.h
+++ b/proto.h
@@ -5296,22 +5296,22 @@ Perl_to_uni_upper(pTHX_ UV c, U8 *p, STRLEN *lenp);
 PERL_CALLCONV UV
 Perl_to_utf8_fold_flags_(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, U8 flags);
 #define PERL_ARGS_ASSERT_TO_UTF8_FOLD_FLAGS_    \
-        assert(p); assert(ustrp)
+        assert(p); assert(e); assert(ustrp)
 
 PERL_CALLCONV UV
 Perl_to_utf8_lower_flags_(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags);
 #define PERL_ARGS_ASSERT_TO_UTF8_LOWER_FLAGS_   \
-        assert(p); assert(ustrp)
+        assert(p); assert(e); assert(ustrp)
 
 PERL_CALLCONV UV
 Perl_to_utf8_title_flags_(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags);
 #define PERL_ARGS_ASSERT_TO_UTF8_TITLE_FLAGS_   \
-        assert(p); assert(ustrp)
+        assert(p); assert(e); assert(ustrp)
 
 PERL_CALLCONV UV
 Perl_to_utf8_upper_flags_(pTHX_ const U8 *p, const U8 *e, U8 *ustrp, STRLEN *lenp, bool flags);
 #define PERL_ARGS_ASSERT_TO_UTF8_UPPER_FLAGS_   \
-        assert(p); assert(ustrp)
+        assert(p); assert(e); assert(ustrp)
 
 PERL_CALLCONV bool
 Perl_try_amagic_bin(pTHX_ int method, int flags);