Putting the exception to nil when clearing debug sessions

src/Debugger-Model-Tests/DebuggerModelTest.class.st

@@ -23,6 +23,15 @@ DebuggerModelTest >> setUp [
 	session:= process newDebugSessionNamed: 'test session' startedAt: context.
 ]
 
+{ #category : #tests }
+DebuggerModelTest >> testClearDebugSession [
+
+	session clear.
+	self assert: session exception equals: nil.
+	self assert: session interruptedContext equals: nil.
+	self assert: session interruptedProcess equals: nil
+]
+
 { #category : #tests }
 DebuggerModelTest >> testCorrectlyCreateDebugSession [
 

src/Debugger-Model/DebugSession.class.st

@@ -57,6 +57,7 @@ DebugSession class >> named: aString on: aProcess startedAt: aContext [
 DebugSession >> clear [
 	"If after resuming the process the user does plan to reuse this session with
 	the same process, it should call this method."
+	exception := nil.
 	interruptedProcess := nil.
 	self updateContextTo: nil
 ]