[Newbies] Re: Proper fractions?

[Blake]

On Thu, 26 Jul 2007 18:01:37 -0700, Blake <blake at kingdomrpg.com> wrote:

>> Blake, if you actually want to make this work in your image, you could  
>> do this:
>>
>> Fraction>>printOn: aStream base: base
>> 	| int |
>> 	(int := self integerPart) = 0
>> 		ifTrue: [aStream nextPut: $(.
>> 			numerator printOn: aStream base: base.
>> 			aStream nextPut: $/.
>> 			denominator printOn: aStream base: base.
>> 			aStream nextPut: $)]
>> 		ifFalse: [aStream nextPut: $(.
>> 			int printOn: aStream base: base.
>> 			aStream nextPut: $+.
>> 			self fractionPart printOn: aStream base: base.
>> 			aStream nextPut: $)]
>>
>> (and delete Fraction>>printOn: which os redundant anyway)
>>
>> I can see how this would be helpful in debugging if you deal with  
>> fractions a lot.
>
> That's cool but I'm basically using the Fractions class for quick  
> double-checks of math with fractions, so I sit down at whatever machine  
> is handy, pull up Squeak and...
>
> (Not that I'd object to printOn being changed or anything; it's just  
> overkill.)

(Though I admit I put this in one of my images.)