Mercurial > octave

view test/fcn-handle/shared_ctx.m @ 31615:40b151abbb9b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
don't attempt to restore settings from old qt-settings config file We changed the default settings file name in 2019. It's time to let the old name go. * resource-manager.cc (resource_manager::resource_manager): Don't attempt to copy settings from old qt-settings file used by Octave prior to March 2019.
author John W. Eaton <jwe@octave.org>
date Fri, 02 Dec 2022 10:07:32 -0500
parents 8dd50efa3c47
children
line wrap: on
line source

function [add, sub, mul, div] = shared_ctx (val)
  add = @add_fun;
  sub = @sub_fun;
  mul = @mul_fun;
  div = @div_fun;
  function r = add_fun (x)
    val += x;
    r = val;
  endfunction
  function r = sub_fun (x)
    val -= x;
    r = val;
  endfunction
  function r = mul_fun (x)
    val *= x;
    r = val;
  endfunction
  function r = div_fun (x)
    val /= x;
    r = val;
  endfunction
endfunction