| Authors: | Doug Coleman | 
| Class | Superclass | Slots | 
  counted-retries |   retries | max-retries | 
  exponential-wait |   time-strategy | exp nanos | 
  immediate |   time-strategy | |
  random-wait |   time-strategy | lo hi | 
  retries |   tuple | count time-strategy errors | 
  retries-failed |   tuple | retries quot | 
  sequence-retries |   retries | seq | 
  time-strategy |   tuple | 
| Word | Stack effect | 
  retries* | ( time-strategy seq/n -- obj ) | 
  retry-obj | ( retries -- elt/obj/index retry? ) | 
  retry-sleep-time | ( retries time-strategy -- nanos/timestamp/0 ) | 
  current-retries | 
| Word | Stack effect | 
  <counted-retries> | ( time-strategy max-retries -- retries ) | 
  <exponential-wait> | ( exp nanos -- exponential-wait ) | 
  <immediate> | ( -- immediate ) | 
  <random-wait> | ( lo hi -- random-wait ) | 
  <sequence-retries> | ( time-strategy seq -- retries ) | 
  new-retries | ( class -- obj ) | 
  next-retry | ( retries -- elt/obj/index nanos/timestamp/0 ? ) | 
  nth* | ( n seq -- elt/f ? ) | 
  retries | ( quot time-strategy n/seq -- result ) | 
  retries-failed | ( retries quot -- * ) | 
  with-retries | ( retries quot -- result ) | 
| Word | Stack effect | 
  counted-retries? | ( object -- ? ) | 
  exponential-wait? | ( object -- ? ) | 
  immediate? | ( object -- ? ) | 
  random-wait? | ( object -- ? ) | 
  retries-failed? | ( object -- ? ) | 
  retries? | ( object -- ? ) | 
  sequence-retries? | ( object -- ? ) | 
  time-strategy? | ( object -- ? ) |