Code Select Expand(define-macro (plist) (map rest (explode (args) 3)))(println (plist :foo "bar" :baz "bat")) ; => ((foo "bar") (baz "bat"))