5590
|
1 %% Automatically generated from DejaGNU files |
|
2 |
|
3 %% test/octave.test/global/global-1.m |
|
4 %!test |
|
5 %! global G = 1; |
|
6 %! assert(G,1) |
|
7 |
|
8 %% test/octave.test/global/global-2.m |
|
9 %!function f () |
|
10 %! global G; |
|
11 %! assert(G,1); |
|
12 %!test |
|
13 %! global G = 1; |
|
14 %! f; |
|
15 |
|
16 %% test/octave.test/global/global-3.m |
|
17 %!function f () |
|
18 %! fail("G"); |
|
19 %!test |
|
20 %! global G = 1; |
|
21 %! f(); |
|
22 |
|
23 %% test/octave.test/global/global-4.m |
|
24 %!function f () |
|
25 %! global H = 1; |
|
26 %!test |
|
27 %! f; |
|
28 %! fail("H"); |
|
29 |
|
30 %% test/octave.test/global/global-5.m |
|
31 %!function f () |
|
32 %! global H = 1; |
|
33 %!test |
|
34 %!function g () |
|
35 %! fail("H"); |
|
36 %!test |
|
37 %! g(); |
|
38 |
|
39 %% test/octave.test/global/global-6.m |
|
40 %!function f () |
|
41 %! global H = 1; |
|
42 %!function g () |
|
43 %! global H; |
|
44 %! assert(H,1); |
|
45 %!test |
|
46 %! f(); |
|
47 %! g(); |
|
48 |
|
49 %% test/octave.test/global/global-7.m |
|
50 %!test |
|
51 %!function f () |
|
52 %! global H = 1; |
|
53 %!test |
|
54 %! fail("H"); |
|
55 |
|
56 %% test/octave.test/global/global-8.m |
|
57 %!function f () |
|
58 %! global H = 1; |
|
59 %!function g () |
|
60 %! global H; |
|
61 %! assert(H,1) |
|
62 %!test |
|
63 %! f; |
|
64 %! clear H |
|
65 %! g; |
|
66 |