From 3bcad3c611f98e961380eab70d63975dc4ec163b Mon Sep 17 00:00:00 2001
From: FellippeHeitor <fellippeheitor@gmail.com>
Date: Wed, 25 Aug 2021 00:08:52 -0300
Subject: [PATCH] Resets Watch Panel data before a new run.

---
 source/ide/ide_methods.bas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index f4187899d..67c08d535 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -6407,6 +6407,7 @@ SUB DebugMode
             debugClient& = 0
             debuggeepid = 0
 
+            showvWatchPanel vWatchPanel, "", 0, 1
             IF LEN(variableWatchList$) = 0 THEN
                 totalVisibleVariables = 0
                 vWatchPanel.h = 5
@@ -7573,7 +7574,7 @@ SUB DebugMode
 
     IF PauseMode <> 0 AND LEN(variableWatchList$) > 0 THEN
         IF WatchListToConsole THEN _CONSOLE ON
-        showvWatchPanel vWatchPanel, currentSub$, totalVisibleVariables
+        showvWatchPanel vWatchPanel, currentSub$, totalVisibleVariables, 0
     END IF
 
     PCOPY 3, 0
@@ -7633,10 +7634,12 @@ Function map! (value!, minRange!, maxRange!, newMinRange!, newMaxRange!)
     map! = ((value! - minRange!) / (maxRange! - minRange!)) * (newMaxRange! - newMinRange!) + newMinRange!
 End Function
 
-SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, totalVisibleVariables)
+SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, totalVisibleVariables, action as _BYTE)
     STATIC previousVariableWatchList$
     STATIC longestVarName
 
+    IF action = 1 THEN previousVariableWatchList$ = "": EXIT SUB 'reset
+
     IF previousVariableWatchList$ <> variableWatchList$ THEN
         'new setup
         previousVariableWatchList$ = variableWatchList$