From 9babdebe9d5537c0026d149ca8810b9ffad51d0d Mon Sep 17 00:00:00 2001 From: dgp Date: Wed, 21 Sep 2022 18:38:51 +0000 Subject: Update docs and comments to agree with TIP 623. --- doc/StringObj.3 | 4 +++- generic/tclStringObj.c | 4 +++- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/doc/StringObj.3 b/doc/StringObj.3 index 7870b21..90678c4 100644 --- a/doc/StringObj.3 +++ b/doc/StringObj.3 @@ -211,7 +211,9 @@ appropriate range. characters between \fIfirst\fR and \fIlast\fR (inclusive) in the value's Unicode representation. If the value's Unicode representation is invalid, the Unicode representation is regenerated -from the value's string representation. +from the value's string representation. If \fIfirst\fR < 0, then +the returned string starts at the beginning of the value. If \fIlast\fR < 0, +then the returned string ends at the end of the value. .PP \fBTcl_GetCharLength\fR returns the number of characters (as opposed to bytes) in the string value. diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index b81e711..b109808 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -739,7 +739,9 @@ Tcl_GetUnicodeFromObj( * * Create a Tcl Object that contains the chars between first and last of * the object indicated by "objPtr". If the object is not already a - * String object, convert it to one. + * String object, convert it to one. If first is negative, the returned + * string start at the beginning of objPtr. If last is negative, the + * returned string ends at the end of objPtr. * * Results: * Returns a new Tcl Object of the String type. -- cgit v0.12