Subversion Repositories Kolibri OS

Rev

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

Rev 3050 Rev 3113
Line 15... Line 15...
15 
 
 15 
 
16 
 
 16 
 
17 
inline fastcall copystr( ESI,EDI)
 17 
inline fastcall copystr( ESI,EDI)
18 
{
 18 
{
19 
	$cld
 19 
	$cld
20 
l1:
 20 
L1:
21 
	$lodsb
 21 
	$lodsb
22 
	$stosb
 22 
	$stosb
23 
	$test al,al
 23 
	$test al,al
Line 24... Line 24...
24 
	$jnz l1
 24 
	$jnz L1
25 
}
 25 
}
26 
 
 26 
 
27 
char buffer[11];
 27 
char buffer[11];
28 
inline fastcall dword IntToStr( ESI)
 28 
inline fastcall dword IntToStr( ESI)
29 
{
 29 
{
30 
     $mov     edi, #buffer
 30 
     $mov     edi, #buffer
31 
     $mov     ecx, 10
 31 
     $mov     ecx, 10
32 
     $test     esi, esi
 32 
     $test     esi, esi
33 
     $jns     f1
 33 
     $jns     F1
34 
     $mov     al, '-'
 34 
     $mov     al, '-'
35 
     $stosb
 35 
     $stosb
36 
     $neg     esi
 36 
     $neg     esi
37 
f1:
 37 
F1:
38 
     $mov     eax, esi
 38 
     $mov     eax, esi
39 
     $push     -'0'
 39 
     $push     -'0'
40 
f2:
 40 
F2:
41 
     $xor     edx, edx
 41 
     $xor     edx, edx
42 
     $div     ecx
 42 
     $div     ecx
43 
     $push     edx
 43 
     $push     edx
44 
     $test     eax, eax
 44 
     $test     eax, eax
45 
     $jnz     f2
 45 
     $jnz     F2
46 
f3:
 46 
F3:
47 
     $pop     eax
 47 
     $pop     eax
48 
     $add     al, '0'
 48 
     $add     al, '0'
49 
     $stosb
 - 
 
50 
     $jnz     f3
 49 
     $stosb
Line 51... Line 50...
51 
     $mov     eax, #buffer
 50 
     $jnz     F3
52 
     //$ret
 51 
     $mov     eax, #buffer
53 
}
 52 
}
Line 126... Line 125...
126 
 
 125 
 
127 
 
 126 
 
128 
inline fastcall strcpy( EDI, ESI)
 127 
inline fastcall strcpy( EDI, ESI)
129 
{
 128 
{
130 
	$cld
 129 
	$cld
131 
l2:
 130 
L2:
132 
	$lodsb
 131 
	$lodsb
133 
	$stosb
 132 
	$stosb
134 
	$test al,al
 133 
	$test al,al
Line 135... Line 134...
135 
	$jnz l2
 134 
	$jnz L2
136 
}
 135 
}