How do I find which classes use traits?

Q How do I find which classes use traits?
A Smalltalk allClasses select: [:each | each hasTraitComposition ]
Last changed by admin on 21 April 2009