--- bash-2.03/lib/glob/my_strcoll.c.old Thu Jan 20 13:20:39 2000 +++ bash-2.03/lib/glob/my_strcoll.c Thu Jan 20 13:28:31 2000 @@ -0,0 +1,26 @@ +/* the GNU libc strcoll() function is case insensitive; this is a version + * of strcoll() that is case sensitive + */ + +#include <ctype.h> +#include <string.h> + +#include <config.h> + +#if defined (HAVE_STRCOLL) +int +my_strcoll(s1,s2) +register unsigned char *s1, *s2; +{ + char a[]= { '\0', '\0' }; + char b[]= { '\0', '\0' }; + + while (*s1 && *s2 && (isupper(*s1) == isupper(*s2))) + { + a[0]=*s1; b[0]=*s2; + if (strcoll(a,b) == 0) { s1++; s2++; } + else return (strcoll(a,b)); + } + return (a - b); +} +#endif