Fixes recursion in SbStBasicMethod >> =

hpi-swa · Sep 18, 2023 · 07fccfc · 07fccfc
1 parent 1c409aa
commit 07fccfc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/packages/Sandblocks-Smalltalk/SBStBasicMethod.class.st b/packages/Sandblocks-Smalltalk/SBStBasicMethod.class.st
@@ -24,7 +24,7 @@ SBStBasicMethod class >> selector: aSymbol arguments: aCollection class: aClass
 SBStBasicMethod >> = anotherSBStBasicMethod [
 
 	^ anotherSBStBasicMethod class == self class 
-		and: [anotherSBStBasicMethod compiledMethod ~= anotherSBStBasicMethod]
+		and: [anotherSBStBasicMethod compiledMethod class ~= self class]
 		and: [anotherSBStBasicMethod compiledMethod equivalentTo: self compiledMethod]
 ]