changeset 24283 | 797c465efa5c |
parent 24277 | 96315a6ab1f3 |
child 24289 | 59df64616ff0 |
--- a/LimitedPrecisionReal.st Fri Jun 07 02:34:58 2019 +0200 +++ b/LimitedPrecisionReal.st Fri Jun 07 02:35:08 2019 +0200 @@ -1092,6 +1092,12 @@ ^ LongFloat fromLimitedPrecisionReal:self ! +asQuadFloat + ^ QuadFloat fromLimitedPrecisionReal:self + + "Created: / 07-06-2019 / 02:30:07 / Claus Gittinger" +! + asRational "Answer a Rational number--Integer or Fraction--representing the receiver. Same as asFraction fro st-80 compatibility."