diff options
| author | dkf <dkf@noemail.net> | 2012-07-04 07:09:40 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2012-07-04 07:09:40 (GMT) |
| commit | d9614c16c9e26645796f3d1dbe5ccf9ec6c454ed (patch) | |
| tree | f601a0cf95af6e9aeea8f330063f37565515f418 /generic/tclEncoding.c | |
| parent | 29b21b94b4fb0fe9d7c3bd9e053345d646b08505 (diff) | |
| parent | e26170a64246bf5ff088c9deae6f101bee5d134f (diff) | |
| download | tcl-d9614c16c9e26645796f3d1dbe5ccf9ec6c454ed.zip tcl-d9614c16c9e26645796f3d1dbe5ccf9ec6c454ed.tar.gz tcl-d9614c16c9e26645796f3d1dbe5ccf9ec6c454ed.tar.bz2 | |
merge trunk
FossilOrigin-Name: d35459107e0b331a9383ca0a41d050e6798b8396
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 49418c9..0fa6661 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -1872,9 +1872,9 @@ LoadTableEncoding( * Read lines from the encoding until EOF. */ - for (Tcl_DStringSetLength(&lineString, 0); + for (TclDStringClear(&lineString); (len = Tcl_Gets(chan, &lineString)) >= 0; - Tcl_DStringSetLength(&lineString, 0)) { + TclDStringClear(&lineString)) { const unsigned char *p; int to, from; |