mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-13 09:39:09 +02:00
* fixed assembler code that was enabled in r20968 (push/pop changed ebx
and edi) git-svn-id: trunk@21382 -
This commit is contained in:
parent
ffe68ca284
commit
3c6c4dff30
@ -32,6 +32,8 @@ procedure Tbzip2_decode_stream.detransform;assembler;
|
|||||||
asm
|
asm
|
||||||
{ mov edx,offset c
|
{ mov edx,offset c
|
||||||
call mcount}
|
call mcount}
|
||||||
|
push ebx
|
||||||
|
push edi
|
||||||
xor edx,edx
|
xor edx,edx
|
||||||
lea ebx,[eax+Tbzip2_decode_stream.cftab]
|
lea ebx,[eax+Tbzip2_decode_stream.cftab]
|
||||||
mov ecx,[eax+Tbzip2_decode_stream.tt_count]
|
mov ecx,[eax+Tbzip2_decode_stream.tt_count]
|
||||||
@ -53,4 +55,6 @@ asm
|
|||||||
jne @a1
|
jne @a1
|
||||||
pop ebp
|
pop ebp
|
||||||
pop esi
|
pop esi
|
||||||
end ['eax','ebx','ecx','edx','edi'];
|
pop edi
|
||||||
|
pop ebx
|
||||||
|
end ['eax','ecx','edx'];
|
||||||
|
@ -7,6 +7,8 @@ procedure TDecompressBzip2Stream.detransform;assembler;
|
|||||||
asm
|
asm
|
||||||
{ mov edx,offset c
|
{ mov edx,offset c
|
||||||
call mcount}
|
call mcount}
|
||||||
|
push ebx
|
||||||
|
push edi
|
||||||
xor edx,edx
|
xor edx,edx
|
||||||
lea ebx,[eax+TDecompressBzip2Stream.cftab]
|
lea ebx,[eax+TDecompressBzip2Stream.cftab]
|
||||||
mov ecx,[eax+TDecompressBzip2Stream.tt_count]
|
mov ecx,[eax+TDecompressBzip2Stream.tt_count]
|
||||||
@ -28,4 +30,6 @@ asm
|
|||||||
jne @a1
|
jne @a1
|
||||||
pop ebp
|
pop ebp
|
||||||
pop esi
|
pop esi
|
||||||
end ['eax','ebx','ecx','edx','edi'];
|
pop edi
|
||||||
|
pop ebx
|
||||||
|
end ['eax','ecx','edx'];
|
||||||
|
Loading…
Reference in New Issue
Block a user