equal
deleted
inserted
replaced
128 ^ (idCache keys contains: block) ifTrue: [trueBlock value] ifFalse: [falseBlock value] |
128 ^ (idCache keys contains: block) ifTrue: [trueBlock value] ifFalse: [falseBlock value] |
129 ! |
129 ! |
130 |
130 |
131 numericIdFor: object |
131 numericIdFor: object |
132 self assert: object isSymbol. |
132 self assert: object isSymbol. |
133 ^ numericIdCache at: object ifAbsentPut: [ |
133 ^ numericIdCache at: object ifAbsentPut: [ numericIdCache size + 1 ] |
134 numericIdCache at: object put: (numericIdCache size) + 1 |
134 |
135 ] |
135 "Modified: / 17-08-2015 / 22:55:45 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
136 ! ! |
136 ! ! |
137 |
137 |
138 !PPCIdGenerator methodsFor:'initialization'! |
138 !PPCIdGenerator methodsFor:'initialization'! |
139 |
139 |
140 initialize |
140 initialize |