Mercurial > hg > octave-lyh

comparison test/classes/@Snork/subsasgn.m @ 17315:4448cc742880

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use '!' not operator rather than '~' in core m-files. * scripts/general/interp1.m, scripts/image/rgb2ind.m, scripts/plot/findobj.m, scripts/polynomial/polyfit.m, test/build-sparse-tests.sh, test/classes/@Snork/end.m, test/classes/@Snork/mpower.m, test/classes/@Snork/ne.m, test/classes/@Snork/power.m, test/classes/@Snork/subsasgn.m, test/classes/@Snork/subsref.m, test/classes/@Spork/loadobj.m, test/classes/classes.tst: Use '!' not operator rather than '~' in core m-files.
author Rik <rik@octave.org>
date Wed, 21 Aug 2013 17:04:44 -0700
parents b1283d4c06c2
children
comparison
equal deleted inserted replaced
17314:09543e9c8f40 17315:4448cc742880
4 error ('Snork: needs index'); 4 error ('Snork: needs index');
5 end 5 end
6 switch (s(1).type) 6 switch (s(1).type)
7 case '()' 7 case '()'
8 ind = s(1).subs; 8 ind = s(1).subs;
9 if (numel (ind) ~= 1) 9 if (numel (ind) != 1)
10 error ('Snork: need exactly one index'); 10 error ('Snork: need exactly one index');
11 else 11 else
12 if (length (s) == 1) 12 if (length (s) == 1)
13 snk.cack(ind{1}) = val; 13 snk.cack(ind{1}) = val;
14 else 14 else
15 error ('Snork: chained subscripts not allowed for {}'); 15 error ('Snork: chained subscripts not allowed for {}');
16 end 16 end
17 end 17 end
18 case '{}' 18 case '{}'
19 ind = s(1).subs; 19 ind = s(1).subs;
20 if (numel (ind) ~= 1) 20 if (numel (ind) != 1)
21 error ('Snork: need exactly one index'); 21 error ('Snork: need exactly one index');
22 else 22 else
23 if (length (s) == 1) 23 if (length (s) == 1)
24 snk.cack(ind{1}) = val; 24 snk.cack(ind{1}) = val;
25 else 25 else