Musings about modularity and programming in the large
andreas.raab at gmx.de
Thu Jan 24 18:35:59 UTC 2008
Andreas Raab wrote:
> n := c := 0.
> Smalltalk allClassesDo:[:cls|
> n := n + 1.
> cls selectors isEmpty ifFalse:[c := c + 1].
> c asFloat / n asFloat.
Oops, how embarrassing. It should be "cls class selectors isEmpty" and
this reduces the number of classes that utilize their metaclass to
roughly 50% (which is still huge).
More information about the Squeak-dev