Ich habe mal nach geschaut:
in der jwawinbase.pas als
Code:
function InterlockedCompareExchange64(var Destination: LONGLONG; Exchange, Comperand: LONGLONG): LONGLONG; stdcall;
in der c:\lazarus\fpc\2.6.4\source\
rtl\i386\i386.inc als
Code:
function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint; assembler;
asm
xchgl %eax,%ecx
lock
cmpxchgl %edx, (%ecx)
end;
Und wie schon geschrieben in der systemh.inc.
Da ich keine der Units bewust eingebunden habe, sollte also eigentlich die System greifen.