Mercurial > octave
diff libinterp/corefcn/file-io.cc @ 24303:ddc91a2ee0e0 stable
Remove all delimiters from whitespace list in textscan function (bug #52479).
* oct-stream.cc (textscan::parse_options): After all options have been
processed, remove all characters in 'delims' string and all strings in
'delim_list' cell from the 'whitespace' string in case user adds a
whitespace character as a delimiter.
* file-io.cc (Ftextscan): Add BIST test for bug #52479.
| author | Daniel J Sebald <daniel.sebald@ieee.org> |
|---|---|
| date | Wed, 22 Nov 2017 14:06:44 -0600 |
| parents | 3ac9f9ecfae5 |
| children | ddaee520d342 d400b09043dd |
line wrap: on
line diff
--- a/libinterp/corefcn/file-io.cc Thu Nov 23 13:33:48 2017 -0800 +++ b/libinterp/corefcn/file-io.cc Wed Nov 22 14:06:44 2017 -0600 @@ -2196,6 +2196,17 @@ ## Check for delimiter after exponent %!assert (textscan ("1e-3|42", "%f", "delimiter", "|"), {[1e-3; 42]}) + +%!test <*52479> +%! str = "\t\ta\tb\tc\n"; +%! ret = textscan (str, "%s", "delimiter", "\t"); +%! assert (ret, { {''; ''; 'a'; 'b'; 'c'} }) ; + +%!test <*52479> +%! str = "\t\ta\tb\tc\n"; +%! ret = textscan (str, "%s", "delimiter", {"\t"}); +%! assert (ret, { {''; ''; 'a'; 'b'; 'c'} }) ; + */ // These tests have end-comment sequences, so can't just be in a comment