--- a/DebugView.st Sun Sep 08 15:50:48 2019 +0200
+++ b/DebugView.st Sun Sep 08 16:04:01 2019 +0200
@@ -5777,7 +5777,7 @@
].
"/ code for a setter
- (selector numArgs == 1
+ (selector argumentCount == 1
and:[(selector endsWith:':')
and:[receiversClass instVarNames includes:(selector copyButLast:1)]])
ifTrue:[
@@ -5788,7 +5788,7 @@
].
"/ code for a tester
- (selector numArgs == 0
+ (selector argumentCount == 0
and:[(selector startsWith:'is')
and:[(Smalltalk classNamed:(selector copyFrom:3)) notNil ]])
ifTrue:[
@@ -8486,7 +8486,7 @@
and:[ (actualContext lineNumber
between:definingNode firstLineNumber
and:definingNode lastLineNumber)
- and:[ varIdx <= actualContext numArgs ] ]])
+ and:[ varIdx <= actualContext argumentCount ] ]])
ifTrue:[
aBlock value:(actualContext argAt:varIdx) value:'blockArg ',nmBold .
^ self
@@ -9254,7 +9254,7 @@
recIsException := (rec isExceptionCreator and:[recIsExceptionHandler])
].
].
- aContext numArgs > 0 ifTrue:[
+ aContext argumentCount > 0 ifTrue:[
arg1 := aContext argAt:1.
"/ to avoid firing/waiting lazys or futures,
"/ and to avoid forwarding to bridges...