Rev 745 | Rev 2455 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 745 | Rev 750 | ||
|---|---|---|---|
| - | 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
| - | 2 | ;; ;; |
|
| - | 3 | ;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;; |
|
| - | 4 | ;; Distributed under terms of the GNU General Public License ;; |
|
| - | 5 | ;; ;; |
|
| - | 6 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
| - | 7 | ||
| - | 8 | $Revision: 750 $ |
|
| 1 | ; Macroinstruction for making export section |
9 | |
| 2 | 10 | ; Macroinstruction for making export section |
|
| 3 | 11 | ||
| 4 | macro export dllname,[label,string] |
12 | |
| 5 | { common |
13 | macro export dllname,[label,string] |
| 6 | local module,addresses,names,ordinal,count |
14 | { common |
| 7 | count = 0 |
15 | local module,addresses,names,ordinal,count |
| 8 | forward |
16 | count = 0 |
| 9 | count = count+1 |
17 | forward |
| 10 | common |
18 | count = count+1 |
| 11 | dd 0,0,0, (module-OS_BASE) , 1 |
19 | common |
| 12 | dd count,count,(addresses-OS_BASE),(names-OS_BASE),(ordinal-OS_BASE) |
20 | dd 0,0,0, (module-OS_BASE) , 1 |
| 13 | addresses: |
21 | dd count,count,(addresses-OS_BASE),(names-OS_BASE),(ordinal-OS_BASE) |
| 14 | forward |
22 | addresses: |
| 15 | dd (label-OS_BASE) |
23 | forward |
| 16 | common |
24 | dd (label-OS_BASE) |
| 17 | names: |
25 | common |
| 18 | forward |
26 | names: |
| 19 | local name |
27 | forward |
| 20 | dd (name-OS_BASE) |
28 | local name |
| 21 | common |
29 | dd (name-OS_BASE) |
| 22 | ordinal: count = 0 |
30 | common |
| 23 | forward |
31 | ordinal: count = 0 |
| 24 | dw count |
32 | forward |
| 25 | count = count+1 |
33 | dw count |
| 26 | common |
34 | count = count+1 |
| 27 | module db dllname,0 |
35 | common |
| 28 | forward |
36 | module db dllname,0 |
| 29 | name db string,0 |
37 | forward |
| 30 | } |
38 | name db string,0 |
| - | 39 | } |
|