luke
/
magic
mirror of https://github.com/RTimothyEdwards/magic.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

TCL9: Tcl_Size type introduction

This commit is contained in:
Darryl L. Miles 2024-10-21 09:07:16 +01:00 committed by Tim Edwards
parent 33b9c63c41
commit e81ead5ad2
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tcltk/tclmagic.c
View File

@ -913,7 +913,12 @@ TxGetLinePfix(dest, maxChars, prefix)
char *prefix; char *prefix;
{ {
Tcl_Obj *objPtr; Tcl_Obj *objPtr;
int charsStored, length; int charsStored;
#if TCL_MAJOR_VERSION < 9
int length;
#else
Tcl_Size length;
#endif
char *string; char *string;
if (TxTkConsole) if (TxTkConsole)