Mercurial > hg > octave-nkf

view test/classes/@Pork/Pork.m @ 20830:b65888ec820e draft default tip gccjit

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
dmalcom gcc jit import
author Stefan Mahr <dac922@gmx.de>
date Fri, 27 Feb 2015 16:59:36 +0100
parents 6fe6ac8bbfdb
children
line wrap: on
line source

function s = Pork (geek, gurk)

  if (nargin == 1 && isa (geek, 'Pork'))
    s = geek;
  else
    s.gurk = 0;
    if (nargin == 0)
      s0 = Spork ();
    elseif (nargin == 1)
      s0 = Spork (geek);
    else
      s0 = Spork (geek);
      s.gurk = gurk;
    end
    s = class (s, 'Pork', s0);
   end
   superiorto ('Dork');

end