Delay.st
branchjv
changeset 17795 569eec7576f1
parent 17761 b0e5971141bc
child 17807 06cc6c49e291
equal deleted inserted replaced
17794:da075fbea903 17795:569eec7576f1
   226 waitForSeconds:aNumber
   226 waitForSeconds:aNumber
   227     "wait for the given number of seconds.
   227     "wait for the given number of seconds.
   228      This is a combined instance creation & wait."
   228      This is a combined instance creation & wait."
   229 
   229 
   230     ^ (self forSeconds:aNumber) wait
   230     ^ (self forSeconds:aNumber) wait
       
   231 !
       
   232 
       
   233 waitUntil:aTimestamp
       
   234     "wait until a given time is reached.
       
   235      This is a combined instance creation & wait."
       
   236 
       
   237     ^ (self until:aTimestamp) wait
       
   238 
       
   239     "Created: / 29-07-2010 / 13:51:41 / cg"
   231 ! !
   240 ! !
   232 
   241 
   233 !Delay methodsFor:'accessing'!
   242 !Delay methodsFor:'accessing'!
   234 
   243 
   235 delay:numberOfMillis
   244 delay:numberOfMillis
   332 ! !
   341 ! !
   333 
   342 
   334 !Delay class methodsFor:'documentation'!
   343 !Delay class methodsFor:'documentation'!
   335 
   344 
   336 version
   345 version
   337     ^ '$Id: Delay.st 10517 2010-04-26 18:26:38Z vranyj1 $'
   346     ^ '$Id: Delay.st 10564 2010-08-10 08:55:15Z vranyj1 $'
   338 !
   347 !
   339 
   348 
   340 version_SVN
   349 version_SVN
   341     ^ '$Id: Delay.st 10517 2010-04-26 18:26:38Z vranyj1 $'
   350     ^ '$Id: Delay.st 10564 2010-08-10 08:55:15Z vranyj1 $'
   342 ! !
   351 !
       
   352 
       
   353 version_CVS
       
   354     ^ '§Header: /cvs/stx/stx/libbasic/Delay.st,v 1.43 2010/08/02 14:02:50 cg Exp§'
       
   355 ! !
       
   356