mirror of
				https://github.com/ruby/ruby.git
				synced 2022-11-09 12:17:21 -05:00 
			
		
		
		
	to appear in singleton method body. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1233 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
		
			
				
	
	
		
			16 lines
		
	
	
	
		
			269 B
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			16 lines
		
	
	
	
		
			269 B
		
	
	
	
		
			C
		
	
	
	
	
	
/* public domain rewrite of strcasecmp(3) */
 | 
						|
 | 
						|
#include <ctype.h>
 | 
						|
 | 
						|
int
 | 
						|
strcasecmp(p1, p2)
 | 
						|
    char *p1, *p2;
 | 
						|
{
 | 
						|
    while (*p1 && *p2) {
 | 
						|
	if (toupper(*p1) != toupper(*p2))
 | 
						|
	    return toupper(*p1) - toupper(*p2);
 | 
						|
	p1++;
 | 
						|
	p2++;
 | 
						|
    }
 | 
						|
    return strlen(p1) - strlen(p2);
 | 
						|
}
 |