Novel form of refactoring
Marcus Denker
marcus at ira.uka.de
Fri Oct 24 21:03:27 UTC 2003
On Fri, Oct 24, 2003 at 12:12:15PM -0700, Eric Merritt wrote:
> > class := Smalltalk allClasses atRandom.
> > Browser fullOnClass: class selector: (class
> > methodDict keys atRandom).
>
> Thats it, more or less, amazing difference in code
> size isn't it.
>
Yes, but it doesn't do any error checks: "class methodDict" could
be empty. For a demo it should be enough to do
[
class := Smalltalk allClasses atRandom.
Browser fullOnClass: class selector: (class methodDict keys atRandom]
] on: Error do: [:e | e retry]
but "on: Error do: [:e | e retry]" isn't a good idea for production code,
really not ;-))
Marcus
--
Marcus Denker marcus at ira.uka.de -- Squeak! http://squeak.de
More information about the Squeak-dev
mailing list
|