From 80e8dce98f51c58db7f82004e2eea5892e74e0b4 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 2 Apr 2024 16:41:24 +0200
Subject: [PATCH]   * remove unused variables

---
 tests/test/units/system/tabs.pp | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/tests/test/units/system/tabs.pp b/tests/test/units/system/tabs.pp
index 383a2358a1..78b804a15a 100644
--- a/tests/test/units/system/tabs.pp
+++ b/tests/test/units/system/tabs.pp
@@ -375,10 +375,6 @@ procedure fail;
       WriteLn('Success!');
   end;
 
-var
- r: longint;
- _success : boolean;
- l: boolean;
 Begin
 {$ifdef SKIP_CURRENCY_TEST}
   Writeln('Skipping currency test because its not supported by theis compiler');