datahike 0.7.1630

package/konserve.utils.js

@@ -0,0 +1,180 @@
+var $CLJS = require("./cljs_env");
+var $jscomp = $CLJS.$jscomp;
+var COMPILED = false;
+require("./cljs.core.js");
+require("./clojure.walk.js");
+require("./konserve.protocols.js");
+var environ=$CLJS.environ || ($CLJS.environ = {});
+var fress=$CLJS.fress || ($CLJS.fress = {});
+var datahike=$CLJS.datahike || ($CLJS.datahike = {});
+var clojure=$CLJS.clojure || ($CLJS.clojure = {});
+var hasch=$CLJS.hasch || ($CLJS.hasch = {});
+var tailrecursion=$CLJS.tailrecursion || ($CLJS.tailrecursion = {});
+var superv=$CLJS.superv || ($CLJS.superv = {});
+var geheimnis=$CLJS.geheimnis || ($CLJS.geheimnis = {});
+var is=$CLJS.is || ($CLJS.is = {});
+var cljs=$CLJS.cljs || ($CLJS.cljs = {});
+var cljs_node_io=$CLJS.cljs_node_io || ($CLJS.cljs_node_io = {});
+var goog=$CLJS.goog || ($CLJS.goog = {});
+var konserve=$CLJS.konserve || ($CLJS.konserve = {});
+var datalog=$CLJS.datalog || ($CLJS.datalog = {});
+var spec_tools=$CLJS.spec_tools || ($CLJS.spec_tools = {});
+var taoensso=$CLJS.taoensso || ($CLJS.taoensso = {});
+var incognito=$CLJS.incognito || ($CLJS.incognito = {});
+var medley=$CLJS.medley || ($CLJS.medley = {});
+var me=$CLJS.me || ($CLJS.me = {});
+
+$CLJS.SHADOW_ENV.setLoaded("konserve.utils.js");
+
+goog.provide('konserve.utils');
+konserve.utils.invert_map = (function konserve$utils$invert_map(m){
+return cljs.core.into.cljs$core$IFn$_invoke$arity$2(cljs.core.PersistentArrayMap.EMPTY,cljs.core.map.cljs$core$IFn$_invoke$arity$2((function (p__37700){
+var vec__37701 = p__37700;
+var k = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37701,(0),null);
+var v = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37701,(1),null);
+return new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [v,k], null);
+}),m));
+});
+konserve.utils.now = (function konserve$utils$now(){
+return (new Date());
+});
+/**
+ * Metadata has following 'edn' format
+ *   {:key 'The stored key'
+ * :type 'The type of the stored value binary or edn'
+ * :last-write Date timestamp in milliseconds.}
+ *   Returns the meta value of the stored key-value tuple. Returns metadata if the key
+ *   value not exist, if it does it will update the last-write to date now. 
+ */
+konserve.utils.meta_update = (function konserve$utils$meta_update(key,type,old){
+if(cljs.core.empty_QMARK_(old)){
+return new cljs.core.PersistentArrayMap(null, 3, [new cljs.core.Keyword(null,"key","key",-1516042587),key,new cljs.core.Keyword(null,"type","type",1174270348),type,new cljs.core.Keyword(null,"last-write","last-write",447600431),konserve.utils.now()], null);
+} else {
+return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(old,new cljs.core.Keyword(null,"last-write","last-write",447600431),konserve.utils.now());
+}
+});
+/**
+ * Checks whether the store supports multi-key operations.
+ * 
+ * This function is used by the high-level API to determine if a store supports multi-key operations.
+ */
+konserve.utils.multi_key_capable_QMARK_ = (function konserve$utils$multi_key_capable_QMARK_(store){
+var and__5000__auto__ = (((!((store == null))))?((((false) || ((cljs.core.PROTOCOL_SENTINEL === store.konserve$protocols$PMultiKeyEDNValueStore$))))?true:(((!store.cljs$lang$protocol_mask$partition$))?cljs.core.native_satisfies_QMARK_(konserve.protocols.PMultiKeyEDNValueStore,store):false)):cljs.core.native_satisfies_QMARK_(konserve.protocols.PMultiKeyEDNValueStore,store));
+if(and__5000__auto__){
+return konserve.protocols._supports_multi_key_QMARK_(store);
+} else {
+return and__5000__auto__;
+}
+});
+/**
+ * Checks whether the store supports write hooks.
+ * 
+ * This function is used by the high-level API and compliance tests to determine
+ * if a store supports the PWriteHookStore protocol.
+ */
+konserve.utils.write_hooks_capable_QMARK_ = (function konserve$utils$write_hooks_capable_QMARK_(store){
+var and__5000__auto__ = (((!((store == null))))?((((false) || ((cljs.core.PROTOCOL_SENTINEL === store.konserve$protocols$PWriteHookStore$))))?true:(((!store.cljs$lang$protocol_mask$partition$))?cljs.core.native_satisfies_QMARK_(konserve.protocols.PWriteHookStore,store):false)):cljs.core.native_satisfies_QMARK_(konserve.protocols.PWriteHookStore,store));
+if(and__5000__auto__){
+return (!((konserve.protocols._get_write_hooks(store) == null)));
+} else {
+return and__5000__auto__;
+}
+});
+/**
+ * Invoke all registered write hooks with the operation details.
+ * Hooks are called synchronously after a successful write.
+ */
+konserve.utils.invoke_write_hooks_BANG_ = (function konserve$utils$invoke_write_hooks_BANG_(store,hook_event){
+var temp__5804__auto__ = konserve.protocols._get_write_hooks(store);
+if(cljs.core.truth_(temp__5804__auto__)){
+var hooks_atom = temp__5804__auto__;
+var temp__5804__auto____$1 = cljs.core.deref(hooks_atom);
+if(cljs.core.truth_(temp__5804__auto____$1)){
+var hooks = temp__5804__auto____$1;
+if(cljs.core.seq(hooks)){
+var seq__37723 = cljs.core.seq(hooks);
+var chunk__37724 = null;
+var count__37725 = (0);
+var i__37726 = (0);
+while(true){
+if((i__37726 < count__37725)){
+var vec__37742 = chunk__37724.cljs$core$IIndexed$_nth$arity$2(null, i__37726);
+var hook_id = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37742,(0),null);
+var hook_fn = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37742,(1),null);
+try{(hook_fn.cljs$core$IFn$_invoke$arity$1 ? hook_fn.cljs$core$IFn$_invoke$arity$1(hook_event) : hook_fn.call(null, hook_event));
+}catch (e37745){if((e37745 instanceof Error)){
+var e_37775 = e37745;
+console.warn("Write hook error:",hook_id,cljs.core.pr_str.cljs$core$IFn$_invoke$arity$variadic(cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([e_37775], 0)));
+} else {
+throw e37745;
+
+}
+}
+
+var G__37776 = seq__37723;
+var G__37777 = chunk__37724;
+var G__37778 = count__37725;
+var G__37779 = (i__37726 + (1));
+seq__37723 = G__37776;
+chunk__37724 = G__37777;
+count__37725 = G__37778;
+i__37726 = G__37779;
+continue;
+} else {
+var temp__5804__auto____$2 = cljs.core.seq(seq__37723);
+if(temp__5804__auto____$2){
+var seq__37723__$1 = temp__5804__auto____$2;
+if(cljs.core.chunked_seq_QMARK_(seq__37723__$1)){
+var c__5525__auto__ = cljs.core.chunk_first(seq__37723__$1);
+var G__37780 = cljs.core.chunk_rest(seq__37723__$1);
+var G__37781 = c__5525__auto__;
+var G__37782 = cljs.core.count(c__5525__auto__);
+var G__37783 = (0);
+seq__37723 = G__37780;
+chunk__37724 = G__37781;
+count__37725 = G__37782;
+i__37726 = G__37783;
+continue;
+} else {
+var vec__37750 = cljs.core.first(seq__37723__$1);
+var hook_id = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37750,(0),null);
+var hook_fn = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__37750,(1),null);
+try{(hook_fn.cljs$core$IFn$_invoke$arity$1 ? hook_fn.cljs$core$IFn$_invoke$arity$1(hook_event) : hook_fn.call(null, hook_event));
+}catch (e37753){if((e37753 instanceof Error)){
+var e_37784 = e37753;
+console.warn("Write hook error:",hook_id,cljs.core.pr_str.cljs$core$IFn$_invoke$arity$variadic(cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([e_37784], 0)));
+} else {
+throw e37753;
+
+}
+}
+
+var G__37785 = cljs.core.next(seq__37723__$1);
+var G__37786 = null;
+var G__37787 = (0);
+var G__37788 = (0);
+seq__37723 = G__37785;
+chunk__37724 = G__37786;
+count__37725 = G__37787;
+i__37726 = G__37788;
+continue;
+}
+} else {
+return null;
+}
+}
+break;
+}
+} else {
+return null;
+}
+} else {
+return null;
+}
+} else {
+return null;
+}
+});
+konserve.utils._STAR_default_sync_translation_STAR_ = new cljs.core.PersistentArrayMap(null, 7, [new cljs.core.Symbol(null,"go-try","go-try",1412345407,null),new cljs.core.Symbol(null,"try","try",-1273693247,null),new cljs.core.Symbol(null,"<?","<?",-1929864530,null),new cljs.core.Symbol(null,"do","do",1686842252,null),new cljs.core.Symbol(null,"go-try-","go-try-",480981026,null),new cljs.core.Symbol(null,"try","try",-1273693247,null),new cljs.core.Symbol(null,"<!-","<!-",-1906786470,null),new cljs.core.Symbol(null,"do","do",1686842252,null),new cljs.core.Symbol(null,"<?-","<?-",209151002,null),new cljs.core.Symbol(null,"do","do",1686842252,null),new cljs.core.Symbol(null,"go-locked","go-locked",318391579,null),new cljs.core.Symbol(null,"locked","locked",-18232293,null),new cljs.core.Symbol(null,"maybe-go-locked","maybe-go-locked",-633521351,null),new cljs.core.Symbol(null,"maybe-locked","maybe-locked",2124511125,null)], null);
+
+//# sourceMappingURL=konserve.utils.js.map

