view test/fcn-handle/bug57941b.m @ 31201:a8b0acc018a2

maint: merge stable to default
author Rik <rik@octave.org>
date Wed, 24 Aug 2022 08:55:39 -0700
parents 23fe97205db5
children
line wrap: on
line source

function [fh1, fh2] = bug57941b (A)
  fh1 = @nested1;
  function z = nested1 (x)
    z = A * x;
  end
  fh2 = @nested2;
  function z = nested2 (x,y)
    z = A * x .* y;
  end
end