debugger fix

cdhanna · Feb 25, 2025 · 4373e4f · 4373e4f
1 parent 312271e
commit 4373e4f
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 2 deletions.
diff --git a/FadeBasic/CHANGELOG.md b/FadeBasic/CHANGELOG.md
@@ -7,5 +7,8 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 
 ## [Unreleased]
 
+### Fixed
+- Debugger would emit exit event during partial budget runs. 
+
 ### Added
 - Everything
diff --git a/FadeBasic/FadeBasic/Launch/DebugSession.cs b/FadeBasic/FadeBasic/Launch/DebugSession.cs
@@ -1283,7 +1283,10 @@ public void StartDebugging(int ops = 0)
             }
 
 
-            SendExitedMessage();
+            if (_vm.instructionIndex >= _vm.program.Length || requestedExit)
+            {
+                SendExitedMessage();
+            }
         }
 
     }

diff --git a/FadeBasic/FadeBasic/Virtual/VirtualMachine.cs b/FadeBasic/FadeBasic/Virtual/VirtualMachine.cs
@@ -135,7 +135,7 @@ public IEnumerator<ExecutionState> Execute(int instructionBatchCount = 1000)
         }
 
 
-        private bool isSuspendRequested;
+        public bool isSuspendRequested;
         public void Suspend()
         {
             isSuspendRequested = true;
-Original file line number
+Diff line change
@@ Expand Up / @@ -1283,7 +1283,10 @@ public void StartDebugging(int ops = 0) @@
                 }
-                SendExitedMessage();
+                if (_vm.instructionIndex >= _vm.program.Length || requestedExit)
+                {
+                    SendExitedMessage();
+                }
             }
         }
@@ Expand Down @@