diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2016-08-22 07:58:55 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2016-08-22 07:58:55 (GMT) |
| commit | 79732cb7bfe403d288455d98bc70bf3c73e09e8f (patch) | |
| tree | d1866641079310e1024ec61c66b3c87b3f3cc3fb /generic/tclStringObj.c | |
| parent | 13720242445a793fbbdcaa9ec418436847909d73 (diff) | |
| download | tcl-79732cb7bfe403d288455d98bc70bf3c73e09e8f.zip tcl-79732cb7bfe403d288455d98bc70bf3c73e09e8f.tar.gz tcl-79732cb7bfe403d288455d98bc70bf3c73e09e8f.tar.bz2 | |
Fix improper use of TclCheckEmptySTring.
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 6b850e3..31bed27 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -478,7 +478,7 @@ TclCheckEmptyString ( Tcl_DictObjSize(NULL, objPtr, &length); return length == 0; } - + if (objPtr->bytes == NULL) { return TCL_EMPTYSTRING_UNKNOWN; } |