This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
util.c: Add comment
[perl5.git] / util.c
diff --git a/util.c b/util.c
index 7ab0df7..bb220e3 100644 (file)
--- a/util.c
+++ b/util.c
@@ -467,7 +467,8 @@ Perl_instr(register const char *big, register const char *little)
     return NULL;
 }
 
-/* same as instr but allow embedded nulls */
+/* same as instr but allow embedded nulls.  The end pointers point to 1 beyond
+ * the final character desired to be checked */
 
 char *
 Perl_ninstr(const char *big, const char *bigend, const char *little, const char *lend)