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