test-mexprlist-rendering.lua

function a()
    return 1, 2, 3, 4
end

function a()
    return
        -- 1
        1, -- 2
        2, -- 3
        -- 4
        3,
        -- 5
        4 -- 6
        -- 7
end

function a()
    return
        --[[8]]
        1, --[[9]]
        2, --[[10]]
        --[[11]]
        3,
        --[[12]]
        4 --[[13]]
        --[[14]]
end

function a()
    return
        --[[15]]
        1, --[[16]]
        2, --[[17]]
        --[[18]]
        function() print(3) return 4 end,
        --[[19]]
        4 --[[20]]
        --[[21]]
end

function a()
    return 1,  2, function() print(3) return 4 end, 4
end

hook.Add("OnPrettyPrint", "test", function()
    -- yes
    a = 1 + 1
    return function()
        -- fancy
    end
    -- no
end)

for b, c, d in 2, 3, function()
    -- A function in a for loop, is it possible? Syntactically, yes!
    -- And this comment makes it _really_ awkward to pretty print!
    end, 4, 5 do
    print(a, b, c, d)
end

for b, c, d in 2, 3, {"foo", "bar"}, 4, 5 do
    print(a, b, c, d)
end

for b, c, d in 2, 3, {a = "foo", b = "bar"}, 4, 5 do
    print(a, b, c, d)
end