[Ecls-list] Bug in loop macro

[Ralph Campbell]

I see examples in Guy Steele's "Common Lisp the Language"
the the following should be OK:

(loop
  until x
  for y = (list ...)
  ...
  )

Yet when this is loaded or compiled,
I get "Iteration in LOOP follows body code."

This seems to be the result of #'loop-do-while calling
#'loop-emit-body in src/lsp/loop2.lsp.

I'm not sure what the fix is but I do have code similar
to this which runs in other Lisp implementations.