Mark freeze-to-stream! and thaw-from-stream! as private
This commit is contained in:
parent
da077c6a54
commit
ac380eb621
1 changed files with 2 additions and 2 deletions
|
|
@ -157,7 +157,7 @@
|
||||||
(freeze-to-stream!* s m)))
|
(freeze-to-stream!* s m)))
|
||||||
(freeze x s))
|
(freeze x s))
|
||||||
|
|
||||||
(defn freeze-to-stream!
|
(defn- freeze-to-stream!
|
||||||
"Serializes x to given output stream."
|
"Serializes x to given output stream."
|
||||||
([data-output-stream x] ; For <= 1.0.1 compatibility
|
([data-output-stream x] ; For <= 1.0.1 compatibility
|
||||||
(freeze-to-stream! data-output-stream x true))
|
(freeze-to-stream! data-output-stream x true))
|
||||||
|
|
@ -241,7 +241,7 @@
|
||||||
|
|
||||||
(throw (Exception. (str "Failed to thaw unknown type ID: " type-id))))))
|
(throw (Exception. (str "Failed to thaw unknown type ID: " type-id))))))
|
||||||
|
|
||||||
(defn thaw-from-stream!
|
(defn- thaw-from-stream!
|
||||||
"Deserializes an object from given input stream."
|
"Deserializes an object from given input stream."
|
||||||
[data-input-stream read-eval?]
|
[data-input-stream read-eval?]
|
||||||
(binding [*read-eval* read-eval?]
|
(binding [*read-eval* read-eval?]
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue