<br><br><div class="gmail_quote">On Tue, May 21, 2013 at 2:53 PM, Eliot Miranda <span dir="ltr">&lt;<a href="mailto:eliot.miranda@gmail.com" target="_blank">eliot.miranda@gmail.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<br><br><div class="gmail_quote"><div><div class="h5">On Tue, May 21, 2013 at 2:40 PM, Frank Shearar <span dir="ltr">&lt;<a href="mailto:frank.shearar@gmail.com" target="_blank">frank.shearar@gmail.com</a>&gt;</span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
allMethodsSelect: aBlock localTo: aClass<br>
    &quot;Answer a SortedCollection of each methodr in, above, or below the given<br>
    class that, when used as the argument to aBlock, gives a true result.&quot;<br>
<br>
    | aSet |<br>
    aSet := Set new.<br>
    Cursor wait showWhile:<br>
        [aClass theNonMetaClass withAllSuperAndSubclassesDoGently:<br>
            [:class |<br>
                class selectorsAndMethodsDo:<br>
                    [:aSelector :aMethod|<br>
                        (aBlock value: aMethod) ifTrue:<br>
                            [aSet add: (MethodReference new<br>
setStandardClass: class methodSymbol: aSelector)]]].<br>
        aClass theNonMetaClass class withAllSuperAndSubclassesDoGently:<br>
            [:class |<br>
                class selectorsAndMethodsDo:<br>
                    [:aSelector :aMethod|<br>
                        (aBlock value: aMethod) ifTrue:<br>
                            [aSet add: (MethodReference new<br>
setStandardClass: class methodSymbol: aSelector)]]]].<br>
    ^aSet<br>
<br>
Um. That is just an accidental duplication of the aClass<br>
theNonMetaClass class withAllSuperAndSubclassesDoGently: block, right?<br></blockquote><div><br></div></div></div><div>No, it&#39;s not :)  It&#39;s preserving existing behavior, which is to search class and instance side.  Note that</div>

<div><br></div><div> aClass theNonMetaClass withAllSuperAndSubclassesDoGently:</div><div>    [:class|</div><div>    {class. class class} do: aBlock</div><div><br></div><div>is not equivalent to </div><div><br></div><div>
    aClass theNonMetaClass withAllSuperAndSubclassesDoGently: aBlock</div>
<div>    aClass theNonMetaClass class withAllSuperAndSubclassesDoGently: aBlock</div><div><br></div><div>because the latter searches Behavior, ClassDescription, Class etc, while the former doesn&#39;t.</div></div></blockquote>
<div><br></div><div>and just to be clear, I&#39;m not claiming one way is better or not.</div></div>-- <br>best,<div>Eliot</div>