assets/oldmodels/trackvertical1.b3d

-- Minetest: builtin/misc_helpers.lua

--------------------------------------------------------------------------------
function basic_dump(o)
	local tp = type(o)
	if tp == "number" then
		return tostring(o)
	elseif tp == "string" then
		return string.format("%q", o)
	elseif tp == "boolean" then
		return tostring(o)
	elseif tp == "nil" then
		return "nil"
	-- Uncomment for full function dumping support.
	-- Not currently enabled because bytecode isn't very human-readable and
	-- dump's output is intended for humans.
	--elseif tp == "function" then
	--	return string.format("loadstring(%q)", string.dump(o))
	else
		return string.format("<%s>", tp)
	end
end

local keywords = {
	["and"] = true,
	["break"] = true,
	["do"] = true,
	["else"] = true,
	["elseif"] = true,
	["end"] = true,
	["false"] = true,
	["for"] = true,
	["function"] = true,
	["goto"] = true,  -- Lua 5.2
	["if"] = true,
	["in"] = true,
	["local"] = true,
	["nil"] = true,
	["not"] = true,
	["or"] = true,
	["repeat"] = true,
	["return"] = true,
	["then"] = true,
	["true"] = true,
	["until"] = true,
	["while"] = true,
}
local function is_valid_identifier(str)
	if not str:find("^[a-zA-Z_][a-zA-Z0-9_]*$") or keywords[str] then
		return false
	end
	return true
end

--------------------------------------------------------------------------------
-- Dumps values in a line-per-value format.
-- For example, {test = {"Testing..."}} becomes:
--   _["test"] = {}
--   _["test"][1] = "Testing..."
-- This handles tables as keys and circular references properly.
-- It also handles multiple references well, writing the table only once.
-- The dumped argument is internal-only.

function dump2(o, name, dumped)
	name = name or "_"
	-- "dumped" is used to keep track of serialized tables to handle
	-- multiple references and circular tables properly.
	-- It only contains tables as keys.  The value is the name that
	-- the table has in the dump, eg:
	-- {x = {"y"}} -> dumped[{"y"}] = '_["x"]'
	dumped = dumped or {}
	if type(o) ~= "table" then
		return string.format("%s = %s\n", name, basic_dump(o))
	end
	if dumped[o] then
		return string.format("%s = %s\n", name, dumped[o])
	end
	dumped[o] = name
	-- This contains a list of strings to be concatenated later (because
	-- Lua is slow at individual concatenation).
	local t = {}
	for k, v in pairs(o) do
		local keyStr
		if type(k) == "table" then
			if dumped[k] then
				keyStr = dumped[k]
			else
				-- Key tables don't have a name, so use one of
				-- the form _G["table: 0xFFFFFFF"]
				keyStr = string.format("_G[%q]", tostring(k))
				-- Dump key table
				table.insert(t, dump2(k, keyStr, dumped))
			end
		else
			keyStr = basic_dump(k)
		end
		local vname = string.format("%s[%s]", name, keyStr)
ofs	hex dump	ascii
0000	42 42 33 44 6d 02 00 00 01 00 00 00 4e 4f 44 45 61 02 00 00 43 75 62 65 00 00 00 00 00 00 00 00	BB3Dm.......NODEa...Cube........
0020	00 00 00 00 00 00 00 80 3f 00 00 80 3f 00 00 80 3f d3 bb 4b b5 00 00 00 00 00 00 80 3f 00 00 00	........?...?...?..K........?...
0040	00 4d 45 53 48 2c 02 00 00 ff ff ff ff 56 52 54 53 cc 01 00 00 01 00 00 00 01 00 00 00 02 00 00	.MESH,.......VRTS...............
0060	00 57 7e 3c 3f 00 00 00 bf 5c 73 00 3f 92 05 49 3f 7c 01 be 3e fc c1 fd 3e 1f e6 62 3f a1 af 5d	.W~<?....\s.?..I?\|..>...>..b?..]
0080	3f 71 7e 3c bf 00 00 00 bf 15 73 00 3f 92 05 49 bf 7c 01 be 3e fc c1 fd 3e 20 e6 62 3f 7c 41 09	?q~<......s.?..I.\|..>...>..b?\|A.
00a0	3e 0d 00 00 bf 00 00 00 00 20 73 00 3f b4 05 da be 93 8f 49 3f c8 39 e4 3e 9d 47 23 3f fa c2 80	>.........s.?......I?.9.>.G#?...
00c0	3e e9 ff ff 3e 00 00 00 00 51 73 00 3f b4 05 da 3e 93 8f 49 3f c8 39 e4 3e 9f 47 23 3f 80 9e 3f	>...>....Qs.?...>..I?.9.>.G#?..?
00e0	3f b7 ff ff be 00 00 00 bf c4 19 ff be f3 81 79 be bc 11 5e 3f bc 11 de be 03 2f a8 3d 00 c3 80	?..............y...^?...../.=...
0100	3e 0d 00 00 bf 00 00 00 00 20 73 00 3f b4 05 da be 93 8f 49 3f c8 39 e4 3e 9d 47 23 3f fa c2 80	>.........s.?......I?.9.>.G#?...
0120	3e 71 7e 3c bf 00 00 00 bf 15 73 00 3f 92 05 49 bf 7c 01 be 3e fc c1 fd 3e 0f d4 06 3f 00 20 bc	>q~<......s.?..I.\|..>...>...?...
0140	38 e9 ff ff 3e 00 00 00 00 51 73 00 3f b4 05 da 3e 93 8f 49 3f c8 39 e4 3e 9f 47 23 3f 80 9e 3f	8...>....Qs.?...>..I?.9.>.G#?..?
0160	3f 23 00 00 3f 00 00 00 bf 62 19 ff be f3 81 79 3e bc 11 5e 3f bc 11 de be 0a 2f a8 3d 85 9e 3f	?#..?....b.....y>..^?...../.=..?
0180	3f 57 7e 3c 3f 00 00 00 bf 5c 73 00 3f 92 05 49 3f 7c 01 be 3e fc c1 fd 3e 14 d4 06 3f 20 fa 7f	?W~<?....\s.?..I?\|..>...>...?...
01a0	3f 23 00 00 3f 00 00 00 bf 62 19 ff be f3 81 79 3e bc 11 5e 3f bc 11 de be 0a 2f a8 3d 85 9e 3f	?#..?....b.....y>..^?...../.=..?
01c0	3f e9 ff ff 3e 00 00 00 00 51 73 00 3f b4 05 da 3e 93 8f 49 3f c8 39 e4 3e 9f 47 23 3f 80 9e 3f	?...>....Qs.?...>..I?.9.>.G#?..?
01e0	3f 0d 00 00 bf 00 00 00 00 20 73 00 3f b4 05 da be 93 8f 49 3f c8 39 e4 3e 9d 47 23 3f fa c2 80	?.........s.?......I?.9.>.G#?...
0200	3e b7 ff ff be 00 00 00 bf c4 19 ff be f3 81 79 be bc 11 5e 3f bc 11 de be 03 2f a8 3d 00 c3 80	>..............y...^?...../.=...
0220	3e 54 52 49 53 4c 00 00 00 ff ff ff ff 02 00 00 00 01 00 00 00 00 00 00 00 03 00 00 00 02 00 00	>TRISL..........................
0240	00 00 00 00 00 06 00 00 00 05 00 00 00 04 00 00 00 09 00 00 00 08 00 00 00 07 00 00 00 0c 00 00	................................
0260	00 0b 00 00 00 0a 00 00 00 0d 00 00 00 0c 00 00 00 0a 00 00 00	.....................