This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Refer to CopLABEL_len[_flags] in pod for cop_fetch_label
[perl5.git] / util.h
diff --git a/util.h b/util.h
index d9df7b3..4bc15f6 100644 (file)
--- a/util.h
+++ b/util.h
@@ -233,6 +233,16 @@ means arg not present, 1 is empty string/null byte */
 #  define HS_CXT cv
 #endif
 
+/*
+=for apidoc instr
+Same as L<strstr(3)>, which finds and returns a pointer to the first occurrence
+of the NUL-terminated substring C<little> in the NUL-terminated string C<big>,
+returning NULL if not found.  The terminating NUL bytes are not compared.
+
+=cut
+*/
+
+
 #define instr(haystack, needle) strstr(haystack, needle)
 
 #ifdef HAS_MEMMEM