Fixes Slime test for empty statements (will work correctly after fix for issue pharo-project/pharo#15955 is merged into Pharo)

Johan Brichau · Johan Brichau · commit 64ac15d95c5d · 2024-01-14T14:04:09.000+01:00
diff --git a/repository/Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/rules.st b/repository/Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/rules.st
@@ -5,4 +5,6 @@ rules
 		addAll: GRSlimeBlockLintRule allSubclasses;
 		addAll: GRSlimeParseTreeLintRule allSubclasses;
 		addAll: GRSlimeTransformationRule allSubclasses;
+		add: ReMultiplePeriodsTerminatingStatementRule;
+		add: ReMethodSignaturePeriodRule;
 		yourself) reject: #isAbstract
diff --git a/repository/Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testEmptyStatements.st b/repository/Grease-Tests-Pharo-Slime.package/GRReSlimeTest.class/instance/testEmptyStatements.st
@@ -1,15 +1,18 @@
 tests-block
 testEmptyStatements
 	"We added this test to make sure that this Pharo-supplied rule works because we previously had this one in Grease and it is important."
-	<expectedFailure>
 
 	| class |
 	class := self defineSubClassOf: #GRObject.
-	self compile: 'emptyStatement1. self and' in: class.
-	self compile: 'emptyStatement2 self and..' in: class.
-	self compile: 'emptyStatement3 self and."foo".' in: class.
-	self compile: 'emptyStatement4 self and."foo".self and' in: class.
+	self compile: 'emptyStatement1.', (String with: Character cr), ' self and' in: class.
+	self compile: 'emptyStatement2', (String with: Character cr), ' self and..' in: class.
+	self compile: 'emptyStatement3', (String with: Character cr), ' self and."foo".' in: class.
+	self compile: 'emptyStatement4', (String with: Character cr), ' self and."foo".self and' in: class.
 	self 
 		assertRule: ReMultiplePeriodsTerminatingStatementRule
-		matches: { class>>#emptyStatement1 . class>>#emptyStatement2 . class>>#emptyStatement3 . class>>#emptyStatement4 }
-		ignoring: (Array with: ReUnnecessaryLastPeriodRule)
+		matches: { class>>#emptyStatement2 . class>>#emptyStatement3 . class>>#emptyStatement4 }
+		ignoring: { ReMethodSignaturePeriodRule }.
+	self 
+		assertRule: ReMethodSignaturePeriodRule
+		matches: { class>>#emptyStatement1 }
+		ignoring: { ReMultiplePeriodsTerminatingStatementRule }.
