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"))