diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-15 23:26:44 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-15 23:26:44 (GMT) |
| commit | 2cced2c8a8ed9d460fb9a15426354a32709ddd1f (patch) | |
| tree | e9cb2d4138705d83b307c9e077443366dcdceb56 /macosx/tkMacOSXHLEvents.c | |
| parent | 14219460ca7cd029d3b9b54ad4d4c15c68668ce8 (diff) | |
| download | tk-2cced2c8a8ed9d460fb9a15426354a32709ddd1f.zip tk-2cced2c8a8ed9d460fb9a15426354a32709ddd1f.tar.gz tk-2cced2c8a8ed9d460fb9a15426354a32709ddd1f.tar.bz2 | |
Handle larger string-lengths in MacOS, when compiling with Tcl 9 headers
Diffstat (limited to 'macosx/tkMacOSXHLEvents.c')
| -rw-r--r-- | macosx/tkMacOSXHLEvents.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/macosx/tkMacOSXHLEvents.c b/macosx/tkMacOSXHLEvents.c index ee99fce..8e1fff5 100644 --- a/macosx/tkMacOSXHLEvents.c +++ b/macosx/tkMacOSXHLEvents.c @@ -456,7 +456,7 @@ static void ProcessAppleEvent( Tcl_DStringLength(&AEInfo->command), TCL_EVAL_GLOBAL); if (AEInfo->replyEvent && code >= 0) { - int reslen; + Tcl_Size reslen; const char *result = Tcl_GetStringFromObj(Tcl_GetObjResult(AEInfo->interp), &reslen); if (code == TCL_OK) { |