\def\loop#l\repeat{\def\body{#l}\iterate}
\def\iterate{\body\let\next=\iterate\else\let\next=\relax\fi\next}