summaryrefslogtreecommitdiffstats
path: root/generic/tkMenubutton.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-22 09:57:59 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-22 09:57:59 (GMT)
commitbe82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0 (patch)
tree824368563cac9fa5b4b909b9c56ddaa5950ea6dd /generic/tkMenubutton.c
parentbd318c224a11f1d626073b46597c0d921b658576 (diff)
downloadtk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.zip
tk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.tar.gz
tk-be82a786ad38b52bfc69d58e8d6c7fd76ccdb2d0.tar.bz2
Handle crash in handling "update". More WIP
Diffstat (limited to 'generic/tkMenubutton.c')
-rw-r--r--generic/tkMenubutton.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkMenubutton.c b/generic/tkMenubutton.c
index 1843780..c3e91ab 100644
--- a/generic/tkMenubutton.c
+++ b/generic/tkMenubutton.c
@@ -165,7 +165,7 @@ static char * MenuButtonTextVarProc(ClientData clientData,
Tcl_Interp *interp, const char *name1,
const char *name2, int flags);
static int MenuButtonWidgetObjCmd(ClientData clientData,
- Tcl_Interp *interp, int objc,
+ Tcl_Interp *interp, TkSizeT objc,
Tcl_Obj *const objv[]);
static int ConfigureMenuButton(Tcl_Interp *interp,
TkMenuButton *mbPtr, int objc,
@@ -236,7 +236,7 @@ Tk_MenubuttonObjCmd(
mbPtr->tkwin = tkwin;
mbPtr->display = Tk_Display(tkwin);
mbPtr->interp = interp;
- mbPtr->widgetCmd = Tcl_CreateObjCommand(interp,
+ mbPtr->widgetCmd = Tcl_CreateObjCommand2(interp,
Tk_PathName(mbPtr->tkwin), MenuButtonWidgetObjCmd, mbPtr,
MenuButtonCmdDeletedProc);
mbPtr->optionTable = optionTable;
@@ -325,7 +325,7 @@ static int
MenuButtonWidgetObjCmd(
ClientData clientData, /* Information about button widget. */
Tcl_Interp *interp, /* Current interpreter. */
- int objc, /* Number of arguments. */
+ TkSizeT objc, /* Number of arguments. */
Tcl_Obj *const objv[]) /* Argument objects. */
{
TkMenuButton *mbPtr = (TkMenuButton *)clientData;