Subversion Repositories Kolibri OS

Rev

Rev 9715 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2288 clevermous 1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2
;;                                                              ;;
10051 ace_dent 3
;; Copyright (C) KolibriOS team 2004-2024. All rights reserved. ;;
2288 clevermous 4
;; Distributed under terms of the GNU General Public License    ;;
5
;;                                                              ;;
6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
7
 
8
 
9
; Macroinstruction for making export section
10
 
11
 
12
macro export dllname,[label,string]
13
 { common
14
    local module,addresses,names,ordinal,count
15
    count = 0
16
   forward
17
    count = count+1
18
   common
9715 Doczom 19
    dd 0,0,0, (module - OS_BASE) , 1
20
    dd count,count,(addresses - OS_BASE),(names - OS_BASE),(ordinal - OS_BASE)
2288 clevermous 21
    addresses:
22
   forward
9715 Doczom 23
    dd (label - OS_BASE)
2288 clevermous 24
   common
25
    names:
26
   forward
27
    local name
9715 Doczom 28
    dd (name - OS_BASE)
2288 clevermous 29
   common
30
    ordinal:
31
             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
 }