TimeDuration.st
changeset 16506 807967e48cf6
parent 16479 9c0562f22996
child 16830 1d5965daab9a
equal deleted inserted replaced
16505:c285d94f2248 16506:807967e48cf6
   562         setMilliseconds:(self getMilliseconds * aNumber) asInteger
   562         setMilliseconds:(self getMilliseconds * aNumber) asInteger
   563 
   563 
   564     "
   564     "
   565      (TimeDuration fromString:'10s') * 5
   565      (TimeDuration fromString:'10s') * 5
   566     "
   566     "
   567 !
       
   568 
       
   569 roundTo:aTimeDuration
       
   570      ^ self class new timeEncoding:(timeEncoding roundTo:aTimeDuration timeEncoding)
       
   571 
       
   572     "
       
   573       (TimeDuration fromMilliseconds:25234) roundTo:(TimeDuration fromSeconds:2)
       
   574     "
       
   575 ! !
   567 ! !
   576 
   568 
   577 !TimeDuration methodsFor:'converting'!
   569 !TimeDuration methodsFor:'converting'!
   578 
   570 
   579 asFixedPoint
   571 asFixedPoint
  1147 ! !
  1139 ! !
  1148 
  1140 
  1149 !TimeDuration class methodsFor:'documentation'!
  1141 !TimeDuration class methodsFor:'documentation'!
  1150 
  1142 
  1151 version
  1143 version
  1152     ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.70 2014-05-21 19:22:26 stefan Exp $'
  1144     ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.71 2014-05-30 08:37:37 stefan Exp $'
  1153 !
  1145 !
  1154 
  1146 
  1155 version_CVS
  1147 version_CVS
  1156     ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.70 2014-05-21 19:22:26 stefan Exp $'
  1148     ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.71 2014-05-30 08:37:37 stefan Exp $'
  1157 ! !
  1149 ! !
  1158 
  1150 
  1159 
  1151 
  1160 TimeDuration initialize!
  1152 TimeDuration initialize!