Initial commit

1 files changed, 36 insertions, 0 deletions

@@ -0,0 +1,36 @@
+--- lam.pp
+
+local pp = {}
+
+function pp.dump (x, lvl)
+        lvl = lvl or 0
+        local space = string.rep(" ", lvl)
+        local output = ""
+        if type(x) == "table" then
+                local subo = ""
+                for k,v in pairs(x) do
+                        if v == x then
+                                v = "self"
+                        else
+                                v = pp.dump(v, lvl+2)
+                        end
+                        subo = subo .. string.format("\n%s[%s] = %s,",
+                                                     (space.."  "), k, v)
+                end
+                output = output .. string.format("\n%s{%s\n%s}",
+                                                 space, subo, space)
+        else
+                output = output .. string.format("%s", x)
+        end
+        return output
+end
+
+function pp.pp (x)
+        print(pp.dump(x))
+end
+
+return setmetatable(pp, { __call =
+                                  function(_, x)
+                                          return pp.pp(x)
+                                  end,
+})