diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-12 13:06:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-05-12 13:06:23 (GMT) |
| commit | 544a36f658bc9b943c70b56477d8809e046d8246 (patch) | |
| tree | 2e5da5847e892e61d5870784b98bbc6b310ad402 | |
| parent | 9beeb77bd585a1ea73c66d0c4161770fa57f9a98 (diff) | |
| parent | 6c00e4db82fb7bd7fda66af0d9652ae2b950cc1f (diff) | |
| download | tcl-544a36f658bc9b943c70b56477d8809e046d8246.zip tcl-544a36f658bc9b943c70b56477d8809e046d8246.tar.gz tcl-544a36f658bc9b943c70b56477d8809e046d8246.tar.bz2 | |
Merge 8.6
| -rw-r--r-- | win/tclWinTest.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/win/tclWinTest.c b/win/tclWinTest.c index f45b557..c910bc5 100644 --- a/win/tclWinTest.c +++ b/win/tclWinTest.c @@ -322,18 +322,14 @@ TestSizeCmd( if (objc != 2) { goto syntax; } - if (strcmp(Tcl_GetString(objv[1]), "time_t") == 0) { - Tcl_SetObjResult(interp, Tcl_NewWideIntObj(sizeof(time_t))); - return TCL_OK; - } if (strcmp(Tcl_GetString(objv[1]), "st_mtime") == 0) { - Tcl_StatBuf *statPtr; - Tcl_SetObjResult(interp, Tcl_NewWideIntObj(sizeof(statPtr->st_mtime))); - return TCL_OK; + Tcl_StatBuf *statPtr; + Tcl_SetObjResult(interp, Tcl_NewWideIntObj(sizeof(statPtr->st_mtime))); + return TCL_OK; } syntax: - Tcl_WrongNumArgs(interp, 1, objv, "time_t|st_mtime"); + Tcl_WrongNumArgs(interp, 1, objv, "st_mtime"); return TCL_ERROR; } |