   (tag [s] "set")
   (rep [s] (as-tag "array" s nil))
   (str-rep [s] nil)
-)
+  )
 
 (deftype Writer [marshaler])
 

           false
           cache))

(defn stringable-keys?
  [m]
  (let [ks (keys m)]

  java.util.Date
  (tag [inst] "t")
  (rep [inst] (.getTime inst))
  (str-rep [inst]
    (let [format (.get thread-local-utc-date-format)]
      (.format foramt inst)))

  java.util.UUID
  (tag [uuid] "u")
