Tcl Source Code

Artifact [9aca67af4f]
Login

Artifact 9aca67af4f0d93252d00a3d7f19796b0f9d0d2cd:

Attachment "regc_locale.c.diff-1" to ticket [578363ffff] added by pvgoran 2002-07-28 23:43:39.
Patch for: File "generic/regc_locale.c", Branch "MAIN", Revision 1.8

--- regc_locale.c	Sun Jul 28 22:33:28 2002
+++ regc_locale.c.new-1	Sun Jul 28 22:38:02 2002
@@ -842,7 +842,10 @@
 	case CC_XDIGIT:
 	    cv = getcvec(v, 0, NUM_DIGIT_RANGE+2, 0);
 	    if (cv) {	
-		addrange(cv, '0', '9');
+		for (i = 0; i < NUM_DIGIT_RANGE; i++) {
+		    addrange(cv, digitRangeTable[i].start,
+			    digitRangeTable[i].end);
+		}
 		addrange(cv, 'a', 'f');
 		addrange(cv, 'A', 'F');
 	    }