Mercurial > octave-nkf

comparison scripts/deprecated/spdiag.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 923c7cb7f13f
children be55736a0783
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
26 function retval = spdiag (varargin) 26 function retval = spdiag (varargin)
27 persistent warned = false; 27 persistent warned = false;
28 if (! warned) 28 if (! warned)
29 warned = true; 29 warned = true;
30 warning ("Octave:deprecated-function", 30 warning ("Octave:deprecated-function",
31 "spdiag is obsolete and will be removed from a future version of Octave; please use sparse (diag (...)) instead"); 31 "spdiag is obsolete and will be removed from a future version of Octave; please use sparse (diag (...)) instead");
32 endif 32 endif
33 33
34 retval = sparse (diag (varargin{:})); 34 retval = sparse (diag (varargin{:}));
35 35
36 endfunction 36 endfunction