           :end-line end-line
           :end-column end-column})))))
 
-(defrecord SyntaxQuotedMap [val])
 (defn- read-map
   [rdr _]
   (let [[start-line start-column] (when (indexing-reader? rdr)

              (reset-meta! o m)))
          (reader-error rdr "Metadata can only be applied to IMetas"))))))

(defrecord SyntaxQuotedSet [val])
(defn- read-set
  [rdr _]
  (let [[start-line start-column] (when (indexing-reader? rdr)
                                    [(get-line-number rdr) (int (dec (get-column-number rdr)))])
        the-set (if gensym-env
                  (SyntaxQuotedSet. (read-delimited \} rdr true))
                  (PersistentHashSet/createWithCheck (read-delimited \} rdr true)))
        [end-line end-column] (when (indexing-reader? rdr)
                                [(get-line-number rdr) (int (get-column-number rdr))])]
    (with-meta the-set

         ^:dynamic *read-eval*
         ^:dynamic *data-readers*
         ^:dynamic *default-data-reader-fn*
         default-data-readers)

(defn- macro-terminating? [ch]
