From 65a5162550f58047974793cdc8067a970b2435c0 Mon Sep 17 00:00:00 2001 From: matz Date: Fri, 13 Aug 1999 05:45:20 +0000 Subject: 1.4.0 git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@520 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- missing/strncasecmp.c | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 missing/strncasecmp.c (limited to 'missing/strncasecmp.c') diff --git a/missing/strncasecmp.c b/missing/strncasecmp.c new file mode 100644 index 0000000000..c136703415 --- /dev/null +++ b/missing/strncasecmp.c @@ -0,0 +1,18 @@ +#include + +int +strncasecmp(p1, p2, len) + char *p1; + char *p2; + int len; +{ + for (; len != 0; len--, p1++, p2++) { + if (toupper(*p1) != toupper(*p2)) { + return toupper(*p1) - toupper(*p2); + } + if (*p1 == '\0') { + return 0; + } + } + return 0; +} -- cgit v1.2.3