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

View File

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