8 lines
130 B
Plaintext
8 lines
130 B
Plaintext
|
; print a table
|
||
|
|
(fn pprint [tbl]
|
||
|
|
(each [k v (pairs tbl)]
|
||
|
|
(let [table? (= (type v) :table)]
|
||
|
|
(print k v))))
|
||
|
|
|
||
|
|
{: pprint}
|