diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-05 09:34:56 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-05 09:34:56 (GMT) |
commit | 045a39faf34fb7fe84c70f7862dcb04e8bd87e5f (patch) | |
tree | bd2d423da13901270dfb339abfcd6c5ed9c91f86 /generic/tclUtil.c | |
parent | 9cd3b6b2e13d2636c1b0455bd237e1231e1b9fc5 (diff) | |
download | tcl-045a39faf34fb7fe84c70f7862dcb04e8bd87e5f.zip tcl-045a39faf34fb7fe84c70f7862dcb04e8bd87e5f.tar.gz tcl-045a39faf34fb7fe84c70f7862dcb04e8bd87e5f.tar.bz2 |
Reduce amount of unreachable code. Refactor Win socket and load code to be less
baroque in its internals.
Diffstat (limited to 'generic/tclUtil.c')
-rw-r--r-- | generic/tclUtil.c | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c index 6ce430b..a1c1996 100644 --- a/generic/tclUtil.c +++ b/generic/tclUtil.c @@ -4121,20 +4121,9 @@ TclReToGlob( *exactPtr = (anchorLeft && anchorRight); } -#if 0 - fprintf(stderr, "INPUT RE '%.*s' OUTPUT GLOB '%s' anchor %d:%d \n", - reStrLen, reStr, - Tcl_DStringValue(dsPtr), anchorLeft, anchorRight); - fflush(stderr); -#endif return TCL_OK; invalidGlob: -#if 0 - fprintf(stderr, "INPUT RE '%.*s' NO OUTPUT GLOB %s (%c)\n", - reStrLen, reStr, msg, *p); - fflush(stderr); -#endif if (interp != NULL) { Tcl_AppendResult(interp, msg, NULL); Tcl_SetErrorCode(interp, "TCL", "RE2GLOB", code, NULL); |