Merge pull request #399 from adri09070/367-REOPEN-The-debugger-action…

…-model-is-not-updated-automatically-needs-refactoring [Reopen] Migration of events from the debugger UI to the debugger action model to automate its updates
pharo-spec · Sep 18, 2023 · 3fa092a · 3fa092a
2 parents 15d1901 + c53a1f4
commit 3fa092a
Show file tree

Hide file tree

Showing 25 changed files with 1,043 additions and 368 deletions.
diff --git a/src/NewTools-Debugger-Tests/StDebuggerActionModel.extension.st b/src/NewTools-Debugger-Tests/StDebuggerActionModel.extension.st
@@ -0,0 +1,7 @@
+Extension { #name : #StDebuggerActionModel }
+
+{ #category : #'*NewTools-Debugger-Tests' }
+StDebuggerActionModel >> hasSubscriber: aDebugger [
+
+	^ self announcer hasSubscriber: aDebugger
+]
diff --git a/src/NewTools-Debugger-Tests/StDebuggerActionModelAnnouncementTest.class.st b/src/NewTools-Debugger-Tests/StDebuggerActionModelAnnouncementTest.class.st
@@ -0,0 +1,27 @@
+Class {
+	#name : #StDebuggerActionModelAnnouncementTest,
+	#superclass : #TestCase,
+	#instVars : [
+		'debugActionModel'
+	],
+	#category : #'NewTools-Debugger-Tests-Model'
+}
+
+{ #category : #running }
+StDebuggerActionModelAnnouncementTest >> setUp [
+
+	super setUp.
+	debugActionModel := StMockDebuggerActionModel new
+]
+
+{ #category : #tests }
+StDebuggerActionModelAnnouncementTest >> testDebuggerActionModel [
+
+	| actionModelAnnouncement |
+	actionModelAnnouncement := StDebuggerActionModelAnnouncement
+		                           debuggerActionModel: debugActionModel.
+
+	self
+		assert: actionModelAnnouncement debuggerActionModel
+		identicalTo: debugActionModel
+]