Subversion Repositories Kolibri OS

Rev

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

Rev 6482 Rev 6495
Line 9... Line 9...
9
9
10 
include '../../../programs/develop/libraries/box_lib/trunk/box_lib.mac'
 10 
include '../../../programs/develop/libraries/box_lib/trunk/box_lib.mac'
11 
include '../../../programs/system/run/trunk/txtbut.inc'
 11 
include '../../../programs/system/run/trunk/txtbut.inc'
Line 12... Line 12...
12 
include '../../../programs/dll.inc'
 12 
include '../../../programs/dll.inc'
13
13
14 
public init_boxlib as '_init_boxlib_asm'
 14 
public init_boxlib as '_kolibri_boxlib_init'
15 
public editbox_key_thunk as '_editbox_key@4'   ; renamed due to ambiguity
 15 
public editbox_key_thunk as '_editbox_key@4'   ; renamed due to ambiguity
Line 16... Line 16...
16 
public press_key as '_press_key'
 16 
public press_key as '_press_key'
17 
;;; Returns 0 on success. -1 on failure.
 - 
 
18 
 
 17 
;;; Returns 0 on success. -1 on failure.
19 
proc init_boxlib
 - 
 
20
18 
 
21 
	mcall 68,11
 - 
 
22
- 
 
23 
	stdcall dll.Load, @IMPORT
 - 
 
24 
        test    eax, eax
 - 
 
25 
        jnz     error
 - 
 
26
- 
 
27 
	mov eax, 0
 - 
 
28 
	ret
 - 
 
29
19 
proc init_boxlib
30 
error:
20 
	mcall 68,11
Line 31... Line 21...
31 
	mov eax, -1
 21 
	stdcall dll.Load, @IMPORT
32 
	ret
 22 
	ret