equal
deleted
inserted
replaced
1 "{ Encoding: utf8 }" |
|
2 |
|
3 " |
1 " |
4 COPYRIGHT (c) 2004 by eXept Software AG |
2 COPYRIGHT (c) 2004 by eXept Software AG |
5 All Rights Reserved |
3 All Rights Reserved |
6 |
4 |
7 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
283 aClass isLoaded ifFalse:[ |
281 aClass isLoaded ifFalse:[ |
284 "/ nm := nm,(' (?) ' colorizeAllWith:Color grey). |
282 "/ nm := nm,(' (?) ' colorizeAllWith:Color grey). |
285 ] ifTrue:[ |
283 ] ifTrue:[ |
286 aClass isAbstract ifTrue:[ nm := nm allItalic ]. |
284 aClass isAbstract ifTrue:[ nm := nm allItalic ]. |
287 nm := nm,((' (%1+%2) ' bindWith:(aClass methodDictionary size) with:(aClass class methodDictionary size)) |
285 nm := nm,((' (%1+%2) ' bindWith:(aClass methodDictionary size) with:(aClass class methodDictionary size)) |
288 colorizeAllWith:self class pseudoEntryForegroundColor). |
286 withColor:self class pseudoEntryForegroundColor). |
289 ]. |
287 ]. |
290 |
288 |
291 indent := 0. |
289 indent := 0. |
292 superClass := aClass superclass. |
290 superClass := aClass superclass. |
293 [superClass notNil] whileTrue:[ |
291 [superClass notNil] whileTrue:[ |
323 ! ! |
321 ! ! |
324 |
322 |
325 !HierarchicalClassList class methodsFor:'documentation'! |
323 !HierarchicalClassList class methodsFor:'documentation'! |
326 |
324 |
327 version |
325 version |
328 ^ '$Header: /cvs/stx/stx/libtool/Tools__HierarchicalClassList.st,v 1.17 2015-03-25 14:14:00 cg Exp $' |
326 ^ '$Header$' |
329 ! ! |
327 ! ! |
330 |
328 |
331 |
329 |
332 HierarchicalClassList initialize! |
330 HierarchicalClassList initialize! |