equal
deleted
inserted
replaced
335 ]. |
335 ]. |
336 |
336 |
337 ^ cat |
337 ^ cat |
338 ! |
338 ! |
339 |
339 |
|
340 subclass:nm classInstanceVariableNames:cIV instanceVariableNames:iV classVariableNames:cV poolDictionaries:p |
|
341 "{ Pragma: +optSpace }" |
|
342 |
|
343 "this method allows fileIn of V'Age classes" |
|
344 |
|
345 ^ self |
|
346 subclass:nm |
|
347 instanceVariableNames:iV |
|
348 classVariableNames:cV |
|
349 poolDictionaries:p |
|
350 category:(self defaultCategoryForSTVorVAGEClasses) |
|
351 classInstanceVariableNames:cIV |
|
352 ! |
|
353 |
340 subclass:t instanceVariableNames:f classVariableNames:d poolDictionaries:s |
354 subclass:t instanceVariableNames:f classVariableNames:d poolDictionaries:s |
341 "{ Pragma: +optSpace }" |
355 "{ Pragma: +optSpace }" |
342 |
356 |
343 "this method allows fileIn of ST/V and V'Age classes |
357 "this method allows fileIn of ST/V and V'Age classes |
344 (which seem to have no category)" |
358 (which seem to have no category)" |
345 |
359 |
346 ^ self subclass:t |
360 ^ self |
|
361 subclass:t |
347 instanceVariableNames:f |
362 instanceVariableNames:f |
348 classVariableNames:d |
363 classVariableNames:d |
349 poolDictionaries:s |
364 poolDictionaries:s |
350 category:(self defaultCategoryForSTVorVAGEClasses) |
365 category:(self defaultCategoryForSTVorVAGEClasses) |
351 |
366 |
4918 ! ! |
4933 ! ! |
4919 |
4934 |
4920 !Class class methodsFor:'documentation'! |
4935 !Class class methodsFor:'documentation'! |
4921 |
4936 |
4922 version |
4937 version |
4923 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.489 2006-01-17 12:18:40 cg Exp $' |
4938 ^ '$Header: /cvs/stx/stx/libbasic/Class.st,v 1.490 2006-02-21 16:52:07 cg Exp $' |
4924 ! ! |
4939 ! ! |