equal
deleted
inserted
replaced
81 |
81 |
82 values |
82 values |
83 ^ Array streamContents: [:s | self do: [:ea | s nextPut: ea]] |
83 ^ Array streamContents: [:s | self do: [:ea | s nextPut: ea]] |
84 ! ! |
84 ! ! |
85 |
85 |
86 !TSTree methodsFor:'as yet unclassified'! |
86 !TSTree methodsFor:'enumerating'! |
|
87 |
|
88 do: aBlock |
|
89 root notNil ifTrue: [root do: aBlock] |
|
90 |
|
91 "Modified: / 08-08-2010 / 15:16:53 / cg" |
|
92 ! ! |
|
93 |
|
94 !TSTree methodsFor:'searching'! |
87 |
95 |
88 matchesForPrefix: aString |
96 matchesForPrefix: aString |
89 ^ Array streamContents: |
97 ^ Array streamContents: |
90 [:s | |
98 [:s | |
91 self matchesForPrefix: aString do: |
99 self matchesForPrefix: aString do: |
122 [:ea | |
130 [:ea | |
123 nodeCount _ nodeCount + 1. |
131 nodeCount _ nodeCount + 1. |
124 nodeCount = maxNodes ifTrue: [^ self]] |
132 nodeCount = maxNodes ifTrue: [^ self]] |
125 ! ! |
133 ! ! |
126 |
134 |
127 !TSTree methodsFor:'enumerating'! |
135 !TSTree methodsFor:'testing'! |
128 |
136 |
129 do: aBlock |
137 isFixedSize |
130 root notNil ifTrue: [root do: aBlock] |
138 "return true if the receiver cannot grow" |
131 |
139 |
132 "Modified: / 08-08-2010 / 15:16:53 / cg" |
140 ^ false |
133 ! ! |
141 ! ! |
134 |
142 |
135 !TSTree::TSTreeNode class methodsFor:'as yet unclassified'! |
143 !TSTree::TSTreeNode class methodsFor:'as yet unclassified'! |
136 |
144 |
137 key: aCharacter |
145 key: aCharacter |
292 ! ! |
300 ! ! |
293 |
301 |
294 !TSTree class methodsFor:'documentation'! |
302 !TSTree class methodsFor:'documentation'! |
295 |
303 |
296 version_CVS |
304 version_CVS |
297 ^ '$Header: /cvs/stx/stx/libbasic2/TSTree.st,v 1.3 2012-08-05 09:28:50 cg Exp $' |
305 ^ '$Header: /cvs/stx/stx/libbasic2/TSTree.st,v 1.4 2013-06-25 11:22:58 cg Exp $' |
298 ! ! |
306 ! ! |
|
307 |