From 1d51c41b53b396d3f09c1aa140b1173203fdeb31 Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Tue, 28 Sep 2021 02:19:27 -0300
Subject: [PATCH] Fix watching regular fixed-length string variables

---
 source/ide/ide_methods.bas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index da16da711..aa5213107 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -7312,10 +7312,10 @@ SUB DebugMode
                             IF INSTR(varType$, "STRING") = 0 THEN
                                 GOSUB findVarSize
                             ELSE
-                                IF INSTR(varType$, " * ") = 0 THEN
-                                    varSize& = LEN(dummy%&) + LEN(dummy&)
-                                ELSE
+                                IF INSTR(varType$, " * ") > 0 AND (tempIsUDT& <> 0 OR tempIsArray& <> 0) THEN
                                     varSize& = VAL(_TRIM$(MID$(varType$, INSTR(varType$, "STRING *") + 8)))
+                                ELSE
+                                    varSize& = LEN(dummy%&) + LEN(dummy&)
                                 END IF
                             END IF