summaryrefslogtreecommitdiffstats
path: root/generic/tclUtil.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-04-05 09:34:56 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-04-05 09:34:56 (GMT)
commitf19dc488c7222a8e782fd227736f0d440c806bc4 (patch)
treebd2d423da13901270dfb339abfcd6c5ed9c91f86 /generic/tclUtil.c
parentf9c97ea67073aa3e2fa22b80e826b3d491e3440c (diff)
downloadtcl-f19dc488c7222a8e782fd227736f0d440c806bc4.zip
tcl-f19dc488c7222a8e782fd227736f0d440c806bc4.tar.gz
tcl-f19dc488c7222a8e782fd227736f0d440c806bc4.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.c11
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);