Add support for core.match

[bsima]

Currently match formats like this:

(defn val?
  [x]
  (match [x]
         [_ :guard keyword?] false
         [_ :guard coll?]    false
         :else true))

But it should format like this:

(defn val?
  [x]
  (match [x]
    [_ :guard keyword?] false
    [_ :guard coll?]    false
    :else true))