Mercurial > jwe > octave
view test/bug-61105/nested_test_1.m @ 31170:06c76eca5f95 default tip @
maint: merge stable to default
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Fri, 29 Jul 2022 12:02:42 -0400 |
parents | 55eeb7f0850b |
children |
line wrap: on
line source
function r = nested_test_1 (val) a = 3; b = 5; c = 7; function r = f1 (f, x) r = f(x) + a; endfunction function r = f2 (y) function r2 = f3 (z) r2 = z^2 + b*y; endfunction r = f1 (@f3, y) + c; endfunction r = f2 (val); endfunction