Subversion Repositories Kolibri OS

Rev

Rev 6448 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

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