diff options
| author | dgp <dgp@users.sourceforge.net> | 2023-11-13 20:10:15 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2023-11-13 20:10:15 (GMT) |
| commit | 097954529a4f7cbc2bba17841f07a4283b68f1cc (patch) | |
| tree | 6b40f57f7895582bfc018f4c477737ac085019fe /generic/tclEncoding.c | |
| parent | 3052212deede1996f05bb96cdd0d96fb4c6f8279 (diff) | |
| download | tcl-097954529a4f7cbc2bba17841f07a4283b68f1cc.zip tcl-097954529a4f7cbc2bba17841f07a4283b68f1cc.tar.gz tcl-097954529a4f7cbc2bba17841f07a4283b68f1cc.tar.bz2 | |
remove debugs
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index ff73904..1d87622 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -439,7 +439,6 @@ FillEncodingFileMap(void) Tcl_Size i, numDirs = 0; Tcl_Obj *map, *searchPath; -fprintf(stdout, "FEFM CALLER\n"); fflush(stdout); searchPath = Tcl_GetEncodingSearchPath(); Tcl_IncrRefCount(searchPath); TclListObjLengthM(NULL, searchPath, &numDirs); @@ -723,7 +722,6 @@ Tcl_GetDefaultEncodingDir(void) { int numDirs; Tcl_Obj *first, *searchPath = Tcl_GetEncodingSearchPath(); -fprintf(stdout, "GDE CALLER\n"); fflush(stdout); TclListObjLengthM(NULL, searchPath, &numDirs); if (numDirs == 0) { @@ -760,7 +758,6 @@ Tcl_SetDefaultEncodingDir( searchPath = Tcl_DuplicateObj(searchPath); Tcl_ListObjReplace(NULL, searchPath, 0, 0, 1, &directory); -fprintf(stdout, "SDE CALLER\n"); fflush(stdout); Tcl_SetEncodingSearchPath(searchPath); } #endif @@ -1775,7 +1772,6 @@ OpenEncodingFileChannel( Tcl_Obj **dir, *path, *directory = NULL; Tcl_Channel chan = NULL; Tcl_Size i, numDirs; -fprintf(stdout, "OEFC CALLER\n"); fflush(stdout); TclListObjGetElementsM(NULL, searchPath, &numDirs, &dir); Tcl_IncrRefCount(nameObj); @@ -4317,8 +4313,6 @@ InitializeEncodingSearchPath( Tcl_Size i, numDirs, numBytes; Tcl_Obj *libPathObj, *encodingObj, *searchPathObj; -fprintf(stdout, "IESP\n"); fflush(stdout); - TclNewLiteralStringObj(encodingObj, "encoding"); TclNewObj(searchPathObj); Tcl_IncrRefCount(encodingObj); |