is_utf8_invariant_string() Add comment

It took me a while to figure out this idea wouldn't work; so add caution for future maintainers
Perl · Oct 19, 2024 · cb5f3d4 · cb5f3d4
1 parent cb398d2
commit cb5f3d4
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/inline.h b/inline.h
@@ -1411,7 +1411,8 @@ Perl_is_utf8_invariant_string_loc(const U8* const s, STRLEN len, const U8 ** ep)
 
 #endif /* End of ! EBCDIC */
 
- /* Process per-byte */
+ /* Process per-byte. (Can't use libc functions like strpbrk() because
+ * input isn't necessarily a C string) */
  while (x < send) {
  if (! UTF8_IS_INVARIANT(*x)) {
  if (ep) {