diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-12 13:32:53 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-12 13:32:53 (GMT) |
| commit | b8bee30ddbf48e2a1efd9fbc83a08f4eb06d6fb4 (patch) | |
| tree | c02202ce9798f3daa4a89ee19bf4200e40f40b43 /generic/tclStrIdxTree.c | |
| parent | a3da11f5ce0cbdff67aa46f338564b92caf4073c (diff) | |
| parent | 0d3a249b6bc3dad80328edff7b09b31f10ade99a (diff) | |
| download | tcl-b8bee30ddbf48e2a1efd9fbc83a08f4eb06d6fb4.zip tcl-b8bee30ddbf48e2a1efd9fbc83a08f4eb06d6fb4.tar.gz tcl-b8bee30ddbf48e2a1efd9fbc83a08f4eb06d6fb4.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStrIdxTree.c')
| -rw-r--r-- | generic/tclStrIdxTree.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStrIdxTree.c b/generic/tclStrIdxTree.c index ee8f786..b39db90 100644 --- a/generic/tclStrIdxTree.c +++ b/generic/tclStrIdxTree.c @@ -463,7 +463,7 @@ TclStrIdxTreePrint( Tcl_Obj *obj[2]; const char *s; - TclInitObjRef(obj[0], Tcl_NewStringObj("::puts", -1)); + TclInitObjRef(obj[0], Tcl_NewStringObj("::puts", TCL_AUTO_LENGTH)); while (tree != NULL) { s = TclGetString(tree->key) + offs; TclInitObjRef(obj[1], Tcl_ObjPrintf("%*s%.*s\t:%d", |