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