(let ((ta (table)))
  (time (dotimes (i 2000000)
          (put! ta (rand) (rand)))))