From bd104270ae7683eaaa48c65a9d7833f4712dc9a0 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Wed, 19 Jan 2022 22:02:58 +0100
Subject: [PATCH]   * clean up

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

diff --git a/tests/test/units/system/tval5.pp b/tests/test/units/system/tval5.pp
index 076b2adce4..7bb163f727 100644
--- a/tests/test/units/system/tval5.pp
+++ b/tests/test/units/system/tval5.pp
@@ -10,9 +10,6 @@ var
   s: shortstring;
   b, b2: byte;
   ch, ch2: char;
-{$ifdef cpu64}
-  caught: boolean;
-{$endif cpu64}
 begin
   s:='$0fffffff';
   for b := low(hexch) to high(hexch) do