From 89a36c72322a61761e24d69e2645b0b1d5fd822c Mon Sep 17 00:00:00 2001
From: hjk <hjk@qt.io>
Date: Fri, 20 Sep 2019 15:45:11 +0200
Subject: Debugger: Show FORTRAN strings

Fixes: QTCREATORBUG-22976
Change-Id: Ib435b2692301fe2e2d3378623e99bbcf16e27e46
Reviewed-by: Christian Stenger <christian.stenger@qt.io>
---
 share/qtcreator/debugger/dumper.py | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'share')

diff --git a/share/qtcreator/debugger/dumper.py b/share/qtcreator/debugger/dumper.py
index 1401926858..aa351b7e7e 100644
--- a/share/qtcreator/debugger/dumper.py
+++ b/share/qtcreator/debugger/dumper.py
@@ -2837,8 +2837,8 @@ class DumperBase:
             return
 
         if typeobj.code == TypeCodeFortranString:
-            data = self.value.data()
-            self.putValue(data, 'latin1', 1)
+            self.putValue(self.hexencode(value.data()), 'latin1')
+            self.putNumChild(0)
             self.putType(typeobj)
 
         if typeName.endswith('[]'):
-- 
cgit v1.2.3