This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make instr() a macro
[perl5.git] / util.h
diff --git a/util.h b/util.h
index 3310b11..3a74bd0 100644 (file)
--- a/util.h
+++ b/util.h
@@ -229,6 +229,8 @@ means arg not present, 1 is empty string/null byte */
 #  define HS_CXT cv
 #endif
 
+#define instr(haystack, needle) strstr(haystack, needle)
+
 /*
  * ex: set ts=8 sts=4 sw=4 et:
  */