From 466084cebdc091ef7d30bc764d2454e477dad78f Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Wed, 23 Sep 2020 21:11:48 +0000
Subject: [PATCH] Debugger: fix converting values (qword) to bin/octal

git-svn-id: trunk@63913 -
---
 components/debuggerintf/dbgintfdebuggerbase.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/debuggerintf/dbgintfdebuggerbase.pp b/components/debuggerintf/dbgintfdebuggerbase.pp
index 00237732fe..30c4d5654e 100644
--- a/components/debuggerintf/dbgintfdebuggerbase.pp
+++ b/components/debuggerintf/dbgintfdebuggerbase.pp
@@ -3110,7 +3110,7 @@ end;
 
 function TRegisterDisplayValue.GetValue(ADispFormat: TRegisterDisplayFormat): String;
 const Digits = '01234567';
-  function IntToBase(Val, Base: Integer): String;
+  function IntToBase(Val, Base: QWord): String;
   var
     M: Integer;
   begin