BetterPages.lua

local BetterPages = {}

function BetterPages.new(Pages: Pages)
    return setmetatable({Pages = Pages}, BetterPages)
end

function BetterPages.FromPcall(Success: boolean, ValueOrError: Pages | string)
    if Success then
        return true, setmetatable({Pages = ValueOrError}, BetterPages)
    else
        return false, ValueOrError
    end
end

function BetterPages:__index(Index)
    local Value = BetterPages[Index]
    if Value then
        return Value
    end

    Value = self.Pages[Index]
    if type(Value) == "function" then
        return function(_, ...)
            return Value(self.Pages, ...)
        end
    else
        return Value
    end
end

local function AdvanceToNextPageAsync(Pages: Pages)
    Pages:AdvanceToNextPageAsync()
end

function BetterPages:__iter()
    return coroutine.wrap(function()
        local PageNumber = 1
        while true do
            for Index, Value in self:GetCurrentPage() do
                coroutine.yield(Value, PageNumber, Index)
            end

            if self.IsFinished then
                break
            end

            local Success, Error = pcall(AdvanceToNextPageAsync, self)
            if not Success then
                warn(string.format("Error calling AdvanceToNextPageAsync:\n\tError: %s", tostring(Error)))
                break
            end

            PageNumber += 1
        end
    end)
end

function BetterPages:__tostring()
    return self.ClassName
end

table.freeze(BetterPages)
return BetterPages