There's a syntax error that is in trunk for a while now, here's the fix, can anybody of the dev's please apply this?

Michael


ring@MacbookPro fpcsrc $ git diff rtl/arm/thumb.inc
diff --git a/rtl/arm/thumb.inc b/rtl/arm/thumb.inc
index 85d948a1e1..c7a9273be1 100644
--- a/rtl/arm/thumb.inc
+++ b/rtl/arm/thumb.inc
@@ -99,7 +99,7 @@ function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint  function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint;
 {$else VER3_2}
 {$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}
   begin
     Result:=Target;

_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to