             (let [^java.util.Map$Entry entry (first entries)]
               (recur (.assoc result (.getKey entry) (.getValue entry))
                      (rest entries)))
-            reult))))
+            result))))
 
   (equiv
     [this other]

                        "realized"
                        (if -reader
                          "deferred"
                          "empty")))

  (hashCode
    [this]

    [this k]
    (let [v (.valAt this k this)]
      (when-not (identical? this v)
        [k v])))

  (seq
    [this]
    (seq (concat [[:id -id] [:size -size]] -attributes)))

  (iterator
    [this]
    (.iterator (seq this)))

  (assoc
    [this k v]
