Function: cl-expand-do-loop

(fn STEPS ENDTEST BODY STAR)