From b4a7ca03c40a929ca56b78e3efb5fd61d776c172 Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Fri, 13 Aug 2021 11:51:52 -0300
Subject: [PATCH] Display internal error when trying to watch an invalid UDT.

---
 source/ide/ide_methods.bas | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index 1e3f00721..05069f2f5 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -8006,8 +8006,15 @@ FUNCTION idevariablewatchbox$(currentScope$, filter$, selectVar, returnAction)
                             IF LEFT$(v$, LEN(temp$)) = temp$ THEN v$ = MID$(v$, LEN(temp$))
                             v$ = lineformat$(UCASE$(v$))
                             getid usedVariableList(varDlgList(y).index).id
+                            Error_Happened = 0
                             result$ = udtreference$("", v$, typ)
-                            result = idemessagebox("Result", v$ + "\n" + result$ + "\n" + STR$(typ), "#OK")
+                            IF Error_Happened THEN
+                                result = idemessagebox("Error", Error_Message, "#OK")
+                                GOTO unWatch
+                            ELSE
+                                result = idemessagebox("Result", v$ + "\n" + result$ + "\n" + STR$(typ), "#OK")
+                                GOTO unWatch 'temporarily
+                            END IF
                         ELSE
                         END IF
                     END IF