diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-13 21:37:52 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-13 21:37:52 (GMT) |
| commit | d46e9784ab0ff5b3e9bf35dc56c903fd9503c936 (patch) | |
| tree | 13bbd0ee763654364e5f8fa55f2aa3aa3824cdba /generic/tclEncoding.c | |
| parent | 8b2d2887380bf8427f61d736f0f6ebd3ad88e193 (diff) | |
| parent | cfd25c802ae2a87b15dfc64dbf79e35eb1949896 (diff) | |
| download | tcl-d46e9784ab0ff5b3e9bf35dc56c903fd9503c936.zip tcl-d46e9784ab0ff5b3e9bf35dc56c903fd9503c936.tar.gz tcl-d46e9784ab0ff5b3e9bf35dc56c903fd9503c936.tar.bz2 | |
Fully functional now, with a lot of examples for the improvement. Also, merge trunk
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 0f7a6c5..877a950 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -881,7 +881,7 @@ Tcl_GetEncodingNames( Tcl_HashEntry *hPtr; Tcl_Obj *map, *name, *result; Tcl_DictSearch mapSearch; - int dummy, done = 0; + int done = 0; TclNewObj(result); Tcl_InitObjHashTable(&table); @@ -896,7 +896,7 @@ Tcl_GetEncodingNames( Encoding *encodingPtr = (Encoding *)Tcl_GetHashValue(hPtr); Tcl_CreateHashEntry(&table, - Tcl_NewStringObj(encodingPtr->name, TCL_INDEX_NONE), &dummy); + Tcl_NewStringObj(encodingPtr->name, TCL_INDEX_NONE), NULL); } Tcl_MutexUnlock(&encodingMutex); @@ -909,7 +909,7 @@ Tcl_GetEncodingNames( Tcl_DictObjFirst(NULL, map, &mapSearch, &name, NULL, &done); for (; !done; Tcl_DictObjNext(&mapSearch, &name, NULL, &done)) { - Tcl_CreateHashEntry(&table, name, &dummy); + Tcl_CreateHashEntry(&table, name, NULL); } /* |