Mercurial > hg > octave-nkf
view test/@Snork/subsref.m @ 10796:eaf7c8ab3b0c
Replace 8 spaces with tabs in ChangeLogs
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Sun, 18 Jul 2010 22:22:45 -0700 |
parents | f9ab19428cd8 |
children |
line wrap: on
line source
function b = subsref (snk, s) if (isempty (s)) error ('Snork: missing index'); end switch (s(1).type) case '()' ind = s(1).subs; if (numel (ind) ~= 1) error ('Snork: need exactly one index'); else b = snk.cack(ind{1}); end case '{}' ind = s(1).subs; if (numel (ind) ~= 1) error ('Snork: need exactly one index'); else b = snk.cack(ind{1}); end case '.' fld = s.subs; if (strcmp (fld, 'gick')) b = snk.gick; else error ('Snork/subsref: invalid property \"%s\"', fld); end otherwise error ('invalid subscript type'); end end