(errsafe (atomic (/ 1 0))) (= x 0) (thread (atomic (= x 1) (sleep .5) (= x 2))) (atomic:repeat 5 (prn x) (sleep .2)) 0 1 1 2 2 nil
-----