FixedPoint.st
changeset 20414 5fbe8fc8d3a6
parent 19247 586d1013b1ac
child 20578 39641ba8d6e0
child 21633 991fc5368cac
equal deleted inserted replaced
20413:f3058cc528c2 20414:5fbe8fc8d3a6
   311      1 / self pi 
   311      1 / self pi 
   312      self pi * 1000000000000000000000000000000000000000000    
   312      self pi * 1000000000000000000000000000000000000000000    
   313     "
   313     "
   314 ! !
   314 ! !
   315 
   315 
   316 
       
   317 !FixedPoint class methodsFor:'printing control'!
   316 !FixedPoint class methodsFor:'printing control'!
   318 
   317 
   319 printTruncated
   318 printTruncated
   320     "return the PrintTruncated flag, which controls printing.
   319     "return the PrintTruncated flag, which controls printing.
   321      See the description in the documentation for details"
   320      See the description in the documentation for details"
   336     "return the character used to print between mantissa an exponent.
   335     "return the character used to print between mantissa an exponent.
   337      Also used by the scanner when reading numbers."
   336      Also used by the scanner when reading numbers."
   338 
   337 
   339     ^ $s
   338     ^ $s
   340 ! !
   339 ! !
   341 
       
   342 
   340 
   343 !FixedPoint methodsFor:'accessing'!
   341 !FixedPoint methodsFor:'accessing'!
   344 
   342 
   345 scale
   343 scale
   346     "return the number of places of significance that is carried by the receiver."
   344     "return the number of places of significance that is carried by the receiver."
   701 ! !
   699 ! !
   702 
   700 
   703 !FixedPoint methodsFor:'coercing & converting'!
   701 !FixedPoint methodsFor:'coercing & converting'!
   704 
   702 
   705 asFixedPoint
   703 asFixedPoint
   706     "return the receiver as a fixedPoint number - thats the receiver itself"
   704     "return the receiver as a fixedPoint number - that's the receiver itself"
   707 
   705 
   708     ^ self
   706     ^ self
   709 
   707 
   710     "Modified: 10.1.1997 / 19:53:14 / cg"
   708     "Modified: 10.1.1997 / 19:53:14 / cg"
   711 !
   709 !
  1321     scale := newScale.
  1319     scale := newScale.
  1322 
  1320 
  1323     "Modified: 12.4.1997 / 11:22:02 / cg"
  1321     "Modified: 12.4.1997 / 11:22:02 / cg"
  1324 ! !
  1322 ! !
  1325 
  1323 
  1326 
       
  1327 !FixedPoint methodsFor:'testing'!
  1324 !FixedPoint methodsFor:'testing'!
  1328 
  1325 
  1329 isFixedPoint
  1326 isFixedPoint
  1330     "return true, if the receiver is some kind of fixedPoint number;
  1327     "return true, if the receiver is some kind of fixedPoint number;
  1331      true is returned here - the method is redefined from Object."
  1328      true is returned here - the method is redefined from Object."