Mercurial > jwe > octave
view test/bug-53579.tst @ 31145:7c5cb8f8a21e
pagetranspose.m, pagectranspose.m: New functions for transposing the page (3-D) of an N-D array.
* pagectranspose.m, pagetranspose.m: New functions.
* scripts/general/module.mk: Add new functions to build system.
* etc/NEWS.8.md: Announce new functions.
* expr.txi: Add functions to Octave manual.
author | Rik <rik@octave.org> |
---|---|
date | Mon, 11 Jul 2022 22:38:57 -0700 |
parents | 34617dd78f02 |
children |
line wrap: on
line source
%!function [raa, rbb, igaa, igbb] = sub1 (aa, bb) %! global aa bb %! aa = 1; %! raa = aa; %! rbb = bb; %! igaa = isglobal ("aa"); %! igbb = isglobal ("bb"); %!endfunction %!test <*53579> %! global aa bb %! assert (isglobal ("aa")); %! assert (isglobal ("bb")); %! aa = 3; %! xx = 5; %! [raa, rbb, igaa, igbb] = sub1 (aa, xx); %! assert (raa, 1); %! assert (rbb, []); %! assert (igaa); %! assert (igbb); %! assert (xx, 5); %! clear -global aa bb; # cleanup after test