253
253
[:TkWHILE, TkKW, "while", EXPR_BEG, :TkWHILE_MOD],
254
254
[:TkUNTIL, TkKW, "until", EXPR_BEG, :TkUNTIL_MOD],
255
255
[:TkFOR, TkKW, "for", EXPR_BEG],
256
[:TkBREAK, TkKW, "break", EXPR_END],
256
[:TkBREAK, TkKW, "break", EXPR_MID],
257
257
[:TkNEXT, TkKW, "next", EXPR_END],
258
258
[:TkREDO, TkKW, "redo", EXPR_END],
259
259
[:TkRETRY, TkKW, "retry", EXPR_END],