Mercurial > octave
view scripts/deprecated/toascii.m @ 25172:7b1b504c2f12 stable
update future version numbers in doc strings and comments
* NEWS, octave-dock-widget.cc, graphics.in.h, gripes.cc, gripes.h,
oct-obj.h, oct.h, quadcc.cc, utils.cc, options-usage.h,
lo-array-gripes.cc, lo-array-gripes.h, bitmax.m, chop.m, desktop.m,
java2mat.m, mahalanobis.m, md5sum.m, octave_config_info.m,
onenormest.m, sleep.m, tmpnam.m, toascii.m, usleep.m, wavread.m,
wavwrite.m, annotation.m, __gnuplot_draw_axes__.m, deprecate-props.tst:
Refer to future versions as versions 5 and 6, not 4.5+, 4.6, 4.7+, or 4.8.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Mon, 09 Apr 2018 07:54:15 -0400 |
parents | 40a65b30fadf |
children | ff3d24a818a1 |
line wrap: on
line source
## Copyright (C) 2018 Rik Wehbring ## ## This file is part of Octave. ## ## Octave is free software: you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation, either version 3 of the License, or ## (at your option) any later version. ## ## Octave is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ## GNU General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with Octave; see the file COPYING. If not, see ## <https://www.gnu.org/licenses/>. ## -*- texinfo -*- ## @deftypefn {} {} toascii (@var{str}) ## ## @code{toascii} is deprecated and will be removed in Octave version 6. ## Use @code{double} instead. ## ## Return ASCII representation of @var{str} in a matrix. ## ## For example: ## ## @example ## @group ## toascii ("ASCII" ## @result{} [ 65, 83, 67, 73, 73 ] ## @end group ## ## @end example ## @seealso{double, char} ## @end deftypefn ## FIXME: DEPRECATED: Remove in version 6. function retval = toascii (str) persistent warned = false; if (! warned) warned = true; warning ("Octave:deprecated-function", "toascii is obsolete and will be removed from a future version of Octave, please use double instead"); endif if (nargin != 1) print_usage (); endif if (iscell (str)) retval = cellfun (@(x) bitand (double (x), 0x7F), str, "uniformoutput", 0); else retval = bitand (double (str), 0x7F); # Restrict to 7-bit ASCII endif endfunction %!assert (toascii (char (0:127)), 0:127) %!assert (toascii (" ":"@"), 32:64) %!assert (toascii ("A":"Z"), 65:90) %!assert (toascii ("[":"`"), 91:96) %!assert (toascii ("a":"z"), 97:122) %!assert (toascii ("{":"~"), 123:126) %!error toascii () %!error toascii (1, 2)