Wed Oct 16 14:38:36 CEST 2002  Stepan Kasal  <address@hidden>

	* field.c (sc_parse_field): Remove the ability to search
	  for the letter case insesitively---re_parse_field handles
	  this.

diff -urpN gawk-3.1.1.i1/field.c gawk-3.1.1/field.c
--- gawk-3.1.1.i1/field.c	Wed Oct 16 12:22:32 2002
+++ gawk-3.1.1/field.c	Wed Oct 16 12:54:28 2002
@@ -613,7 +613,6 @@ sc_parse_field(long up_to,	/* parse only
 	register long nf = parse_high_water;
 	register char *field;
 	register char *end = scan + len;
-	int onecase;
 	char sav;
 #ifdef MBS_SUPPORT
 	size_t mbclen = 0;
@@ -632,10 +631,6 @@ sc_parse_field(long up_to,	/* parse only
 	else
 		fschar = fs->stptr[0];
 
-	onecase = (IGNORECASE && ISALPHA(fschar));
-	if (onecase)
-		fschar = casetable[(unsigned char) fschar];
-
 	/* before doing anything save the char at *end */
 	sav = *end;
 	/* because it will be destroyed now: */
@@ -643,35 +638,19 @@ sc_parse_field(long up_to,	/* parse only
 
 	for (; nf < up_to;) {
 		field = scan;
-		if (onecase) {
-			while (casetable[(unsigned char) *scan] != fschar)
-#ifdef MBS_SUPPORT
-				if (MB_CUR_MAX > 1) {
-					mbclen = mbrlen(scan, end-scan, &mbs);
-					if ((mbclen == 1) || (mbclen == (size_t) -1)
-						|| (mbclen == (size_t) -2) || (mbclen == 0)) {
-						/* We treat it as a singlebyte character.  */
-						mbclen = 1;
-					}
-					scan += mbclen;
-				} else
-#endif
-				scan++;
-		} else {
-			while (*scan != fschar)
+		while (*scan != fschar)
 #ifdef MBS_SUPPORT
-				if (MB_CUR_MAX > 1) {
-					mbclen = mbrlen(scan, end-scan, &mbs);
-					if ((mbclen == 1) || (mbclen == (size_t) -1)
-						|| (mbclen == (size_t) -2) || (mbclen == 0)) {
-						/* We treat it as a singlebyte character.  */
-						mbclen = 1;
-					}
-					scan += mbclen;
-				} else
+			if (MB_CUR_MAX > 1) {
+				mbclen = mbrlen(scan, end-scan, &mbs);
+				if ((mbclen == 1) || (mbclen == (size_t) -1)
+					|| (mbclen == (size_t) -2) || (mbclen == 0)) {
+					/* We treat it as a singlebyte character.  */
+					mbclen = 1;
+				}
+				scan += mbclen;
+			} else
 #endif
-				scan++;
-		}
+			scan++;
 		(*set)(++nf, field, (long)(scan - field), n);
 		if (scan == end)
 			break;