From bdb3d097b5572bc7742604e66b7d0be57e596b3e Mon Sep 17 00:00:00 2001
From: Ondrej Pokorny <ondrej@kluug.net>
Date: Fri, 8 Nov 2024 15:30:19 +0100
Subject: [PATCH] fix AtomicDecrement(Cardinal) overload

---
 rtl/inc/system.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/inc/system.inc b/rtl/inc/system.inc
index 7688d9ffa2..420d8bebb6 100644
--- a/rtl/inc/system.inc
+++ b/rtl/inc/system.inc
@@ -2415,7 +2415,7 @@ end;
 function AtomicDecrement (var Target: Cardinal) : Cardinal; {$ifdef SYSTEMINLINE}inline;{$endif}
 
 begin
-  Result:=Cardinal(InterlockedIncrement(Longint(Target)));
+  Result:=Cardinal(InterlockedDecrement(Longint(Target)));
 end;