Mercurial > hg > octave-nkf
view test/test_global.m @ 6081:cd98c1e18d48
[project @ 2006-10-25 03:36:45 by jwe]
author | jwe |
---|---|
date | Wed, 25 Oct 2006 03:36:46 +0000 |
parents | 1ad66ea35fe5 |
children | 93c65f2a5668 |
line wrap: on
line source
%% Automatically generated from DejaGNU files %% test/octave.test/global/global-1.m %!test %! global G = 1; %! assert(G,1) %% test/octave.test/global/global-2.m %!function f () %! global G; %! assert(G,1); %!test %! global G = 1; %! f; %% test/octave.test/global/global-3.m %!function f () %! fail("G"); %!test %! global G = 1; %! f(); %% test/octave.test/global/global-4.m %!function f () %! global H = 1; %!test %! f; %! fail("H"); %% test/octave.test/global/global-5.m %!function f () %! global H = 1; %!test %!function g () %! fail("H"); %!test %! g(); %% test/octave.test/global/global-6.m %!function f () %! global H = 1; %!function g () %! global H; %! assert(H,1); %!test %! f(); %! g(); %% test/octave.test/global/global-7.m %!test %!function f () %! global H = 1; %!test %! fail("H"); %% test/octave.test/global/global-8.m %!function f () %! global H = 1; %!function g () %! global H; %! assert(H,1) %!test %! f; %! clear H %! g;