Merge remote-tracking branch 'origin/main'

feenkcom · May 15, 2024 · 71629a8 · 71629a8
2 parents 9d8f470 + 1df5fe2
commit 71629a8
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/GToolkit-Utility-System/WeakArray.extension.st b/src/GToolkit-Utility-System/WeakArray.extension.st
@@ -36,7 +36,7 @@ WeakArray class >> gtSummaryFor: aView [
 		items: [ {
 			'FinalizationProcess' -> (FinalizationProcess isNotNil and: [ FinalizationProcess isTerminated not ]).
 			'FinalizationSemaphore' -> FinalizationSemaphore size.
-			'MournLoopProcess' -> (MournLoopProcess isNotNil and: [ MournLoopProcess isTerminated not ]).
+			'MournLoopProcess' -> MournLoopProcess.
 			'StopRequested' -> StopRequested.
 			'StoppedSemaphore' -> StoppedSemaphore size. } ];
 		column: 'Item' text: #key;
@@ -117,8 +117,10 @@ WeakArray class >> stopFinalizationProcess [
 		[FinalizationProcess terminate.
 		FinalizationProcess := nil].
 
-	MournLoopProcess ifNil: [ ^ self ].
+	(MournLoopProcess isNil or: [ MournLoopProcess isTerminated ])
+		ifTrue: [ ^ self ].
 	self assert: StoppedSemaphore isSignaled not.
 	StopRequested := true.
 	StoppedSemaphore wait.
+
 ]