Float.st
changeset 5238 f7a816a660a3
parent 5120 13143fbcbdf8
child 5317 6004c4c2a916
equal deleted inserted replaced
5237:ac92ad320972 5238:f7a816a660a3
   728     Float storeBinaryIEEEDouble:self on:stream.
   728     Float storeBinaryIEEEDouble:self on:stream.
   729 
   729 
   730     "Modified: 23.4.1996 / 09:29:48 / cg"
   730     "Modified: 23.4.1996 / 09:29:48 / cg"
   731 ! !
   731 ! !
   732 
   732 
   733 !Float methodsFor:'coercion and converting'!
   733 !Float methodsFor:'coercing & converting'!
   734 
   734 
   735 asDouble
   735 asDouble
   736     "ST80 compatibility: return a float with same value - thats me"
   736     "ST80 compatibility: return a float with same value - thats me"
   737 
   737 
   738     ^ self
   738     ^ self
  2028 ! !
  2028 ! !
  2029 
  2029 
  2030 !Float class methodsFor:'documentation'!
  2030 !Float class methodsFor:'documentation'!
  2031 
  2031 
  2032 version
  2032 version
  2033     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.105 1999-12-17 11:35:53 cg Exp $'
  2033     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.106 2000-02-07 11:29:37 cg Exp $'
  2034 ! !
  2034 ! !
  2035 Float initialize!
  2035 Float initialize!