Mercurial > octave-nkf
view test/test_global.m @ 6566:e9612a33cd1a
Added tag before-object-branch for changeset 3e2cfed6c87e
author | jwe@segfault.lan |
---|---|
date | Fri, 01 Feb 2008 23:01:35 -0500 |
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;