babashka/feature-transit/babashka/impl/transit.clj

21 lines
810 B
Clojure
Raw Normal View History

2020-03-20 16:16:42 +00:00
(ns babashka.impl.transit
(:require [cognitect.transit :as transit]
[sci.impl.namespaces :refer [copy-var]]
[sci.impl.vars :as vars]))
2020-04-03 21:51:54 +00:00
2020-03-20 16:16:42 +00:00
(def tns (vars/->SciNamespace 'cognitect.transit nil))
(def transit-namespace
{'write (copy-var transit/write tns)
'writer (copy-var transit/writer tns)
2020-08-10 08:31:02 +00:00
'write-handler (copy-var transit/write-handler tns)
'write-handler-map (copy-var transit/write-handler-map tns)
2020-08-10 08:31:02 +00:00
'write-meta (copy-var transit/write-meta tns)
2020-03-20 16:16:42 +00:00
'read (copy-var transit/read tns)
2020-08-10 08:31:02 +00:00
'reader (copy-var transit/reader tns)
'read-handler (copy-var transit/read-handler tns)
2021-05-20 10:52:41 +00:00
'read-handler-map (copy-var transit/read-handler-map tns)
'default-write-handlers (copy-var transit/default-write-handlers tns)
2021-05-20 10:52:41 +00:00
'tagged-value (copy-var transit/tagged-value tns)})