mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 06:19:32 +02:00
* Make hexdigits a global constant
(cherry picked from commit b1412ec5c0
)
This commit is contained in:
parent
d64f88293f
commit
3828c73678
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user