view test/fcn-handle/bug60845.m @ 31195:776446acdc7b

pkg.m: Show URL of source tarball(s) in verbose mode. * scripts/pkg/pkg.m: If downloading source tarballs with the "-forge" option, show the URL where they are downloaded from if verbose mode is on.
author Markus Mützel <markus.muetzel@gmx.de>
date Fri, 19 Aug 2022 08:54:05 +0200
parents 6d1224698acf
children
line wrap: on
line source

function output = bug60845 (varargin)
  ## ahandle is a boolean variable
  [Ahandle, static, fcn_handle] = checkInput (varargin{:});

  ## execute nested function using handle
  output = fcn_handle ();

  function [Ahandle, static, fcn_handle] = checkInput (varargin)
    ## initialize
    Ahandle = true;
    static = false;
    ## get a handle to nested (sibling) function.
    fcn_handle = @nestfcn;
  endfunction

  function r = nestfcn ()
    if (islogical (Ahandle))
      r = true;
    else
      r = false;
    end
  endfunction
endfunction