Mercurial > octave

view test/bug-60237/bug_60237.m @ 31197:8d4c87e88d0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author Markus Mützel <markus.muetzel@gmx.de>
date Tue, 23 Aug 2022 19:45:19 +0200
parents 34d06c73b48d
children
line wrap: on
line source

function r = bug_60237 ()
  d = 2;
  function c = bm (a)
    c = a + d;
  endfunction;
  r = ancall (@(a) bm (a), 2);
endfunction

function r = ancall (f, a)
  r = f (a) + 1;
endfunction