local function k(k)local t=k.index local i=string.byte(k.source,t,t)k.index=t+1 return i end
-- byte stm_byte(Stream S)
-- @S - Stream object to read from
local function stm_byte(S)
	local idx = S.index
	local bt = string.byte(S.source, idx, idx)

	S.index = idx + 1
	return bt
end
