diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-08-18 22:06:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-08-18 22:06:54 (GMT) |
| commit | 2b886b868c8231e01906b7435b9b71f301f91e90 (patch) | |
| tree | 56fbdeda6cb9713267ccfc74c96ee601243f1d68 /generic/tclCmdMZ.c | |
| parent | a61edf450cec98aaa1d893e59c465f4eb181301c (diff) | |
| parent | b916fb2e6064a68a3848169f1d6263396112d330 (diff) | |
| download | tcl-2b886b868c8231e01906b7435b9b71f301f91e90.zip tcl-2b886b868c8231e01906b7435b9b71f301f91e90.tar.gz tcl-2b886b868c8231e01906b7435b9b71f301f91e90.tar.bz2 | |
merge core-8-6-branch
Diffstat (limited to 'generic/tclCmdMZ.c')
| -rw-r--r-- | generic/tclCmdMZ.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index 83382a7..2195aa1 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -1173,7 +1173,7 @@ Tcl_SplitObjCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { - Tcl_UniChar ch; + Tcl_UniChar ch = 0; int len; const char *splitChars; const char *stringPtr; @@ -1258,7 +1258,7 @@ Tcl_SplitObjCmd( } else { const char *element, *p, *splitEnd; int splitLen; - Tcl_UniChar splitChar; + Tcl_UniChar splitChar = 0; /* * Normal case: split on any of a given set of characters. Discard @@ -1482,7 +1482,7 @@ StringIsCmd( Tcl_Obj *const objv[]) /* Argument objects. */ { const char *string1, *end, *stop; - Tcl_UniChar ch; + Tcl_UniChar ch = 0; int (*chcomp)(int) = NULL; /* The UniChar comparison function. */ int i, failat = 0, result = 1, strict = 0, index, length1, length2; Tcl_Obj *objPtr, *failVarObj = NULL; @@ -2410,7 +2410,7 @@ StringStartCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { - Tcl_UniChar ch; + Tcl_UniChar ch = 0; const char *p, *string; int cur, index, length, numChars; @@ -2471,7 +2471,7 @@ StringEndCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { - Tcl_UniChar ch; + Tcl_UniChar ch = 0; const char *p, *end, *string; int cur, index, length, numChars; |