<br><br><div class="gmail_quote">On Sat, Mar 31, 2012 at 1:40 PM, Bert Freudenberg <span dir="ltr">&lt;<a href="mailto:bert@freudenbergs.de">bert@freudenbergs.de</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
We certainly do not want a hard dependency on Monticello classes in the System package, right?  So asMethodDefinition needs to go back into MC.<br></blockquote><div><br></div><div>Oops!</div><div> </div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<br>
- Bert -<br>
<br>
On 31.03.2012, at 21:38, <a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a> wrote:<br>
<br>
&gt; Eliot Miranda uploaded a new version of System to project The Trunk:<br>
&gt; <a href="http://source.squeak.org/trunk/System-eem.478.mcz" target="_blank">http://source.squeak.org/trunk/System-eem.478.mcz</a><br>
&gt;<br>
&gt; ==================== Summary ====================<br>
&gt;<br>
&gt; Name: System-eem.478<br>
&gt; Author: eem<br>
&gt; Time: 31 March 2012, 11:15:25.476 am<br>
&gt; UUID: 5c37a198-3967-401c-a501-57ffd35ad706<br>
&gt; Ancestors: System-ul.477<br>
&gt;<br>
&gt; Move generally useful parts of MethodReference into base<br>
&gt; System.<br>
&gt;<br>
&gt; =============== Diff against System-ul.477 ===============<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: ChangeRecord&gt;&gt;asMethodDefinition (in category &#39;converting&#39;) -----<br>
&gt; + asMethodDefinition<br>
&gt; +    ^ MCMethodDefinition<br>
&gt; +        className: class<br>
&gt; +        classIsMeta: meta<br>
&gt; +        selector: self methodSelector<br>
&gt; +        category: category<br>
&gt; +        timeStamp: stamp<br>
&gt; +        source: self string!<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: MethodReference&gt;&gt;asMethodDefinition (in category &#39;converting&#39;) -----<br>
&gt; + asMethodDefinition<br>
&gt; +    ^ MCMethodDefinition forMethodReference: self!<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: MethodReference&gt;&gt;compiledMethod (in category &#39;accessing&#39;) -----<br>
&gt; + compiledMethod<br>
&gt; +    ^ self actualClass compiledMethodAt: methodSymbol!<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: MethodReference&gt;&gt;source (in category &#39;accessing&#39;) -----<br>
&gt; + source<br>
&gt; +    ^ (self actualClass sourceCodeAt: methodSymbol) asString withSqueakLineEndings!<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: MethodReference&gt;&gt;sourceCode (in category &#39;accessing&#39;) -----<br>
&gt; + sourceCode<br>
&gt; +    ^ self actualClass sourceCodeAt: methodSymbol!<br>
&gt;<br>
&gt; Item was added:<br>
&gt; + ----- Method: MethodReference&gt;&gt;timeStamp (in category &#39;accessing&#39;) -----<br>
&gt; + timeStamp<br>
&gt; +    ^ self compiledMethod timeStamp!<br>
&gt;<br>
&gt;<br>
<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>best,<div>Eliot</div><br>