diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-03-28 18:52:16 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-03-28 18:52:16 (GMT) |
| commit | 65c57e8170c646d921d1400c3dcbc04cbd8a3372 (patch) | |
| tree | 0eb2cc82bc886df65831e82854e02e1710409b2c /generic | |
| parent | beae292420f249c522dbbf9526de96f5f31bd71b (diff) | |
| download | tcl-65c57e8170c646d921d1400c3dcbc04cbd8a3372.zip tcl-65c57e8170c646d921d1400c3dcbc04cbd8a3372.tar.gz tcl-65c57e8170c646d921d1400c3dcbc04cbd8a3372.tar.bz2 | |
Make sure maxlen value does not rely on ordering of options.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclBinary.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index ecd3c6b..93aeee3 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -2517,12 +2517,12 @@ BinaryEncode64( break; case OPT_WRAPCHAR: wrapchar = Tcl_GetStringFromObj(objv[i + 1], &wrapcharlen); - if (wrapcharlen == 0) { - maxlen = 0; - } break; } } + if (wrapcharlen == 0) { + maxlen = 0; + } resultObj = Tcl_NewObj(); data = Tcl_GetByteArrayFromObj(objv[objc - 1], &count); |