view test/@Snork/subsref.m @ 11504:81ff63e43f54

really make destuctors virtual in ODE/DAE base classes
author John W. Eaton <jwe@octave.org>
date Thu, 13 Jan 2011 03:28:21 -0500
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