Class Fraction
back
addToSmallInt: arg
^ (Fraction top: arg) + self