Test Morph Closed In World deletes Morph in Editor.

hpi-swa-teaching · Jul 30, 2022 · 3b5ab1a · 3b5ab1a
1 parent 8923e97
commit 3b5ab1a
Show file tree

Hide file tree

Showing 4 changed files with 30 additions and 3 deletions.
diff --git a/...ages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/morphIsDeleted.st b/...ages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/morphIsDeleted.st
@@ -0,0 +1,4 @@
+support
+morphIsDeleted
+"replace with self animationsEditorInstance selectedTreeNoe isNil"
+	^self animationsEditorInstance propertyTreeMorph submorphs first submorphs size = 1.
diff --git a/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/tearDown.st b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/instance/tearDown.st
@@ -3,10 +3,11 @@ tearDown
 	| targetMorph |
 
 	super tearDown.
+	self animationsEditorInstance propertyList first ifNotNil: [
 	targetMorph := (self animationsEditorInstance propertyList first) targetMorph.
 	targetMorph isFlexed
 		ifTrue: [targetMorph owner abandon]. "removes FlexShell"
-	targetMorph abandon. 
+	targetMorph abandon. ].
 	self animationsEditorInstance windowReference abandon.
 
 
diff --git a/...ests.package/AnimationsEditorTest.class/instance/testMorphClosedInWorldTreeSpecUpdated.st b/...ests.package/AnimationsEditorTest.class/instance/testMorphClosedInWorldTreeSpecUpdated.st
@@ -0,0 +1,20 @@
+testing
+testMorphClosedInWorldTreeSpecUpdated
+	|morph goalReached monitor producer finished|
+	morph:= Morph new.
+	morph openInWorld.
+
+	self animationsEditorInstance selectedTreeNode: (self animationsEditorInstance addTargetMorph: morph).
+	morph isFlexed
+		ifTrue: [morph owner abandon]. "removes FlexShell"
+
+	goalReached := false.
+	finished := Semaphore new.
+	monitor := Monitor new.
+	producer := [
+		[monitor critical:
+			[monitor waitUntil: [self morphIsDeleted].
+			monitor signal]]
+			whileFalse.
+			finished signal.
+		self assert: self animationsEditorInstance propertyTreeMorph submorphs first submorphs size = 1.].
diff --git a/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json b/packages/AnimationsEditor-Tests.package/AnimationsEditorTest.class/methodProperties.json
@@ -4,10 +4,12 @@
 	"instance" : {
 		"animationsEditorInstance" : "MH 8/1/2021 18:39",
 		"animationsEditorInstance:" : "MH 8/1/2021 18:39",
-		"setUp" : "LW 6/27/2021 13:26",
-		"tearDown" : "Noel Bastubbe 6/22/2022 11:55",
+		"morphIsDeleted" : "NR 7/30/2022 16:23",
+		"setUp" : "NR 7/30/2022 15:15",
+		"tearDown" : "NR 7/30/2022 15:15",
 		"testGetDeepestMorph" : "MH 8/1/2021 18:40",
 		"testInstanceCreation" : "LW 6/27/2021 13:30",
+		"testMorphClosedInWorldTreeSpecUpdated" : "NR 7/30/2022 16:24",
 		"testPlayAnimations" : "Noel Bastubbe 6/22/2022 11:52",
 		"testSelectMorphByHand" : "MH 8/1/2021 18:40",
 		"testShowMessagePlayAnimation" : "Noel Bastubbe 6/22/2022 11:56",