summaryrefslogtreecommitdiffstats
path: root/win/tclWinChan.c
diff options
context:
space:
mode:
Diffstat (limited to 'win/tclWinChan.c')
-rw-r--r--win/tclWinChan.c17
1 files changed, 1 insertions, 16 deletions
diff --git a/win/tclWinChan.c b/win/tclWinChan.c
index 4c08464..248ca5b 100644
--- a/win/tclWinChan.c
+++ b/win/tclWinChan.c
@@ -814,21 +814,6 @@ CombineDwords(
return converter.QuadPart;
}
-static inline void
-StoreElementInDict(
- Tcl_Obj *dictObj,
- const char *name,
- Tcl_Obj *valueObj)
-{
- /*
- * We assume that the dict is being built fresh and that there's never any
- * duplicate keys.
- */
-
- Tcl_Obj *nameObj = Tcl_NewStringObj(name, TCL_INDEX_NONE);
- Tcl_DictObjPut(NULL, dictObj, nameObj, valueObj);
-}
-
static inline time_t
ToCTime(
FILETIME fileTime) /* UTC time */
@@ -891,7 +876,7 @@ StatOpenFile(
*/
TclNewObj(dictObj);
-#define STORE_ELEM(name, value) StoreElementInDict(dictObj, name, value)
+#define STORE_ELEM(name, value) TclDictPut(NULL, dictObj, name, value)
STORE_ELEM("dev", Tcl_NewWideIntObj((long) dev));
STORE_ELEM("ino", Tcl_NewWideIntObj((long long) inode));