- remove unused variables

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;