Mercurial > hg > octave-terminal
changeset 13964:12fa52c6e886
Use char() instead of deprecated setstr() in %!test code.
* mappers.cc: Use char() instead of deprecated setstr() in %!test code.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Wed, 30 Nov 2011 10:34:23 -0800 |
parents | 663594b481e5 |
children | 16b3736e534b |
files | src/mappers.cc |
diffstat | 1 files changed, 14 insertions(+), 14 deletions(-) [+] |
line wrap: on
line diff
--- a/src/mappers.cc +++ b/src/mappers.cc @@ -952,7 +952,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("A"):toascii("Z"))+1) = 1; %! result ((toascii("0"):toascii("9"))+1) = 1; @@ -983,7 +983,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("A"):toascii("Z"))+1) = 1; %! result ((toascii("a"):toascii("z"))+1) = 1; @@ -1012,7 +1012,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = ones (1, 128); %! assert(all (isascii (charset) == result)); @@ -1040,7 +1040,7 @@ /* %% test/octave.test/string/iscntrl-1.m %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result (1:32) = 1; %! result (128) = 1; @@ -1069,7 +1069,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("0"):toascii("9"))+1) = 1; %! assert(all (isdigit (charset) == result)); @@ -1137,7 +1137,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result (34:127) = 1; %! assert(all (isgraph (charset) == result)); @@ -1165,7 +1165,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("a"):toascii("z"))+1) = 1; %! assert(all (islower (charset) == result)); @@ -1272,7 +1272,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result (33:127) = 1; %! if (ispc () && ! isunix ()) @@ -1303,7 +1303,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result (34:48) = 1; %! result (59:65) = 1; @@ -1335,7 +1335,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result (toascii (" \f\n\r\t\v")+1) = 1; %! assert(all (isspace (charset) == result)); @@ -1363,7 +1363,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("A"):toascii("Z"))+1) = 1; %! assert(all (isupper (charset) == result)); @@ -1391,7 +1391,7 @@ /* %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = zeros (1, 128); %! result ((toascii("A"):toascii("F"))+1) = 1; %! result ((toascii("0"):toascii("9"))+1) = 1; @@ -1917,7 +1917,7 @@ %! assert(tolower(a)(3,3,3,3), "d"); %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = charset; %! result ((toascii("A"):toascii("Z"))+1) \ %! = result ((toascii("a"):toascii("z"))+1); @@ -1967,7 +1967,7 @@ %! a(3,3,3,3) = "d"; %! assert(toupper(a)(3,3,3,3), "D"); %!test -%! charset = setstr (0:127); +%! charset = char (0:127); %! result = charset; %! result ((toascii("a"):toascii("z"))+1) \ %! = result ((toascii("A"):toascii("Z"))+1);