Changes
from sandbox: another slight code simplification and a couple comment fixes
local function cleanPattern(s)
local function cleanPattern(s)
-- Cleans a pattern so that the magic characters ()%.[]*+-?^$ are interpreted literally.
-- Cleans a pattern so that the magic characters ()%.[]*+-?^$ are interpreted literally.
return s:gsub('([%(%)%%%.%[%]%*%+%-%?%^%$])', '%%%1')
end
end
--[[
--[[
-- Finds the length of an array, or of a quasi-array with keys such
-- Finds the length of an array, or of a quasi-array with keys such
-- as "data1", "data2", etc., using an exponental search algorithm.
-- as "data1", "data2", etc., using an exponential search algorithm.
-- It is similar to the operator #, but may return
-- It is similar to the operator #, but may return
-- a different value when there are gaps in the array portion of the table.
-- a different value when there are gaps in the array portion of the table.
function p.length(t, prefix)
function p.length(t, prefix)
-- requiring module inline so that [[Module:Exponental search]]
-- requiring module inline so that [[Module:Exponential search]]
-- which is only needed by this one function
-- which is only needed by this one function
-- doesn't get millions of transclusions
-- doesn't get millions of transclusions