Rev 2 | Rev 431 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1 | ha | 1 | ;------------------------------------------------------------------ |
2 | ; use "iglobal" for inserting initialized global data definitions. |
||
3 | ;------------------------------------------------------------------ |
||
4 | macro iglobal { |
||
5 | IGlobals equ IGlobals, |
||
6 | macro __IGlobalBlock { } |
||
7 | |||
162 | diamond | 8 | macro iglobal_nested { |
9 | IGlobals equ IGlobals, |
||
10 | macro __IGlobalBlock \{ } |
||
11 | |||
1 | ha | 12 | ;------------------------------------------------------------- |
13 | ; use 'uglobal' for inserting uninitialized global definitions. |
||
14 | ; even when you define some data values, these variables |
||
15 | ; will be stored as uninitialized data. |
||
16 | ;------------------------------------------------------------- |
||
17 | macro uglobal { |
||
18 | UGlobals equ UGlobals, |
||
19 | macro __UGlobalBlock { } |
||
20 | |||
162 | diamond | 21 | macro uglobal_nested { |
22 | UGlobals equ UGlobals, |
||
23 | macro __UGlobalBlock \{ } |
||
24 | |||
1 | ha | 25 | endg fix } ; Use endg for ending iglobal and uglobal blocks. |
162 | diamond | 26 | endg_nested fix \} |
1 | ha | 27 | |
28 | macro IncludeIGlobals{ |
||
29 | macro IGlobals dummy,[n] \{ __IGlobalBlock |
||
30 | purge __IGlobalBlock \} |
||
31 | match I, IGlobals \{ I \} } |
||
32 | |||
33 | |||
34 | macro IncludeUGlobals{ |
||
35 | macro UGlobals dummy,[n] \{ |
||
36 | \common |
||
37 | \local begin, size |
||
38 | begin = $ |
||
39 | virtual at $ |
||
40 | \forward |
||
41 | __UGlobalBlock |
||
42 | purge __UGlobalBlock |
||
43 | \common |
||
44 | size = $ - begin |
||
45 | end virtual |
||
46 | rb size |
||
47 | \} |
||
48 | match U, UGlobals \{ U \} } |
||
49 | |||
50 | macro IncludeAllGlobals { |
||
51 | IncludeIGlobals |
||
52 | IncludeUGlobals |
||
53 | } |
||
54 | |||
55 | iglobal |
||
56 | endg |
||
57 | |||
58 | uglobal |
||
59 | endg |