ref: bfe38a2454609a60bffe2f59340b075faeca7c4d dir: /test/tme.lsp/
(let ((ta (table))) (time (dotimes (i 2000000) (put! ta (rand) (rand)))))