13 Aug
2014
13 Aug
'14
3:59 p.m.
Hi!
I am thinking about extending FAMIXClass with the following:
withAllSuperclasses ^ self superclassHierarchyGroup
isPharoTest ^ self superclassHierarchyGroup anySatisfy: [ :c | c name = 'TestCase’ ]
Does this makes sense?
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.