function luaY.breakstat(T,Q)local S=Q.fs local w=S.bl local t=false while w and not w.isbreakable do if w.upval then t=true end w=w.previous end if not w then luaX:syntaxerror(Q,"\110\111 \108\111\111\112 \116\111 \098\114\101\097\107")end if t then luaK:codeABC(S,"\079\080\095\067\076\079\083\069",w.nactvar,0,0)end w.breaklist=luaK:concat(S,w.breaklist,luaK:jump(S))end
------------------------------------------------------------------------
-- parse a break statement
-- * used in statements()
------------------------------------------------------------------------
function luaY:breakstat(ls)
	-- stat -> BREAK
	local fs = ls.fs
	local bl = fs.bl
	local upval = false
	while bl and not bl.isbreakable do
		if bl.upval then
			upval = true
		end
		bl = bl.previous
	end
	if not bl then
		luaX:syntaxerror(ls, "no loop to break")
	end
	if upval then
		luaK:codeABC(fs, "OP_CLOSE", bl.nactvar, 0, 0)
	end
	bl.breaklist = luaK:concat(fs, bl.breaklist, luaK:jump(fs))
end
