equal
deleted
inserted
replaced
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 "{ Package: 'stx:libbasic2' }" |
12 "{ Package: 'stx:libbasic2' }" |
13 |
13 |
|
14 "{ NameSpace: Smalltalk }" |
|
15 |
14 BinaryTreeNode subclass:#AATreeNode |
16 BinaryTreeNode subclass:#AATreeNode |
15 instanceVariableNames:'level' |
17 instanceVariableNames:'level' |
16 classVariableNames:'' |
18 classVariableNames:'' |
17 poolDictionaries:'' |
19 poolDictionaries:'' |
18 category:'Collections-Ordered-Trees' |
20 category:'Collections-Ordered-Trees' |
48 ^ self basicNew data:dataArg level:levelArg |
50 ^ self basicNew data:dataArg level:levelArg |
49 ! ! |
51 ! ! |
50 |
52 |
51 !AATreeNode methodsFor:'accessing'! |
53 !AATreeNode methodsFor:'accessing'! |
52 |
54 |
53 data:dataArg level:levelArg |
55 data:dataArg level:levelIntegerArg |
54 data := dataArg. |
56 data := dataArg. |
55 level := levelArg. |
57 level := levelIntegerArg. |
56 ! |
58 ! |
57 |
59 |
58 level |
60 level |
59 ^ level |
61 ^ level |
60 ! |
62 ! |
61 |
63 |
62 level:something |
64 level:anInteger |
63 level := something. |
65 level := anInteger. |
64 ! ! |
66 ! ! |
65 |
67 |
66 !AATreeNode methodsFor:'helpers'! |
68 !AATreeNode methodsFor:'helpers'! |
67 |
69 |
68 decrease_level |
70 decrease_level |
311 ! ! |
313 ! ! |
312 |
314 |
313 !AATreeNode class methodsFor:'documentation'! |
315 !AATreeNode class methodsFor:'documentation'! |
314 |
316 |
315 version |
317 version |
316 ^ '$Header: /cvs/stx/stx/libbasic2/AATreeNode.st,v 1.7 2013-12-16 13:34:22 cg Exp $' |
318 ^ '$Header$' |
317 ! |
319 ! |
318 |
320 |
319 version_CVS |
321 version_CVS |
320 ^ '$Header: /cvs/stx/stx/libbasic2/AATreeNode.st,v 1.7 2013-12-16 13:34:22 cg Exp $' |
322 ^ '$Header$' |
321 ! ! |
323 ! ! |
322 |
324 |