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