class packages are important in the tests, as indicated by the failur…

…es that otherwise result
SeasideSt · Feb 4, 2024 · edd9b01 · edd9b01
1 parent 5216ca7
commit edd9b01
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 0 deletions.
diff --git a/...-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testReferencesNotPortableClass.st b/...-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testReferencesNotPortableClass.st
@@ -3,6 +3,7 @@ testReferencesNotPortableClass
 
 	| class |
 	class := self defineSubClassOf: #GRObject.
+	class package: 'SomeCategory' tag: ''.
 	self compile: 'invalid ^ Semaphore new' in: class.
 	self compile: 'valid ^ GRObject new' in: class.
 	self 

diff --git a/...-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testSubclassesNotPortableClass.st b/...-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testSubclassesNotPortableClass.st
@@ -3,6 +3,7 @@ testSubclassesNotPortableClass
 
 	| class |
 	class := self defineSubClassOf: #Mutex.
+	class package: 'SomeCategory' tag: ''.
 	self 
 		assertRule: GRSubclassesNotPortableClassRule
 		matches: { class }
diff --git a/...Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testUsesNotPortableClass.st b/...Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testUsesNotPortableClass.st
@@ -3,6 +3,7 @@ testUsesNotPortableClass
 
 	| class |
 	class := self defineSubClassOf: #GRObject.
+	class package: 'SomeCategory' tag: ''.
 	self compile: 'invalid ^ Semaphore new' in: class.
 	self compile: 'valid ^ GRObject new' in: class.
 	self