TimeDuration.st
changeset 19023 b2cd3ed0cb02
parent 19022 1d3173b3a291
child 19849 e989f43ce274
equal deleted inserted replaced
19022:1d3173b3a291 19023:b2cd3ed0cb02
   542 
   542 
   543     aTimeDurationOrNumberOfSeconds isNumber ifTrue:[
   543     aTimeDurationOrNumberOfSeconds isNumber ifTrue:[
   544         ^ self species basicNew 
   544         ^ self species basicNew 
   545             setMilliseconds:(self getMilliseconds / aTimeDurationOrNumberOfSeconds) asInteger
   545             setMilliseconds:(self getMilliseconds / aTimeDurationOrNumberOfSeconds) asInteger
   546     ].
   546     ].
   547     ^ (self getMilliseconds / aTimeDurationOrNumberOfSeconds getMilliseconds)
   547     aTimeDurationOrNumberOfSeconds isTimeDuration ifTrue:[
   548 
   548         ^ (self getMilliseconds / aTimeDurationOrNumberOfSeconds getMilliseconds)
       
   549     ].
       
   550     ^ aTimeDurationOrNumberOfSeconds quotientFromTimeDuration:self
       
   551     
   549     "
   552     "
   550      (TimeDuration fromString:'10s') / (TimeDuration fromString:'5s')
   553      (TimeDuration fromString:'10s') / (TimeDuration fromString:'5s')
   551      (TimeDuration fromString:'10s') / 5
   554      (TimeDuration fromString:'10s') / 5
   552     "
   555     "
   553 !
   556 !