summaryrefslogtreecommitdiffstats
path: root/generic/tclUtf.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2020-04-03 14:28:23 (GMT)
committerdgp <dgp@users.sourceforge.net>2020-04-03 14:28:23 (GMT)
commit4e2a2de6e8e2545dfc6da0d6bdc7856950ea5975 (patch)
tree7e35cd7af1591cf0367bc27a15d17a2b59b4cd19 /generic/tclUtf.c
parent3e7df06557bc26dbbf2b7e7319eed92b3648f9d7 (diff)
downloadtcl-4e2a2de6e8e2545dfc6da0d6bdc7856950ea5975.zip
tcl-4e2a2de6e8e2545dfc6da0d6bdc7856950ea5975.tar.gz
tcl-4e2a2de6e8e2545dfc6da0d6bdc7856950ea5975.tar.bz2
Fix broken build.
Diffstat (limited to 'generic/tclUtf.c')
-rw-r--r--generic/tclUtf.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c
index 47855dd..a8b04bf 100644
--- a/generic/tclUtf.c
+++ b/generic/tclUtf.c
@@ -2451,7 +2451,7 @@ TclUtfToUCS4(
* by the UTF-8 string. */
{
/* Make use of the #undef Tcl_UtfToUniChar above, which already handles UCS4. */
- return Tcl_UtfToUniChar(src, &ch);
+ return Tcl_UtfToUniChar(src, ucs4Ptr);
}
#endif