Mercurial > hg > octave-nkf

view test/classes/@Sneetch/Sneetch.m @ 15536:2e8eb9ac43a5 stable rc-3-6-4-0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
3.6.4-rc0 release candidate * configure.ac (AC_INIT): Version is now 3.6.2-rc0. (OCTAVE_RELEASE_DATE): Now 2012-05-11.
author John W. Eaton <jwe@octave.org>
date Wed, 17 Oct 2012 10:05:44 -0400
parents 968e89b45bbf
children b1283d4c06c2
line wrap: on
line source

function [ s ] = Sneetch( mcbean )
% Test class: should produce error.

  if (nargin==1) && isa(mcbean, 'Sneetch')
    s = mcbean;
  else
    if nargin==0
      s.mcbean = 1;
    else
      s.mcbean = mcbean;
    end
    s = class(s, 'Sneetch');
    s.sylvester = 1;
  end
        
end