An implementation of the exponential backoff algorithm in Common Lisp