summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/CORE/util.h
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CORE/util.h')
-rw-r--r--Master/tlpkg/tlperl/lib/CORE/util.h13
1 files changed, 13 insertions, 0 deletions
diff --git a/Master/tlpkg/tlperl/lib/CORE/util.h b/Master/tlpkg/tlperl/lib/CORE/util.h
index 3310b119d8e..12a1c470eef 100644
--- a/Master/tlpkg/tlperl/lib/CORE/util.h
+++ b/Master/tlpkg/tlperl/lib/CORE/util.h
@@ -8,6 +8,10 @@
*
*/
+#ifndef PERL_UTIL_H_
+#define PERL_UTIL_H_
+
+
#ifdef VMS
# define PERL_FILE_IS_ABSOLUTE(f) \
(*(f) == '/' \
@@ -229,6 +233,15 @@ means arg not present, 1 is empty string/null byte */
# define HS_CXT cv
#endif
+#define instr(haystack, needle) strstr(haystack, needle)
+
+#ifdef HAS_MEMMEM
+# define ninstr(big, bigend, little, lend) \
+ ((char *) memmem(big, bigend - big, little, lend - little))
+#endif
+
+#endif /* PERL_UTIL_H_ */
+
/*
* ex: set ts=8 sts=4 sw=4 et:
*/