local function C(C)local s=C:s_szt()local p if s~=0 then p=(stm_string(C,s)):sub(1,-2)end return p end
-- string stm_lstring(Stream S)
-- @S - Stream object to read from
local function stm_lstring(S)
	local len = S:s_szt()
	local str

	if len ~= 0 then
		str = stm_string(S, len):sub(1, -2)
	end

	return str
end
