mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-17 12:59:24 +02:00
* make sure to preserve edi in free_memory_block
git-svn-id: trunk@8255 -
This commit is contained in:
parent
1967deb137
commit
05b3c0311b
@ -849,6 +849,7 @@ interface
|
||||
function free_memory_block(blockhandle : longint) : boolean;
|
||||
begin
|
||||
asm
|
||||
pushl %edi
|
||||
pushl %esi
|
||||
movl blockhandle,%esi
|
||||
movl %esi,%edi
|
||||
@ -859,6 +860,7 @@ interface
|
||||
call test_int31
|
||||
movb %al,__RESULT
|
||||
popl %esi
|
||||
popl %edi
|
||||
end;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user