update test method

src/Roassal-Layouts-Tests/RSLayoutTestCase.class.st

@@ -6,9 +6,8 @@ Class {
 
 { #category : #asserting }
 RSLayoutTestCase >> assertIntegerPosition: aGroupOfShapes equals: anArray [
-	| block |
-	block := [ :a :b | a x = b x ifTrue: [ a y < b y ] ifFalse: [ a x < b x ] ].
-	self 
-		assert: ((aGroupOfShapes collect: [ :each | each position asIntegerPoint ] as: Array) sortedAs: block )
-		equals: (anArray sortedAs: block)
+	| col |
+	col := aGroupOfShapes collect: [ :each | each position asIntegerPoint ] as: Array.
+	self assert: col size equals: anArray size.
+	col do: [ :each | self assert: (anArray includes: each) ]
 ]