ruby--ruby/missing/strcasecmp.c

16 lines
274 B
C

/* public domain rewrite of strcasecmp(3) */
#include <ctype.h>
int
strcasecmp(const char *p1, const char *p2)
{
while (*p1 && *p2) {
if (toupper(*p1) != toupper(*p2))
return toupper(*p1) - toupper(*p2);
p1++;
p2++;
}
return strlen(p1) - strlen(p2);
}