equal
deleted
inserted
replaced
508 aClass printClassVarNamesOn:aStream indent:16. |
508 aClass printClassVarNamesOn:aStream indent:16. |
509 syntaxHilighting ifTrue:[aStream normal]. |
509 syntaxHilighting ifTrue:[aStream normal]. |
510 aStream nextPutAll:''''. |
510 aStream nextPutAll:''''. |
511 |
511 |
512 aStream crtab. |
512 aStream crtab. |
513 aStream nextPutAll:'poolDictionaries:'''''. |
513 aStream nextPutAll:'poolDictionaries:'''. |
|
514 syntaxHilighting ifTrue:[aStream bold]. |
|
515 aClass printSharedPoolNamesOn:aStream indent:16. |
|
516 syntaxHilighting ifTrue:[aStream normal]. |
|
517 aStream nextPutAll:''''. |
514 |
518 |
515 aStream crtab. |
519 aStream crtab. |
516 owner isNil ifTrue:[ |
520 owner isNil ifTrue:[ |
517 "/ a public class |
521 "/ a public class |
518 aStream nextPutAll:'category:'. |
522 aStream nextPutAll:'category:'. |
787 ! ! |
791 ! ! |
788 |
792 |
789 !Metaclass class methodsFor:'documentation'! |
793 !Metaclass class methodsFor:'documentation'! |
790 |
794 |
791 version |
795 version |
792 ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.189 2004-03-30 18:53:26 cg Exp $' |
796 ^ '$Header: /cvs/stx/stx/libbasic/Metaclass.st,v 1.190 2004-09-20 08:47:54 ca Exp $' |
793 ! ! |
797 ! ! |
794 |
798 |
795 Metaclass initialize! |
799 Metaclass initialize! |