Mercurial > octave-nkf

view test/nest/script_nest.m @ 16033:23a7661e529a ss-3-7-2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
snapshot version 3.7.2 * configure.ac (AC_INIT): Set version to 3.7.2. (OCTAVE_RELEASE_DATE): Set to 2013-02-09. (OCTAVE_COPYRIGHT): Update year.
author John W. Eaton <jwe@octave.org>
date Sun, 10 Feb 2013 00:59:19 -0500
parents be18c9e359bf
children
line wrap: on
line source

# script_nest.m
function x = script_nest
  A (5)
  function A (n)
    if n <= 0
      script_nest_script;
    else
      A (n - 1);
    endif
  endfunction
endfunction