package/konserve.utils.js.map

@@ -0,0 +1 @@
+{"version":3,"sources":["konserve/utils.cljc"],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAKA,4BAAA,5BAAMA,gEAAYC;AAAlB,uFACO,AAACC,4CAAI,WAAAC,9IACL,oDAAA,7CAACK;AADI,AAAA,IAAAJ,aAAAD;QAAA,AAAAE,4CAAAD,WAAA,IAAA,/DAAME;QAAN,AAAAD,4CAAAD,WAAA,IAAA,/DAAQG;AAAR,AAAA,0FAAaA,EAAED;GAAIL;;AAG/B,qBAAA,rBAAMQ;AAAN,AAEW,YAAAC;;AAEX;;;;;;;;6BAAA,7BAAMC,kEAOHC,IAAIC,KAAKC;AAPZ,AAQE,GAAI,AAACC,uBAAOD;AAAZ,kDAAA,wDAAA,0DAAA,9DACQF,yDAAUC,qEAAiB,AAACJ;;AAClC,yDAAA,lDAACO,8CAAmBF,oEAAgB,AAACL;;;AAEzC;;;;;0CAAA,1CAAMQ,4FAIHC;AAJH,AAKE,IAAAC,oBAAK,EAAA,GAAA,UAAA,SAAA,EAAA,EAAA,WAAA,CAAAC,gCAAA,qDAAA,KAAA,EAAA,EAAA,2CAAA,AAAAC,mFAAA,QAAA,AAAAA,zDAAYC,2FAAAA,xSAAiCJ,kEAAAA,8DAAAA,uHAAAA,2FAAAA;AAAlD,AAAA,GAAAC;AACK,OAACI,8CAA+BL;;AADrCC;;;AAGF;;;;;;4CAAA,5CAAMK,gGAKHN;AALH,AAME,IAAAC,oBAAK,EAAA,GAAA,UAAA,SAAA,EAAA,EAAA,WAAA,CAAAC,gCAAA,8CAAA,KAAA,EAAA,EAAA,2CAAA,AAAAC,4EAAA,QAAA,AAAAA,lDAAYI,oFAAAA,1RAA0BP,kEAAAA,uDAAAA,gHAAAA,oFAAAA;AAA3C,AAAA,GAAAC;AACK,UAAA,+CAAA,9CAAO,AAACO,oCAA2BR;;AADxCC;;;AAGF;;;;0CAAA,1CAAMQ,4FAGHT,MAAMU;AAHT,AAIE,IAAAC,qBAAsB,AAACH,oCAA2BR;AAAlD,AAAA,oBAAAW;AAAA,AAAA,iBAAAA,bAAWC;AAAX,AACE,IAAAD,yBAAA,AAAAE,gBAAkBD;AAAlB,AAAA,oBAAAD;AAAA,AAAA,YAAAA,RAAWG;AAAX,AACE,GAAM,AAACC,cAAID;AAAX,AACE,IAAAE,aAAA,AAAAD,cAA0BD;IAA1BG,eAAA;IAAAC,eAAA;IAAAC,WAAA;;AAAA,AAAA,GAAA,AAAA,CAAAA,WAAAD;AAAA,IAAAE,aAAA,AAAAH,mDAAAE;cAAA,AAAAhC,4CAAAiC,WAAA,IAAA,rEAASS;cAAT,AAAA1C,4CAAAiC,WAAA,IAAA,rEAAiBU;AAAjB,AAAA,AACE,IAAA,AACE,CAACA,wCAAAA,oDAAAA,dAAQpB,iCAAAA;gBADX,GAAA,CAAAqB,kBAEiCE;AAFjC,cAAAF,VAE2CG;AAF3C,AAOa,aAAA,bAACC,iCAAoCN,QAAQ,AAACO,wGAAOF;;AAPlE,AAAA,MAAAH;;;;AADF;AAAA,eAAAf;eAAAC;eAAAC;eAAA,CAAAC,WAAA;;;;;;;AAAA,IAAAR,yBAAA,AAAAI,cAAAC;AAAA,AAAA,GAAAL;AAAA,AAAA,IAAAK,iBAAAL;AAAA,AAAA,GAAA,AAAAU,6BAAAL;AAAA,IAAAM,kBAAA,AAAAC,sBAAAP;AAAA,AAAA,eAAA,AAAAQ,qBAAAR;eAAAM;eAAA,AAAAG,gBAAAH;eAAA;;;;;;;AAAA,IAAAI,aAAA,AAAAC,gBAAAX;cAAA,AAAA7B,4CAAAuC,WAAA,IAAA,rEAASG;cAAT,AAAA1C,4CAAAuC,WAAA,IAAA,rEAAiBI;AAAjB,AAAA,AACE,IAAA,AACE,CAACA,wCAAAA,oDAAAA,dAAQpB,iCAAAA;gBADX,GAAA,CAAAsB,kBAEiCC;AAFjC,cAAAD,VAE2CE;AAF3C,AAOa,aAAA,bAACC,iCAAoCN,QAAQ,AAACO,wGAAOF;;AAPlE,AAAA,MAAAF;;;;AADF;AAAA,eAAA,AAAAJ,eAAAZ;eAAA;eAAA;eAAA;;;;;;;;AAAA;;;;;;AADF;;;AADF;;;AADF;;;AA+BF,sDAAA,AAAA,tDAAeqB","names":["konserve.utils/invert-map","m","cljs.core.map","p__37700","vec__37701","cljs.core.nth","k","v","cljs.core.into","konserve.utils/now","js/Date","konserve.utils/meta-update","key","type","old","cljs.core/empty?","cljs.core.assoc","konserve.utils/multi-key-capable?","store","and__5000__auto__","cljs.core/PROTOCOL_SENTINEL","cljs.core/native-satisfies?","konserve.protocols/PMultiKeyEDNValueStore","konserve.protocols/-supports-multi-key?","konserve.utils/write-hooks-capable?","konserve.protocols/PWriteHookStore","konserve.protocols/-get-write-hooks","konserve.utils/invoke-write-hooks!","hook-event","temp__5804__auto__","hooks-atom","cljs.core/deref","hooks","cljs.core/seq","seq__37723","chunk__37724","count__37725","i__37726","vec__37742","cljs.core/chunked-seq?","c__5525__auto__","cljs.core/chunk-first","cljs.core/chunk-rest","cljs.core/count","vec__37750","cljs.core/first","cljs.core/next","hook-id","hook-fn","e37745","e37753","js/Error","e","js/console.warn","cljs.core.pr_str","konserve.utils/*default-sync-translation*"],"sourcesContent":["(ns konserve.utils\n  (:require [clojure.walk]\n            [konserve.protocols :as protocols]\n            #?(:clj [taoensso.timbre :as timbre])))\n\n(defn invert-map [m]\n  (->> (map (fn [[k v]] [v k]) m)\n       (into {})))\n\n(defn now []\n  #?(:clj (java.util.Date.)\n     :cljs (js/Date.)))\n\n(defn meta-update\n  \"Metadata has following 'edn' format\n  {:key 'The stored key'\n   :type 'The type of the stored value binary or edn'\n   :last-write Date timestamp in milliseconds.}\n  Returns the meta value of the stored key-value tuple. Returns metadata if the key\n  value not exist, if it does it will update the last-write to date now. \"\n  [key type old]\n  (if (empty? old)\n    {:key key :type type :last-write (now)}\n    (clojure.core/assoc old :last-write (now))))\n\n(defn multi-key-capable?\n  \"Checks whether the store supports multi-key operations.\n\n   This function is used by the high-level API to determine if a store supports multi-key operations.\"\n  [store]\n  (and (satisfies? protocols/PMultiKeyEDNValueStore store)\n       (protocols/-supports-multi-key? store)))\n\n(defn write-hooks-capable?\n  \"Checks whether the store supports write hooks.\n\n   This function is used by the high-level API and compliance tests to determine\n   if a store supports the PWriteHookStore protocol.\"\n  [store]\n  (and (satisfies? protocols/PWriteHookStore store)\n       (some? (protocols/-get-write-hooks store))))\n\n(defn invoke-write-hooks!\n  \"Invoke all registered write hooks with the operation details.\n   Hooks are called synchronously after a successful write.\"\n  [store hook-event]\n  (when-let [hooks-atom (protocols/-get-write-hooks store)]\n    (when-let [hooks @hooks-atom]\n      (when (seq hooks)\n        (doseq [[hook-id hook-fn] hooks]\n          (try\n            (hook-fn hook-event)\n            (catch #?(:clj Exception :cljs js/Error) e\n              ;; Log hook errors for debugging but don't break writes\n              #?(:clj (timbre/warn e \"Write hook error\" {:hook-id hook-id\n                                                         :api-op (:api-op hook-event)\n                                                         :key (:key hook-event)})\n                 :cljs (js/console.warn \"Write hook error:\" hook-id (pr-str e))))))))))\n\n(defmacro async+sync\n  [sync? async->sync async-code]\n  (let [async->sync (if (symbol? async->sync)\n                      (or (resolve async->sync)\n                          (when-let [_ns (or (get-in &env [:ns :use-macros async->sync])\n                                             (get-in &env [:ns :uses async->sync]))]\n                            (resolve (symbol (str _ns) (str async->sync)))))\n                      async->sync)]\n    (assert (some? async->sync))\n    `(if ~sync?\n       ~(clojure.walk/postwalk (fn [n]\n                                 (if-not (meta n)\n                                   (async->sync n n) ;; primitives have no metadata\n                                   (with-meta (async->sync n n)\n                                     (update (meta n) :tag (fn [t] (async->sync t t))))))\n                               async-code)\n       ~async-code)))\n\n(def ^:dynamic *default-sync-translation*\n  '{go-try try\n    <? do\n    go-try- try\n    <!- do\n    <?- do\n    go-locked locked\n    maybe-go-locked maybe-locked})\n\n(defmacro with-promise [sym & body]\n  `(let [~sym (cljs.core.async/promise-chan)]\n     ~@body\n     ~sym))\n"],"x_google_ignoreList":[0]}

package/me.tonsky.persistent_sorted_set.arrays.js

@@ -0,0 +1,66 @@
+var $CLJS = require("./cljs_env");
+var $jscomp = $CLJS.$jscomp;
+var COMPILED = false;
+require("./cljs.core.js");
+require("./clojure.string.js");
+var environ=$CLJS.environ || ($CLJS.environ = {});
+var fress=$CLJS.fress || ($CLJS.fress = {});
+var datahike=$CLJS.datahike || ($CLJS.datahike = {});
+var clojure=$CLJS.clojure || ($CLJS.clojure = {});
+var hasch=$CLJS.hasch || ($CLJS.hasch = {});
+var tailrecursion=$CLJS.tailrecursion || ($CLJS.tailrecursion = {});
+var superv=$CLJS.superv || ($CLJS.superv = {});
+var geheimnis=$CLJS.geheimnis || ($CLJS.geheimnis = {});
+var is=$CLJS.is || ($CLJS.is = {});
+var cljs=$CLJS.cljs || ($CLJS.cljs = {});
+var cljs_node_io=$CLJS.cljs_node_io || ($CLJS.cljs_node_io = {});
+var goog=$CLJS.goog || ($CLJS.goog = {});
+var konserve=$CLJS.konserve || ($CLJS.konserve = {});
+var datalog=$CLJS.datalog || ($CLJS.datalog = {});
+var spec_tools=$CLJS.spec_tools || ($CLJS.spec_tools = {});
+var taoensso=$CLJS.taoensso || ($CLJS.taoensso = {});
+var incognito=$CLJS.incognito || ($CLJS.incognito = {});
+var medley=$CLJS.medley || ($CLJS.medley = {});
+var me=$CLJS.me || ($CLJS.me = {});
+
+$CLJS.SHADOW_ENV.setLoaded("me.tonsky.persistent_sorted_set.arrays.js");
+
+goog.provide('me.tonsky.persistent_sorted_set.arrays');
+me.tonsky.persistent_sorted_set.arrays.if_cljs = (function me$tonsky$persistent_sorted_set$arrays$if_cljs(env,then,else$){
+if(cljs.core.truth_(new cljs.core.Keyword(null,"ns","ns",441598760).cljs$core$IFn$_invoke$arity$1(env))){
+return then;
+} else {
+return else$;
+}
+});
+me.tonsky.persistent_sorted_set.arrays.make_array = (function me$tonsky$persistent_sorted_set$arrays$make_array(size){
+return (new Array(size));
+});
+me.tonsky.persistent_sorted_set.arrays.into_array = (function me$tonsky$persistent_sorted_set$arrays$into_array(aseq){
+return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3((function (a,x){
+a.push(x);
+
+return a;
+}),(new Array()),aseq);
+});
+me.tonsky.persistent_sorted_set.arrays.aclone = (function me$tonsky$persistent_sorted_set$arrays$aclone(from){
+return from.slice((0));
+});
+me.tonsky.persistent_sorted_set.arrays.aconcat = (function me$tonsky$persistent_sorted_set$arrays$aconcat(a,b){
+return a.concat(b);
+});
+me.tonsky.persistent_sorted_set.arrays.amap = (function me$tonsky$persistent_sorted_set$arrays$amap(f,arr){
+return arr.map(f);
+});
+me.tonsky.persistent_sorted_set.arrays.asort = (function me$tonsky$persistent_sorted_set$arrays$asort(arr,cmp){
+return arr.sort(cmp);
+});
+me.tonsky.persistent_sorted_set.arrays.array_QMARK_ = (function me$tonsky$persistent_sorted_set$arrays$array_QMARK_(x){
+if((cljs.core._STAR_target_STAR_ === "nodejs")){
+return Array.isArray(x);
+} else {
+return (x instanceof Array);
+}
+});
+
+//# sourceMappingURL=me.tonsky.persistent_sorted_set.arrays.js.map

package/me.tonsky.persistent_sorted_set.arrays.js.map

@@ -0,0 +1 @@
+{"version":3,"sources":["me/tonsky/persistent_sorted_set/arrays.cljc"],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;AAOA,iDAAA,jDAAOA,0GAASC,IAAIC,KAAKC;AAAzB,AACE,oBAAI,AAAA,8EAAKF;AAAKC;;AAAKC;;;AAGlB,oDAAA,pDAAaC,gHAAYC;AAAzB,AAA+B,YAAAC,MAAWD;;AAM1C,oDAAA,pDAAaE,gHAAYC;AAAzB,AACE,OAACC,+CAAO,WAAKC,EAAEC;AAAP,AAAU,AAAOD,OAAEC;;AAAGD;GAAG,KAAAJ,SAAYE;;AA+ClD,gDAAA,hDAAMI,wGAAQC;AAAd,AAEW,kBAAA,XAAQA;;AAEnB,iDAAA,jDAAMC,0GAASJ,EAAEK;AAAjB,AACW,OAASL,SAAEK;;AAQnB,8CAAA,9CAAMC,oGAAMC,EAAEC;AAAd,AACE,OAAMA,QAAID;;AAWf,+CAAA,/CAAME,sGAAOD,IAAIE;AAAjB,AACW,OAAOF,SAAIE;;AAInB,sDAAA,tDAAeC,oHAAQV;AAAvB,AACE,GAAI,kCAAA,jCAAYW;AACd,OAAUhB,cAASK;;AACnB,qBAAWL,bAASK","names":["me.tonsky.persistent-sorted-set.arrays/if-cljs","env","then","else","me.tonsky.persistent-sorted-set.arrays/make-array","size","js/Array","me.tonsky.persistent-sorted-set.arrays/into-array","aseq","cljs.core.reduce","a","x","me.tonsky.persistent-sorted-set.arrays/aclone","from","me.tonsky.persistent-sorted-set.arrays/aconcat","b","me.tonsky.persistent-sorted-set.arrays/amap","f","arr","me.tonsky.persistent-sorted-set.arrays/asort","cmp","me.tonsky.persistent-sorted-set.arrays/array?","cljs.core/*target*"],"sourcesContent":["(ns ^:no-doc me.tonsky.persistent-sorted-set.arrays\n  (:require\n   [clojure.string :as str])\n  (:refer-clojure :exclude [make-array into-array array amap aget aset alength array? aclone])\n  #?(:cljs (:require-macros me.tonsky.persistent-sorted-set.arrays))\n  #?(:clj  (:import [java.util Arrays])))\n\n(defn- if-cljs [env then else]\n  (if (:ns env) then else))\n\n#?(:cljs\n   (defn ^array make-array [size] (js/Array. size))\n   :clj\n   (defn make-array ^{:tag \"[[Ljava.lang.Object;\"} [size]\n     (clojure.core/make-array java.lang.Object size)))\n\n#?(:cljs\n   (defn ^array into-array [aseq]\n     (reduce (fn [a x] (.push a x) a) (js/Array.) aseq))\n   :clj\n   (defn into-array ^{:tag \"[[Ljava.lang.Object;\"} [aseq]\n     (clojure.core/into-array java.lang.Object aseq)))\n\n#?(:clj\n   (defmacro aget [arr i]\n     (if-cljs &env\n              (list 'js* \"(~{}[~{}])\" arr i)\n              `(clojure.lang.RT/aget ~(vary-meta arr assoc :tag \"[[Ljava.lang.Object;\") (int ~i)))))\n\n#?(:clj\n   (defmacro alength [arr]\n     (if-cljs &env\n              (-> (list 'js* \"~{}.length\" arr)\n                  (vary-meta assoc :tag 'number))\n              `(clojure.lang.RT/alength ~(vary-meta arr assoc :tag \"[[Ljava.lang.Object;\")))))\n\n#?(:clj\n   (defmacro aset [arr i v]\n     (if-cljs &env\n              (list 'js* \"(~{}[~{}] = ~{})\" arr i v)\n              `(clojure.lang.RT/aset ~(vary-meta arr assoc :tag \"[[Ljava.lang.Object;\") (int ~i) ~v))))\n\n#?(:clj\n   (defmacro array [& args]\n     (if-cljs &env\n              (->\n               (list* 'js* (str \"[\" (str/join \",\" (repeat (count args) \"~{}\")) \"]\") args)\n               (vary-meta assoc :tag 'array))\n              (let [len (count args)]\n                (if (zero? len)\n                  'clojure.lang.RT/EMPTY_ARRAY\n                  `(let [arr# (clojure.core/make-array java.lang.Object ~len)]\n                     (doto ^{:tag \"[[Ljava.lang.Object;\"} arr#\n                       ~@(map #(list 'aset % (nth args %)) (range len)))))))))\n\n#?(:clj\n   (defmacro acopy [from from-start from-end to to-start]\n     (if-cljs &env\n              `(let [l# (- ~from-end ~from-start)]\n                 (dotimes [i# l#]\n                   (aset ~to (+ i# ~to-start) (aget ~from (+ i# ~from-start)))))\n              `(let [l# (- ~from-end ~from-start)]\n                 (when (pos? l#)\n                   (System/arraycopy ~from ~from-start ~to ~to-start l#))))))\n\n(defn aclone [from]\n  #?(:clj  (Arrays/copyOf ^{:tag \"[[Ljava.lang.Object;\"} from (alength from))\n     :cljs (.slice from 0)))\n\n(defn aconcat [a b]\n  #?(:cljs (.concat a b)\n     :clj  (let [al  (alength a)\n                 bl  (alength b)\n                 res (Arrays/copyOf ^{:tag \"[[Ljava.lang.Object;\"} a (+ al bl))]\n             (System/arraycopy ^{:tag \"[[Ljava.lang.Object;\"} b 0 res al bl)\n             res)))\n\n#?(:cljs\n   (defn amap [f arr]\n     (.map arr f))\n   :clj\n   (defn amap\n     ([f arr]\n      (amap f Object arr))\n     ([f type arr] ;; TODO check if faster in Java\n      (let [res (clojure.core/make-array type (alength arr))]\n        (dotimes [i (alength arr)]\n          (aset res i (f (aget arr i))))\n        res))))\n\n(defn asort [arr cmp]\n  #?(:cljs (.sort arr cmp)\n     :clj  (doto arr (Arrays/parallelSort cmp))))\n\n#?(:cljs\n   (defn ^boolean array? [x]\n     (if (identical? *target* \"nodejs\")\n       (.isArray js/Array x)\n       (instance? js/Array x)))\n   :clj\n   (defn array? [^Object x]\n     (some-> x .getClass .isArray)))\n\n#?(:clj\n   (defmacro alast [arr]\n     `(let [arr# ~arr]\n        (aget arr# (dec (alength arr#))))))\n\n#?(:clj\n   (defmacro half [x]\n     `(unsigned-bit-shift-right ~x 1)))\n\n#?(:clj\n   (def array-type\n     (memoize\n      (fn [type]\n        (.getClass ^Object (java.lang.reflect.Array/newInstance ^Class type 0))))))\n"],"x_google_ignoreList":[0]}