equal
deleted
inserted
replaced
18 ! |
18 ! |
19 |
19 |
20 LinkedList comment:' |
20 LinkedList comment:' |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
21 COPYRIGHT (c) 1989 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
|
23 |
|
24 $Header: /cvs/stx/stx/libbasic/LinkedList.st,v 1.8 1994-08-05 00:58:53 claus Exp $ |
23 '! |
25 '! |
24 |
26 |
25 !LinkedList class methodsFor:'documentation'! |
27 !LinkedList class methodsFor:'documentation'! |
26 |
28 |
27 copyright |
29 copyright |
38 " |
40 " |
39 ! |
41 ! |
40 |
42 |
41 version |
43 version |
42 " |
44 " |
43 $Header: /cvs/stx/stx/libbasic/LinkedList.st,v 1.7 1994-06-02 16:20:47 claus Exp $ |
45 $Header: /cvs/stx/stx/libbasic/LinkedList.st,v 1.8 1994-08-05 00:58:53 claus Exp $ |
44 " |
46 " |
45 ! |
47 ! |
46 |
48 |
47 documentation |
49 documentation |
48 " |
50 " |
100 |
102 |
101 last |
103 last |
102 "return last node in the list" |
104 "return last node in the list" |
103 |
105 |
104 ^ lastLink |
106 ^ lastLink |
105 ! |
107 ! ! |
|
108 |
|
109 !LinkedList methodsFor:'queries'! |
|
110 |
106 |
111 |
107 size |
112 size |
108 "return the size of the LinkedList i.e. the number of nodes" |
113 "return the size of the LinkedList i.e. the number of nodes" |
109 |
114 |
110 ^ numberOfNodes |
115 ^ numberOfNodes |
|
116 ! |
|
117 |
|
118 isEmpty |
|
119 "return true, if the collection is empty" |
|
120 |
|
121 ^ firstLink isNil |
111 ! ! |
122 ! ! |
112 |
123 |
113 !LinkedList methodsFor:'testing'! |
124 !LinkedList methodsFor:'testing'! |
114 |
125 |
115 includes:anObject |
126 includes:anObject |