paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-30 10:41:15 +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}
function cpudeclocked(var l : longint) : boolean;assembler;nostackframe;
@ -1093,7 +1093,7 @@ asm
.Lj3610:
movl %edx,%eax
call cpudeclocked
movb %al,%al
testb %al,%al
je .Lj3605
.Lj3620:
movl (%esp),%eax