summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--doc/StringObj.34
-rw-r--r--generic/tclStringObj.c4
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.