view test/classes/@Cork/Cork.m @ 16659:608e307b4914 ss-3-7-5

snapshot 3.7.5 * configure.ac (OCTAVE_VERSION): Bump to 3.7.5.
author John W. Eaton <jwe@octave.org>
date Tue, 14 May 2013 05:23:45 -0400
parents b1283d4c06c2
children
line wrap: on
line source

function s = Cork (click)
% Test class.

  if (nargin == 1 && isa (click, 'Cork'))
    s = click;
    return;
  end

  if (nargin < 1)
    s.click = 1;
  else
    s.click = click;
  end
  s = class (s, 'Cork');

end