6 lines
172 B
Smalltalk
6 lines
172 B
Smalltalk
|
accessing
|
||
|
|
abilities
|
||
|
|
^ abilities ifNil: [ abilities := Dictionary new
|
||
|
|
at: 'enabled' put: OrderedCollection new;
|
||
|
|
at: 'disabled' put: OrderedCollection new;
|
||
|
|
yourself ]
|