1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/missing/strcasecmp.c

13 lines
222 B
C
Raw Normal View History

#include <ctype.h>
int
strcasecmp(p1, p2)
char *p1, *p2;
{
for ( ; *p1 && *p2; p1++, p2++) {
if (toupper(*p1) != toupper(*p2))
return toupper(*p1) - toupper(*p2);
}
return strlen(p1) - strlen(p2);
}