Subversion Repositories Kolibri OS

Rev

Rev 5559 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5559 Rev 9406
Line 3... Line 3...
3 
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
 3 
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
4 
;; Distributed under terms of the GNU General Public License    ;;
 4 
;; Distributed under terms of the GNU General Public License    ;;
5 
;;                                                              ;;
 5 
;;                                                              ;;
6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 6 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 7... Line 7...
7 
 
 7 
 
Line 8... Line 8...
8 
$Revision: 5559 $
 8 
$Revision: 9406 $
Line 9... Line 9...
9 
 
 9 
 
Line -... Line 10...
- 
 
 10 
include 'export.inc'
- 
 
 11 
 
- 
 
 12 
align 4
10 
include 'export.inc'
 13 
 
11 
 
 14 
; This function load file driver and output
12 
align 4
 15 
;  eax = address function START in driver
13 
 
 16 
;  ebx = address for kernel_free
14 
proc load_PE stdcall, file_name:dword
 17 
proc load_PE stdcall, file_name:dword
Line 56... Line 59...
56 
 
 59 
 
57 
        stdcall kernel_free, [base]
 60 
        stdcall kernel_free, [base]
58 
.cleanup:
 61 
.cleanup:
59 
        stdcall kernel_free, [image]
 62 
        stdcall kernel_free, [image]
- 
 
 63 
        mov     eax, [entry]
60 
        mov     eax, [entry]
 64 
        mov     ebx, [base]
61 
        ret
 65 
        ret
62 
.fail:
 66 
.fail:
63 
        xor     eax, eax
 67 
        xor     eax, eax
64 
        ret
 68 
        ret