Differences From Artifact [9d3a35efe3]:

• File generic/tclCompExpr.c — part of check-in [fddfa53d53] at 2011-09-07 14:30:47 on branch dgp-3401704 — Tidiness, comments, and tests. (user: dgp size: 82581) [more...]

To Artifact [8fc5e56344]:

• File generic/tclCompExpr.c — part of check-in [ece518a000] at 2011-09-07 17:28:56 on branch core-8-5-branch — missing 'break' (user: dgp size: 82596)

748
749
750
751
752
753
754

755
756
757
758
759
760
761

				case 'b':
				    Tcl_AppendToObj(post,
					    " (invalid binary number?)", -1);
				    break;
				case 'o':
				    Tcl_AppendToObj(post,
					    " (invalid octal number?)", -1);

				default:
				    if (isdigit(UCHAR(start[1]))) {
				        Tcl_AppendToObj(post,
						" (invalid octal number?)", -1);
				    }
				    break;
				}

>

748
749
750
751
752
753
754
755
756
757
758
759
760
761
762

				case 'b':
				    Tcl_AppendToObj(post,
					    " (invalid binary number?)", -1);
				    break;
				case 'o':
				    Tcl_AppendToObj(post,
					    " (invalid octal number?)", -1);
				    break;
				default:
				    if (isdigit(UCHAR(start[1]))) {
				        Tcl_AppendToObj(post,
						" (invalid octal number?)", -1);
				    }
				    break;
				}