Float.st
changeset 18300 5b641d73fc8c
parent 18299 74723837b0ac
child 18301 d0a478542bbf
child 18492 eca396c81443
equal deleted inserted replaced
18299:74723837b0ac 18300:5b641d73fc8c
  3249      It may be useful, if the result is to be further used in another
  3249      It may be useful, if the result is to be further used in another
  3250      float-operation."
  3250      float-operation."
  3251 
  3251 
  3252 %{  /* NOCONTEXT */
  3252 %{  /* NOCONTEXT */
  3253 #ifdef __SCHTEAM__
  3253 #ifdef __SCHTEAM__
  3254     return context._RETURN( self.truncate() );
  3254     return context._RETURN( self.truncated() );
  3255 #else
  3255 #else
  3256     double dVal;
  3256     double dVal;
  3257     OBJ v;
  3257     OBJ v;
  3258 
  3258 
  3259     dVal = __floatVal(self);
  3259     dVal = __floatVal(self);
  3277 ! !
  3277 ! !
  3278 
  3278 
  3279 !Float class methodsFor:'documentation'!
  3279 !Float class methodsFor:'documentation'!
  3280 
  3280 
  3281 version
  3281 version
  3282     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.216 2015-04-27 17:24:40 cg Exp $'
  3282     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.217 2015-04-27 17:28:58 cg Exp $'
  3283 !
  3283 !
  3284 
  3284 
  3285 version_CVS
  3285 version_CVS
  3286     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.216 2015-04-27 17:24:40 cg Exp $'
  3286     ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.217 2015-04-27 17:28:58 cg Exp $'
  3287 ! !
  3287 ! !
  3288 
  3288 
  3289 
  3289 
  3290 Float initialize!
  3290 Float initialize!