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

Initial revision

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 1998-01-16 12:13:05 +00:00
parent 392296c12d
commit 3db12e8b23
225 changed files with 75935 additions and 0 deletions

13
missing/strcasecmp.c Normal file
View file

@ -0,0 +1,13 @@
#include <ctype.h>
#define min(a,b) (((a)>(b))?(b):(a))
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);
}