diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-07-04 20:56:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-07-04 20:56:37 (GMT) |
| commit | b4d2fffb28be0949084ab74feffbcdbc54027d93 (patch) | |
| tree | 6e3eee69f67563d9c336b1690e9d7d7eda9e1cc8 /generic/tclStringObj.c | |
| parent | 535266afa34591cee7ddad4abcfe1cbbd1330ce8 (diff) | |
| parent | 6982ae0ca7a42a53c0fbdf2fddf9296537b7bfa0 (diff) | |
| download | tcl-b4d2fffb28be0949084ab74feffbcdbc54027d93.zip tcl-b4d2fffb28be0949084ab74feffbcdbc54027d93.tar.gz tcl-b4d2fffb28be0949084ab74feffbcdbc54027d93.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index fb33821..f1c7350 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -590,33 +590,6 @@ Tcl_GetUniChar( /* *---------------------------------------------------------------------- * - * Tcl_GetUnicode -- - * - * Get the Unicode form of the String object. If the object is not - * already a String object, it will be converted to one. If the String - * object does not have a Unicode rep, then one is created from the UTF - * string format. - * - * Results: - * Returns a pointer to the object's internal Unicode string. - * - * Side effects: - * Converts the object to have the String internal rep. - * - *---------------------------------------------------------------------- - */ - -Tcl_UniChar * -Tcl_GetUnicode( - Tcl_Obj *objPtr) /* The object to find the unicode string - * for. */ -{ - return Tcl_GetUnicodeFromObj(objPtr, NULL); -} - -/* - *---------------------------------------------------------------------- - * * Tcl_GetUnicodeFromObj -- * * Get the Unicode form of the String object with length. If the object |