missing export.inc

git-svn-id: svn://kolibrios.org@745 a494cfbc-eb01-0410-851d-a64ba20cac60

kernel/trunk/core/dll.inc

@@ -247,6 +247,7 @@ endp
 
 align 4
 proc pci_write32 stdcall, bus:dword, devfn:dword, reg:dword, val:dword
+           push ebx
 	   xor eax, eax
 	   xor ebx, ebx
 	   mov ah, byte [bus]
@@ -255,6 +256,7 @@ proc pci_write32 stdcall, bus:dword, devfn:dword, reg:dword, val:dword
 	   mov bl, byte [reg]
 	   mov ecx, [val]
 	   call pci_write_reg
+           pop ebx
 	   ret
 endp
 

kernel/trunk/core/export.inc

@@ -0,0 +1,31 @@
+
+; Macroinstruction for making export section
+
+
+macro export dllname,[label,string]
+ { common
+    local module,addresses,names,ordinal,count
+    count = 0
+   forward
+    count = count+1
+   common
+    dd 0,0,0, (module-OS_BASE) , 1
+    dd count,count,(addresses-OS_BASE),(names-OS_BASE),(ordinal-OS_BASE)
+    addresses:
+   forward
+    dd (label-OS_BASE)
+   common
+    names:
+   forward
+    local name
+    dd (name-OS_BASE)
+   common
+    ordinal: count = 0
+   forward
+    dw count
+    count = count+1
+   common
+    module db dllname,0
+   forward
+    name db string,0
+ }

kernel/trunk/core/peload.inc

@@ -278,6 +278,7 @@ __exports:
           map_io_mem,         'MapIoMem',           \      ; stdcall
           pci_api,            'PciApi',             \
           pci_read32,         'PciRead32',          \      ; stdcall
+          pci_write32,        'PciWrite32',         \      ; stdcall
           reg_service,        'RegService',         \
           user_alloc,         'UserAlloc',          \      ; stdcall
           user_free,          'UserFree',           \      ; stdcall