SFloat.st
changeset 4615 e480d1e6090f
parent 4594 eb09f567a3bc
child 4637 814b3d8e3f72
equal deleted inserted replaced
4614:14d5ce4bf117 4615:e480d1e6090f
   479     "return a ShortFloat with same value as the receiver - thats me"
   479     "return a ShortFloat with same value as the receiver - thats me"
   480 
   480 
   481     ^ self
   481     ^ self
   482 !
   482 !
   483 
   483 
       
   484 asTrueFraction
       
   485     "return a fraction with same value as the receiver"
       
   486 
       
   487     ^ self asFloat asTrueFraction
       
   488 !
       
   489 
   484 generality
   490 generality
   485     "return the generality value - see ArithmeticValue>>retry:coercing:"
   491     "return the generality value - see ArithmeticValue>>retry:coercing:"
   486 
   492 
   487     ^ 70
   493     ^ 70
   488 
   494 
   956 ! !
   962 ! !
   957 
   963 
   958 !ShortFloat class methodsFor:'documentation'!
   964 !ShortFloat class methodsFor:'documentation'!
   959 
   965 
   960 version
   966 version
   961     ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.51 1999-08-12 08:58:36 cg Exp $'
   967     ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.52 1999-08-19 01:19:54 cg Exp $'
   962 ! !
   968 ! !