Expose a schema as a part of the public API.

Author: darkleaf

src/datascript/core.cljc

@@ -190,6 +190,11 @@
              Used internally in db (de)serialization. See also [[datom]]."}
   init-db db/init-db)
 
+; Schema
+
+(def ^{:arglists '([db])
+       :doc "Returns a schema of a database."}
+  schema db/-schema)
 
 ; Filtered db
 

test/datascript/test/issues.cljc

@@ -43,3 +43,9 @@
                 (ds/db-with [[:db/add 1 :attr "aa"]]))]
     (t/is (= [[(ds/datom 1 :attr :aa)] [(ds/datom 1 :attr "aa")] nil]
              (clojure.data/diff db1 db2)))))
+
+(deftest ^{:doc "Expose a schema as a part of the public API."}
+  issue-381
+  (let [schema {:aka {:db/cardinality :db.cardinality/many}}
+        db     (ds/empty-db schema)]
+    (t/is (= schema (ds/schema db)))))