X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=octave_packages%2Fm%2Fdeprecated%2Fisstr.m;fp=octave_packages%2Fm%2Fdeprecated%2Fisstr.m;h=c6c33de832c3974f66e121203e8be62424a5a264;hb=1c0469ada9531828709108a4882a751d2816994a;hp=0000000000000000000000000000000000000000;hpb=63de9f36673d49121015e3695f2c336ea92bc278;p=CreaPhase.git diff --git a/octave_packages/m/deprecated/isstr.m b/octave_packages/m/deprecated/isstr.m new file mode 100644 index 0000000..c6c33de --- /dev/null +++ b/octave_packages/m/deprecated/isstr.m @@ -0,0 +1,40 @@ +## Copyright (C) 2003-2012 John W. Eaton +## +## 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 +## . + +## -*- texinfo -*- +## @deftypefn {Function File} {} isstr (@var{a}) +## This function has been deprecated. Use ischar instead. +## @end deftypefn + +## Author: jwe + +## Deprecated in version 3.0 +## Matlab still has this function, so don't remove just yet. + +function retval = isstr (varargin) + + persistent warned = false; + if (! warned) + warned = true; + warning ("Octave:deprecated-function", + "isstr is obsolete and will be removed from a future version of Octave, please use ischar instead"); + endif + + retval = ischar (varargin{:}); + +endfunction