equal
deleted
inserted
replaced
108 |
108 |
109 "Created: 3.1.1997 / 15:05:48 / cg" |
109 "Created: 3.1.1997 / 15:05:48 / cg" |
110 "Modified: 3.1.1997 / 15:06:15 / cg" |
110 "Modified: 3.1.1997 / 15:06:15 / cg" |
111 ! ! |
111 ! ! |
112 |
112 |
|
113 |
113 !UndefinedObject class methodsFor:'queries'! |
114 !UndefinedObject class methodsFor:'queries'! |
114 |
115 |
115 canBeSubclassed |
116 canBeSubclassed |
116 "return true, if its allowed to create subclasses of the receiver. |
117 "return true, if its allowed to create subclasses of the receiver. |
117 Return false here - since it is NOT possible for UndefinedObject. |
118 Return false here - since it is NOT possible for UndefinedObject. |
154 ! ! |
155 ! ! |
155 |
156 |
156 |
157 |
157 |
158 |
158 |
159 |
|
160 !UndefinedObject methodsFor:'Compatibility-Squeak'! |
|
161 |
|
162 subclass:nameSymbol instanceVariableNames:instVarNameString classVariableNames:classVarString category:cat |
|
163 ^ self subclass:nameSymbol instanceVariableNames:instVarNameString classVariableNames:classVarString poolDictionaries: '' category:cat |
|
164 |
|
165 "Created: / 24-07-2015 / 19:29:19 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
166 ! ! |
|
167 |
|
168 |
|
169 |
159 !UndefinedObject methodsFor:'converting'! |
170 !UndefinedObject methodsFor:'converting'! |
160 |
171 |
161 asBoolean |
172 asBoolean |
162 ^ false |
173 ^ false |
163 ! |
174 ! |
296 "return the number of indexed instvars |
307 "return the number of indexed instvars |
297 defined here since size in Object ommits the nil-check" |
308 defined here since size in Object ommits the nil-check" |
298 |
309 |
299 ^ 0 |
310 ^ 0 |
300 ! ! |
311 ! ! |
301 |
|
302 |
312 |
303 !UndefinedObject methodsFor:'subclass creation'! |
313 !UndefinedObject methodsFor:'subclass creation'! |
304 |
314 |
305 nilSubclass:action |
315 nilSubclass:action |
306 "common helper for subclass creation. |
316 "common helper for subclass creation. |
727 "dispatch for visitor pattern; send #visitNil:with: to aVisitor." |
737 "dispatch for visitor pattern; send #visitNil:with: to aVisitor." |
728 |
738 |
729 ^ aVisitor visitNilWith:aParameter |
739 ^ aVisitor visitNilWith:aParameter |
730 ! ! |
740 ! ! |
731 |
741 |
|
742 |
732 !UndefinedObject class methodsFor:'documentation'! |
743 !UndefinedObject class methodsFor:'documentation'! |
733 |
744 |
734 version |
745 version |
735 ^ '$Header$' |
746 ^ '$Header$' |
736 ! |
747 ! |