keXa/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Revert back to old mem.ReAlloc implementation using 68.12 and 68.13

Browse Source 
git-svn-id: svn://kolibrios.org@626 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Mihail Semenyako (mike.dld) 2007-09-15 10:04:04 +00:00
parent b8fa8489d3
commit 5aa81d7197
1 changed files with 28 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
programs/develop/tinypad/trunk/tp-common.asm
View File

@ -586,8 +586,8 @@ endp
proc mem.Alloc,size ;/////////////////////////////////////////////////////////
;-----------------------------------------------------------------------------
push ebx ecx
mov eax,[size]
lea ecx,[eax+4+4095]
mov ecx,[size]
add ecx,4+4095
and ecx,not 4095
mcall 68,12
add ecx,-4
@ -597,7 +597,13 @@ proc mem.Alloc,size ;/////////////////////////////////////////////////////////
ret
@^
push ebx ecx
mcall 68,12,[size]
mov eax,[size]
lea ecx,[eax+4+4095]
and ecx,not 4095
mcall 68,12
add ecx,-4
mov [eax],ecx
add eax,4
pop ecx ebx
ret
^@
@ -606,6 +612,20 @@ endp
;-----------------------------------------------------------------------------
proc mem.ReAlloc,mptr,size ;//////////////////////////////////////////////////
;-----------------------------------------------------------------------------
@^
push ebx ecx edx
mov ecx,[size]
add ecx,4+4095
and ecx,not 4095
mov edx,[mptr]
add edx,-4
mcall 68,20
add ecx,-4
mov [eax],ecx
add eax,4
pop edx ecx ebx
ret
^@
push ebx ecx esi edi eax
mov eax,[mptr]
mov ebx,[size]
@ -636,26 +656,22 @@ proc mem.ReAlloc,mptr,size ;//////////////////////////////////////////////////
.exit:
pop eax edi esi ecx ebx
ret
@^
push ebx ecx edx
mcall 68,20,[size],[mptr]
pop edx ecx ebx
ret
^@
endp
;-----------------------------------------------------------------------------
proc mem.Free,mptr ;//////////////////////////////////////////////////////////
;-----------------------------------------------------------------------------
push ebx ecx
mov eax,[mptr]
lea ecx,[eax-4]
mov ecx,[mptr]
add ecx,-4
mcall 68,13
pop ecx ebx
ret
@^
push ebx ecx
mcall 68,13,[mptr]
mov eax,[mptr]
lea ecx,[eax-4]
mcall 68,13
pop ecx ebx
ret
^@