luciano/nippy
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove alpha status on final-freeze-fallback

Browse source
This commit is contained in:
Peter Taoussanis 2015-09-29 14:26:05 +07:00
parent 9c1e8751c4
commit f67f9da64e
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/taoensso/nippy.clj
View file

@ -335,8 +335,8 @@
(.writeLong out (.getMostSignificantBits x)) (.writeLong out (.getMostSignificantBits x))
(.writeLong out (.getLeastSignificantBits x))) (.writeLong out (.getLeastSignificantBits x)))
(def ^:dynamic *final-freeze-fallback* "Alpha - subject to change." nil) (def ^:dynamic *final-freeze-fallback* nil)
(defn freeze-fallback-as-str "Alpha-subject to change." [x out] (defn freeze-fallback-as-str [out x]
(-freeze-to-out {:nippy/unfreezable (encore/pr-edn x) :type (type x)} out)) (-freeze-to-out {:nippy/unfreezable (encore/pr-edn x) :type (type x)} out))
(comment (comment
@ -364,7 +364,8 @@
(write-utf8 out (encore/pr-edn x))) (write-utf8 out (encore/pr-edn x)))
:else ; Fallback #3: *final-freeze-fallback* :else ; Fallback #3: *final-freeze-fallback*
(if-let [ffb *final-freeze-fallback*] (ffb x out) (if-let [ffb *final-freeze-fallback*]
(ffb x out)
(throw (ex-info (format "Unfreezable type: %s %s" (type x) (str x)) (throw (ex-info (format "Unfreezable type: %s %s" (type x) (str x))
{:type (type x) {:type (type x)
:as-str (encore/pr-edn x)})))))) :as-str (encore/pr-edn x)}))))))