Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* removed InterlockedCompareExchange64 for i386 from system unit

git-svn-id: trunk@6775 -
ivost 18 years ago
parent
74f9281067
commit
ed87187cad
1 changed files with 0 additions and 3 deletions
Split View Show Diff Stats
  1. 0 3
      rtl/inc/systemh.inc

+ 0 - 3
rtl/inc/systemh.inc
View File 

@@ -716,9 +716,6 @@ function InterLockedDecrement (var Target: longint) : longint; public name 'FPC_
 
 function InterLockedExchange (var Target: longint;Source : longint) : longint; public name 'FPC_INTERLOCKEDEXCHANGE';
 
 function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint; public name 'FPC_INTERLOCKEDEXCHANGEADD';
 
 function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint; public name 'FPC_INTERLOCKEDCOMPAREEXCHANGE';
 
-{$ifdef cpui386}
 
-function InterlockedCompareExchange64(var Target: int64; NewValue: int64; Comperand: int64): int64; public name 'FPC_INTERLOCKEDCOMPAREEXCHANGE64';
 
-{$endif}
 
 {$ifdef cpu64}
 
 function InterLockedIncrement64 (var Target: int64) : int64; public name 'FPC_INTERLOCKEDINCREMENT64';
 
 function InterLockedDecrement64 (var Target: int64) : int64; public name 'FPC_INTERLOCKEDDECREMENT64';