Mercurial > octave
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