* Fixed bugs in user_alloc and user_free.

* 'stdcall' procedures now do not generate stupid 'ret 0'
  (useful when compiling with FASM before 1.66)

git-svn-id: svn://kolibrios.org@213 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Evgeny Grechnikov (Diamond) 2006-11-17 12:34:35 +00:00
parent f96c2c867c
commit 44a74d9138
2 changed files with 5 additions and 2 deletions

View File

@ -680,6 +680,7 @@ l_0:
and eax, 0xFFFFF000
cmp eax, ecx ;alloc_size
jb m_next
jz @f
mov edx, esi
add edx, ecx
@ -687,7 +688,7 @@ l_0:
or eax, FREE_BLOCK
shr edx, 12
mov [pages_tab+edx*4], eax
@@:
or ecx, USED_BLOCK
mov [pages_tab+ebx*4], ecx
shr ecx, 12
@ -753,6 +754,8 @@ proc user_free stdcall, base:dword
shl ebx, 8
mov esi, dword [ebx+PROC_BASE+APPDATA.heap_base]; heap_base
mov edi, dword [ebx+PROC_BASE+APPDATA.heap_top]; heap_top
add esi, new_app_base
add edi, new_app_base
shr esi, 12
shr edi, 12
@@:

View File

@ -71,7 +71,7 @@ macro epiloguedef procname,flag,parmbytes,localbytes,reglist
if parmbytes | localbytes
leave
end if
if flag and 10000b
if (flag and 10000b) | (parmbytes=0)
retn
else
retn parmbytes