From 9d10123b0deb6214d2a16b7f6be098484ae49a0b Mon Sep 17 00:00:00 2001
From: Sven/Sarah Barth <pascaldragon@gmail.com>
Date: Sat, 7 Dec 2024 22:03:06 +0100
Subject: [PATCH] - remove unused variables
---
rtl/xtensa/xtensa.inc | 20 --------------------
1 file changed, 20 deletions(-)
diff --git a/rtl/xtensa/xtensa.inc b/rtl/xtensa/xtensa.inc
index 756a875bc8..13c7186f3c 100644
--- a/rtl/xtensa/xtensa.inc
+++ b/rtl/xtensa/xtensa.inc
@@ -128,8 +128,6 @@ Function Sptr : pointer;assembler;
function InterLockedDecrement (var Target: longint) : longint;
- var
- temp_sreg : byte;
begin
Result:=Target-1;
Target:=Result;
@@ -137,8 +135,6 @@ function InterLockedDecrement (var Target: longint) : longint;
function InterLockedIncrement (var Target: longint) : longint;
- var
- temp_sreg : byte;
begin
Result:=Target+1;
Target:=Result;
@@ -146,8 +142,6 @@ function InterLockedIncrement (var Target: longint) : longint;
function InterLockedExchange (var Target: longint;Source : longint) : longint;
- var
- temp_sreg : byte;
begin
Result:=Target;
Target:=Source;
@@ -155,8 +149,6 @@ function InterLockedExchange (var Target: longint;Source : longint) : longint;
function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comperand: longint): longint;
- var
- temp_sreg : byte;
begin
Result:=Target;
if Result=Comperand then
@@ -165,8 +157,6 @@ function InterlockedCompareExchange(var Target: longint; NewValue: longint; Comp
function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint;
- var
- temp_sreg : byte;
begin
Result:=Target;
Target:=Result+Source;
@@ -174,8 +164,6 @@ function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint
function InterLockedDecrement (var Target: smallint) : smallint;
- var
- temp_sreg : byte;
begin
Result:=Target-1;
Target:=Result;
@@ -183,8 +171,6 @@ function InterLockedDecrement (var Target: smallint) : smallint;
function InterLockedIncrement (var Target: smallint) : smallint;
- var
- temp_sreg : byte;
begin
Result:=Target+1;
Target:=Result;
@@ -192,8 +178,6 @@ function InterLockedIncrement (var Target: smallint) : smallint;
function InterLockedExchange (var Target: smallint;Source : smallint) : smallint;
- var
- temp_sreg : byte;
begin
Result:=Target;
Target:=Source;
@@ -201,8 +185,6 @@ function InterLockedExchange (var Target: smallint;Source : smallint) : smallint
function InterlockedCompareExchange(var Target: smallint; NewValue: smallint; Comperand: smallint): smallint;
- var
- temp_sreg : byte;
begin
Result:=Target;
if Result=Comperand then
@@ -211,8 +193,6 @@ function InterlockedCompareExchange(var Target: smallint; NewValue: smallint; Co
function InterLockedExchangeAdd (var Target: smallint;Source : smallint) : smallint;
- var
- temp_sreg : byte;
begin
Result:=Target;
Target:=Result+Source;