#REFACTORING by exept
class: DataSetBuilder
changed:
#generatePrintSelectorIn: (send #argumentCount instead of #numArgs)
#generateReadSelectorIn: (send #argumentCount instead of #numArgs)
#generateWriteSelectorIn: (send #argumentCount instead of #numArgs)
--- a/DataSetBuilder.st Sun Sep 08 15:59:47 2019 +0200
+++ b/DataSetBuilder.st Sun Sep 08 16:04:31 2019 +0200
@@ -3246,7 +3246,7 @@
) ifTrue:[
|numArgs bcode keys|
bcode := sel asString.
- numArgs := sel numArgs.
+ numArgs := sel argumentCount.
numArgs ~~ 0 ifTrue:[
numArgs == 1 ifTrue:[
@@ -3287,7 +3287,7 @@
|selName|
selName := sel asString.
- sel numArgs == 0
+ sel argumentCount == 0
ifTrue: [bCode := selName, code]
ifFalse:[bCode := selName, 'anIndex\', code].
aColumn rendererType == #CheckToggle
@@ -3394,21 +3394,15 @@
, ' "set value"\'
.
- columns do:
- [:aColumn|
+ columns do:[:aColumn|
((sel := aColumn writeSelector) notNil
- and:[aColumn editorType ~~ #None
- and:[aColumn canSelect
- and:[(aClass includesSelector:sel) not]]])
- ifTrue:
- [
- sel numArgs == 1
- ifTrue:
- [
+ and:[aColumn editorType ~~ #None
+ and:[aColumn canSelect
+ and:[(aClass includesSelector:sel) not]]]
+ ) ifTrue: [
+ sel argumentCount == 1 ifTrue:[
bCode := sel asString
- ]
- ifFalse:
- [
+ ] ifFalse:[
sz := sel indexOf:$:.
bCode := sel copyTo:sz.
bCode := bCode, 'anIndex ', (sel copyFrom:sz + 1)