So add isLargeInteger to Number and LargePosiitveInteger and LargeNegativeInteger and use that instead.  It may even be faster ;)<br><br><div class="gmail_quote">On Tue, Jul 12, 2011 at 8:05 AM, Chris Muller <span dir="ltr">&lt;<a href="mailto:asqueaker@gmail.com">asqueaker@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;">I need to test it, but this looks like it will hurt me.  I have<br>
subclassed LargePositiveInteger but I need it to compare equally - but<br>
with this hard class-check it will now fail....<br>
<div><div></div><div class="h5"><br>
On Sun, Jul 10, 2011 at 9:36 AM,  &lt;<a href="mailto:commits@source.squeak.org">commits@source.squeak.org</a>&gt; wrote:<br>
&gt; Levente Uzonyi uploaded a new version of Kernel to project The Trunk:<br>
&gt; <a href="http://source.squeak.org/trunk/Kernel-ul.604.mcz" target="_blank">http://source.squeak.org/trunk/Kernel-ul.604.mcz</a><br>
&gt;<br>
&gt; ==================== Summary ====================<br>
&gt;<br>
&gt; Name: Kernel-ul.604<br>
&gt; Author: ul<br>
&gt; Time: 10 July 2011, 4:36:20.467 pm<br>
&gt; UUID: f758876f-a507-404b-aa2f-2c1038504b48<br>
&gt; Ancestors: Kernel-bf.603<br>
&gt;<br>
&gt; Optimized Integer &gt;&gt; #= for integer-integer comparisons. Return false for integers from different classes without further checking.<br>
&gt;<br>
&gt; =============== Diff against Kernel-bf.603 ===============<br>
&gt;<br>
&gt; Item was changed:<br>
&gt;  ----- Method: Integer&gt;&gt;= (in category &#39;comparing&#39;) -----<br>
&gt;  = aNumber<br>
&gt; +<br>
&gt; +       aNumber isInteger ifTrue: [<br>
&gt; +               aNumber class == self class ifFalse: [ ^false ].<br>
&gt; +               ^(self digitCompare: aNumber) = 0 ].<br>
&gt; +       aNumber isNumber ifFalse: [ ^false ].<br>
&gt; +       ^aNumber adaptToInteger: self andCompare: #=!<br>
&gt; -       aNumber isNumber ifFalse: [^ false].<br>
&gt; -       aNumber isInteger ifTrue:<br>
&gt; -               [aNumber negative == self negative<br>
&gt; -                       ifTrue: [^ (self digitCompare: aNumber) = 0]<br>
&gt; -                       ifFalse: [^ false]].<br>
&gt; -       ^ aNumber adaptToInteger: self andCompare: #=!<br>
&gt;<br>
&gt;<br>
&gt;<br>
<br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>best,<div>Eliot</div><br>