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

Expose exception to user as :throwable (@kul)

Browse source
This commit is contained in:
kul 2014-04-10 16:06:56 +05:30 committed by Peter Taoussanis
parent 152fec95e0
commit e006fbcbb0
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/taoensso/nippy.clj
View file

@ -436,8 +436,9 @@
id-reader id-reader
(let [edn (read-utf8 in)] (let [edn (read-utf8 in)]
(try (edn/read-string {:readers *data-readers*} edn) (try (edn/read-string {:readers *data-readers*} edn)
(catch Exception _ {:nippy/unthawable edn (catch Exception e {:nippy/unthawable edn
:type :reader}))) :type :reader
:throwable e})))
id-serializable id-serializable
(let [class-name (read-utf8 in)] (let [class-name (read-utf8 in)]
@ -446,8 +447,9 @@
object (.readObject (ObjectInputStream. in)) object (.readObject (ObjectInputStream. in))
^Class class (Class/forName class-name)] ^Class class (Class/forName class-name)]
(cast class object)) (cast class object))
(catch Exception _ {:nippy/unthawable class-name (catch Exception e {:nippy/unthawable class-name
:type :serializable}))) :type :serializable
:throwable e})))
id-bytes (read-bytes in) id-bytes (read-bytes in)
id-nil nil id-nil nil