From 3205592cba122cfc23832eb89f49a77534094456 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Wed, 3 Mar 2021 20:13:24 +0000
Subject: [PATCH] GdbmiDebugger: Fix formatting result value / broken somewhere
 in recent "string speedup" changes

git-svn-id: trunk@64742 -
---
 components/lazdebuggergdbmi/gdbmidebugger.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/lazdebuggergdbmi/gdbmidebugger.pp b/components/lazdebuggergdbmi/gdbmidebugger.pp
index cd3514107b..df883decb4 100644
--- a/components/lazdebuggergdbmi/gdbmidebugger.pp
+++ b/components/lazdebuggergdbmi/gdbmidebugger.pp
@@ -14137,7 +14137,7 @@ var
         Val(addrtxt, addr, e);
         if e <> 0 then
           Exit;
-        //AnExpression := Lowercase(ResultInfo.TypeName);
+        AnExpression := Lowercase(ResultInfo.TypeName);
         case StringCase(ResultInfo.TypeName,
                         ['char', 'character', 'ansistring', '__vtbl_ptr_type',
                          'wchar', 'widechar', 'widestring', 'unicodestring',