Comparison

util.serialization: Add option for allowing multiple references to the same table (but not cycles)

comparison

equal deleted inserted replaced

-:dad29508d0f2
+:dbfa286cfa88
 	local equals = opt.equals or " = ";
 	local unquoted = opt.unquoted == nil and "^[%a_][%w_]*$" or opt.unquoted;
 	local hex = opt.hex;
 	local freeze = opt.freeze;
 	local maxdepth = opt.maxdepth or 127;
+	local multirefs = opt.multiref;
 	-- serialize one table, recursively
 	-- t - table being serialized
 	-- o - array where tokens are added, concatenate to get final result
 	--   - also used to detect cycles
 		elseif d > maxdepth then
 			o[l], l = fallback(t, "max table depth reached"), l + 1;
 			return l;
 		end
+		-- Keep track of table loops
+		local ot = t; -- reference pre-freeze
 		o[t] = true;
+		o[ot] = true;
 		if freeze == true then
 			-- opportunity to do pre-serialization
 			local mt = getmetatable(t);
 			if type(mt) == "table" then
 		end
 		if next(t) ~= nil then
 			o[l], l = s_rep(indentwith, d-1), l + 1;
 		end
 		o[l], l = tend, l +1;
+		if multirefs then
+			o[t] = nil;
+			o[ot] = nil;
+		end
 		return l;
 	end
 	function types.table(t)
 		local o = {};