fix #cull:cull: for one-arg case

hpi-swa-lab · Dec 26, 2023 · 7d821b2 · 7d821b2
1 parent 1e16964
commit 7d821b2
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/packages/TraceDebugger.package/Symbol.extension/instance/cull.cull..st b/packages/TraceDebugger.package/Symbol.extension/instance/cull.cull..st
@@ -1,4 +1,5 @@
 *TraceDebugger-Core-evaluating-pseudo-override
 cull: firstArg cull: secondArg
 
-	^ firstArg perform: self with: secondArg
+	self numArgs >= 1 ifTrue: [^ self value: firstArg value: secondArg].
+	^ self value: firstArg
diff --git a/packages/TraceDebugger.package/Symbol.extension/methodProperties.json b/packages/TraceDebugger.package/Symbol.extension/methodProperties.json
@@ -4,5 +4,5 @@
 	"instance" : {
 		"asTdbProxyInMemory:atTime:withSideEffects:" : "ct 6/18/2022 16:10",
 		"asTdbRangeProxyInMemory:atTimes:withSideEffects:" : "ct 6/3/2022 12:52",
-		"cull:cull:" : "ct 8/1/2022 21:36",
+		"cull:cull:" : "ct 5/16/2023 20:21",
 		"tdbBlockAndSelectorString" : "ct 7/30/2022 15:33" } }