paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-25 01:51:41 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed assembler version of fpc_AnsiStr_Decr_Ref (based on remark

Browse Source 
from Martin Schreiber)

git-svn-id: trunk@2856 -
This commit is contained in:
Jonas Maebe 2006-03-11 14:16:11 +00:00
parent 4ed39b0c16
commit 83b1c3736a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/i386/i386.inc
View File

@ -984,7 +984,7 @@ end;
****************************************************************************} ****************************************************************************}
{ do a thread save inc/dec } { do a thread-safe inc/dec }
{$define FPC_SYSTEM_HAS_DECLOCKED_LONGINT} {$define FPC_SYSTEM_HAS_DECLOCKED_LONGINT}
function cpudeclocked(var l : longint) : boolean;assembler;nostackframe; function cpudeclocked(var l : longint) : boolean;assembler;nostackframe;
@ -1093,7 +1093,7 @@ asm
.Lj3610: .Lj3610:
movl %edx,%eax movl %edx,%eax
call cpudeclocked call cpudeclocked
movb %al,%al testb %al,%al
je .Lj3605 je .Lj3605
.Lj3620: .Lj3620:
movl (%esp),%eax movl (%esp),%eax