view test/bug-52851/script2.m @ 31602:16fb0e3e6aab

maint: Merge stable to default.
author John W. Eaton <jwe@octave.org>
date Thu, 01 Dec 2022 15:04:44 -0500
parents d45d1b4bb919
children
line wrap: on
line source

1; %script identifier

function r = caller (fun)
  r = fun ();
endfunction

function r = computation ()
  r = 1;
endfunction

r1 = caller (@computation);

function r = computation ()
  r = 2;
endfunction

r2 = caller (@computation);