diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-01 20:30:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-01 20:30:35 (GMT) |
| commit | d52dd6d1f39463186ea3f591128b7335f73e9615 (patch) | |
| tree | 0e4a7f6e82b13f2ac33f5b45e47a513e95c77c9c /generic/tkWindow.c | |
| parent | 1c045c9af99ef4e4a27f4391091dfde1b39d07b5 (diff) | |
| parent | 280afa1e07cb7f084bfd041f2035deb5c5761420 (diff) | |
| download | tk-d52dd6d1f39463186ea3f591128b7335f73e9615.zip tk-d52dd6d1f39463186ea3f591128b7335f73e9615.tar.gz tk-d52dd6d1f39463186ea3f591128b7335f73e9615.tar.bz2 | |
Use Tcl_NewBooleanObj() where appropriate
Diffstat (limited to 'generic/tkWindow.c')
| -rw-r--r-- | generic/tkWindow.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkWindow.c b/generic/tkWindow.c index a93fed4..a23e457 100644 --- a/generic/tkWindow.c +++ b/generic/tkWindow.c @@ -888,7 +888,7 @@ TkCreateMainWindow( #if TCL_MAJOR_VERSION > 8 mainPtr->tclUpdateObjProc2 = NULL; #endif - if (Tcl_LinkVar(interp, "tk_strictMotif", (char *) &mainPtr->strictMotif, + if (Tcl_LinkVar(interp, "tk_strictMotif", (char *)&mainPtr->strictMotif, TCL_LINK_BOOLEAN) != TCL_OK) { Tcl_ResetResult(interp); } @@ -896,7 +896,7 @@ TkCreateMainWindow( Tcl_ResetResult(interp); } if (Tcl_LinkVar(interp, "::tk::AlwaysShowSelection", - (char *) &mainPtr->alwaysShowSelection, + (char *)&mainPtr->alwaysShowSelection, TCL_LINK_BOOLEAN) != TCL_OK) { Tcl_ResetResult(interp); } @@ -3293,7 +3293,7 @@ Initialize( Tcl_SetVar2Ex(interp, "argv", NULL, Tcl_NewListObj(objc-1, rest+1), TCL_GLOBAL_ONLY); Tcl_SetVar2Ex(interp, "argc", NULL, - Tcl_NewWideIntObj((Tcl_WideInt)objc-1), TCL_GLOBAL_ONLY); + Tcl_NewWideIntObj(objc-1), TCL_GLOBAL_ONLY); ckfree(rest); } Tcl_DecrRefCount(parseList); |