paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 22:49:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

m68k-amiga: fix typo from commit e94d02a0 that broke the build

Browse Source
This commit is contained in:
Karoly Balogh 2024-12-13 01:18:31 +01:00
parent e94d02a067
commit c2ceb4bb99
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/amiga/m68k/m68kamiga.inc
View File

@ -82,7 +82,7 @@ function fpc_atomic_add_32 (var Target: longint;Value : longint) : longint;
function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint; function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint;
{$else VER3_2} {$else VER3_2}
{$define FPC_SYSTEM_HAS_ATOMIC_CMP_XCHG_32} {$define FPC_SYSTEM_HAS_ATOMIC_CMP_XCHG_32}
function fpc_atomic_cmp_xchg_32 (var Target: longint; NewValue: longint; Comparand: longint) : longint; [public;alias:'FPC_ATOMIC_CMP_XCHG_32']; function fpc_atomic_cmp_xchg_32 (var Target: longint; NewValue: longint; Comparand: longint) : longint; [public,alias:'FPC_ATOMIC_CMP_XCHG_32'];
{$endif VER3_2} {$endif VER3_2}
begin begin
Forbid; Forbid;