use cl-do instead of do
Merge branch 'tarsius/cl-lib' into next