Hi!
There is the following method in Moose:
-=-=-=-=-=-=-=-=-=-=-=-=
MooseModel>>numberOfPackages
<MSEProperty: #numberOfPackages type: #Number>
<MSEComment: 'Total number of packages'>
^ self isSmalltalk
ifTrue: [self privateState propertyAt: #numberOfPackages ifAbsentPut: [self allPackages
size].]
ifFalse: [self privateState propertyAt: #numberOfPackages ifAbsentPut: [self
allNamespaces size].].
-=-=-=-=-=-=-=-=-=-=-=-=
The fact this method is defined in MooseModel seems quite wrong to me. Why should this
method be in that class? #numberOfClasses is defined somewhere else.
I now have a moose model that contains profiling data, and the notion of package is
meaningless in my context.
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.