1 Object subclass:#Namespace

     2 	instanceVariableNames:''

     3 	classVariableNames:''

     4 	poolDictionaries:''

     5 	category:'System-Support'

     6 !

     7 

     8 

     9 !Namespace methodsFor:'enumeration'!

    10 

    11 allBehaviorsDo:aBlock

    12     self privateClassesDo:aBlock

    13 

    14     "Created: 26.10.1996 / 12:29:01 / cg"

    15 ! !

    16 

    17 !Namespace methodsFor:'queries'!

    18 

    19 isNamespace

    20     ^ true

    21 

    22     "Created: 26.10.1996 / 11:13:36 / cg"

    23 ! !

    24 

    25 !Namespace class methodsFor:'documentation'!

    26 

    27 version

    28     ^ '$Header: /cvs/stx/stx/libbasic/NameSpace.st,v 1.1 1996-10-26 13:21:31 cg Exp $'

    29 ! !