diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2024-03-27 16:14:38 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2024-03-27 16:14:38 (GMT) |
| commit | c60347e32076ccad4ce1fddfbe5612be5d0b2020 (patch) | |
| tree | a7ff2199d94dc474e599707ee0cc510a5b945798 /generic/tclStringObj.c | |
| parent | 6e4ef7af0d7d94a74983de89b85a772777c282f8 (diff) | |
| download | tcl-c60347e32076ccad4ce1fddfbe5612be5d0b2020.zip tcl-c60347e32076ccad4ce1fddfbe5612be5d0b2020.tar.gz tcl-c60347e32076ccad4ce1fddfbe5612be5d0b2020.tar.bz2 | |
Proposed fix for [edb4b065f4]
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 5fe6ef7..ee2eaae 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -3717,7 +3717,7 @@ TclStringCmp( if (empty > 0) { switch (TclCheckEmptyString(value2Ptr)) { case -1: - s1 = 0; + s1 = ""; s1len = 0; s2 = TclGetStringFromObj(value2Ptr, &s2len); break; @@ -3732,7 +3732,7 @@ TclStringCmp( } else if (TclCheckEmptyString(value2Ptr) > 0) { switch (empty) { case -1: - s2 = 0; + s2 = ""; s2len = 0; s1 = TclGetStringFromObj(value1Ptr, &s1len); break; |