view test/@Snork/Snork.m @ 12134:6c54ad0fde04 release-3-4-x ss-3-3-90

update copyright and version info for release branch
author John W. Eaton <jwe@octave.org>
date Sat, 22 Jan 2011 13:50:32 -0500
parents f9ab19428cd8
children
line wrap: on
line source

function [ s ] = Snork( gick )
% Test class.

  if ( (nargin==1) && (isa(gick, 'Snork')) )
    s = gick;
  else
    s.cack = [0 1 2 3];
    if nargin==0
      s.gick = 1;
    else
      s.gick = gick;
    end
    s = class(s, 'Snork');

  end
        
end