Subversion Repositories Kolibri OS

Rev

Rev 6456 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6456 Rev 6495
1 
format coff
 1 
format coff
2 
use32                                   ; Tell compiler to use 32 bit instructions
 2 
use32                                   ; Tell compiler to use 32 bit instructions
3
3
4 
section '.flat' code			; Keep this line before includes or GCC messes up call addresses
 4 
section '.flat' code			; Keep this line before includes or GCC messes up call addresses
5 
 
 5 
 
6 
;include 'struct.inc'
 6 
;include 'struct.inc'
7 
include '../../../programs/proc32.inc'
 7 
include '../../../programs/proc32.inc'
8 
include '../../../programs/macros.inc'
 8 
include '../../../programs/macros.inc'
9 
purge section,mov,add,sub
 9 
purge section,mov,add,sub
10 
 
 10 
 
11 
include '../../../programs/dll.inc'
 11 
include '../../../programs/dll.inc'
12
12
13 
public init_libini as '_init_libini_asm'
 13 
public init_libini as '_kolibri_libini_init'
14
14
15 
;;; Returns 0 on success. -1 on failure.
 15 
;;; Returns 0 on success. -1 on failure.
16 
 
 16 
 
17 
proc init_libini
 17 
proc init_libini
18
- 
 
19 
	mcall 68,11
 18 
	mcall 68,11
20
- 
 
21 
	stdcall dll.Load, @IMPORT
 19 
	stdcall dll.Load, @IMPORT
22 
        test    eax, eax
 - 
 
23 
        jnz     error
 - 
 
24
- 
 
25 
	mov eax, 0
 - 
 
26 
	ret
 - 
 
27
- 
 
28 
error:
- 
 
29 
	mov eax, -1
 - 
 
30 
	ret
 20 
	ret
31 
endp
21 
endp
32
22
33 
@IMPORT:
 23 
@IMPORT:
34 
 
 24 
 
35 
library lib_libini,               'libini.obj'
 25 
library lib_libini,               'libini.obj'
36 
 
 26 
 
37 
import  lib_libini, \
 27 
import  lib_libini, \
38 
		LIBINI_enum_sections           , 'ini_enum_sections'    , \
 28 
		LIBINI_enum_sections           , 'ini_enum_sections'    , \
39 
        LIBINI_enum_keys               , 'ini_enum_keys'        , \
 29 
        LIBINI_enum_keys               , 'ini_enum_keys'        , \
40 
        LIBINI_get_str                 , 'ini_get_str'          , \
 30 
        LIBINI_get_str                 , 'ini_get_str'          , \
41 
        LIBINI_get_int  			   , 'ini_get_int'   		, \
 31 
        LIBINI_get_int  			   , 'ini_get_int'   		, \
42 
        LIBINI_get_color               , 'int_get_color'        , \
 32 
        LIBINI_get_color               , 'int_get_color'        , \
43 
        LIBINI_get_shortcut            , 'int_get_shortcut'     , \
 33 
        LIBINI_get_shortcut            , 'int_get_shortcut'     , \
44 
        LIBINI_set_str            	   , 'ini_set_str'          , \
 34 
        LIBINI_set_str            	   , 'ini_set_str'          , \
45 
        LIBINI_set_int         		   , 'ini_set_int'          , \
35 
        LIBINI_set_int         		   , 'ini_set_int'          , \
46 
        LIBINI_set_color          	   , 'ini_set_color'
 36 
        LIBINI_set_color          	   , 'ini_set_color'
47
37
48 
public LIBINI_enum_sections         as  '_LIBINI_enum_sections'
38 
public LIBINI_enum_sections         as  '_LIBINI_enum_sections'
49 
public LIBINI_enum_keys             as  '_LIBINI_enum_keys'
39 
public LIBINI_enum_keys             as  '_LIBINI_enum_keys'
50 
public LIBINI_get_str               as  '_LIBINI_get_str'
40 
public LIBINI_get_str               as  '_LIBINI_get_str'
51 
public LIBINI_get_int  			    as  '_LIBINI_get_int'
41 
public LIBINI_get_int  			    as  '_LIBINI_get_int'
52 
public LIBINI_get_color             as  '_LIBINI_get_color'
42 
public LIBINI_get_color             as  '_LIBINI_get_color'
53 
public LIBINI_set_str            	as  '_LIBINI_set_str'
43 
public LIBINI_set_str            	as  '_LIBINI_set_str'
54 
public LIBINI_set_int         		as  '_LIBINI_set_int'
 44 
public LIBINI_set_int         		as  '_LIBINI_set_int'