Replaced TAGBODY by LOOP in ALTERNATIVE and CONSECUTIVE.