diff options
| -rw-r--r-- | generic/tclCompExpr.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 36e1c9d..60f95b6 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -752,6 +752,7 @@ ParseExpr( case 'o': Tcl_AppendToObj(post, " (invalid octal number?)", -1); + break; default: if (isdigit(UCHAR(start[1]))) { Tcl_AppendToObj(post, |