From 3828c7367888530fa3aeb5d3c807ae65ac12e3b8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Tue, 30 Nov 2021 09:06:41 +0100
Subject: [PATCH] * Make hexdigits a global constant

(cherry picked from commit b1412ec5c036fcd2a1119ae17952f87caa792375)
---
 rtl/objpas/sysutils/sysstr.inc | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/rtl/objpas/sysutils/sysstr.inc b/rtl/objpas/sysutils/sysstr.inc
index 43b04ea0b4..7b3dccc26e 100644
--- a/rtl/objpas/sysutils/sysstr.inc
+++ b/rtl/objpas/sysutils/sysstr.inc
@@ -1,3 +1,4 @@
+
 {
     *********************************************************************
     Copyright (C) 1997, 1998 Gertjan Schouten
@@ -876,9 +877,6 @@ end;
 
 {   IntToHex returns a string representing the hexadecimal value of Value   }
 
-const
-   HexDigits: array[0..15] of char = '0123456789ABCDEF';
-
 function IntToHex(Value: Longint; Digits: integer): string;
 var i: integer;
 begin