Repatch (from linux) of OSX IRAF

1 files changed, 17 insertions, 0 deletions

diff --git a/vendor/x11iraf/obm/ObmW/strnchr.c b/vendor/x11iraf/obm/ObmW/strnchr.c
new file mode 100644
index 00000000..2dc2e1cd
--- /dev/null
+++ b/vendor/x11iraf/obm/ObmW/strnchr.c
@@ -0,0 +1,17 @@
+#include <X11/Intrinsic.h>
+#include <X11/StringDefs.h>
+#include "TabString.h"
+
+/*
+ *	Like strchr, except has a length limit.
+ */
+char *
+strnchr(s, c, n)
+     char *s;
+     int c;
+     int n;
+{
+	while (n--)
+		if (*s == c) return s; else ++s;
+	return NULL;
+}