TK_DO
checknext(ls, TK_DO);
case TK_DO: { /* stat -> DO block END */
check_match(ls, TK_END, TK_DO, line);