datahike 0.7.1630
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/README.md +226 -0
- package/cljs.analyzer.api.js +427 -0
- package/cljs.analyzer.api.js.map +1 -0
- package/cljs.analyzer.impl.js +86 -0
- package/cljs.analyzer.impl.js.map +1 -0
- package/cljs.analyzer.impl.namespaces.js +219 -0
- package/cljs.analyzer.impl.namespaces.js.map +1 -0
- package/cljs.analyzer.js +7186 -0
- package/cljs.analyzer.js.map +1 -0
- package/cljs.analyzer.passes.and_or.js +141 -0
- package/cljs.analyzer.passes.and_or.js.map +1 -0
- package/cljs.analyzer.passes.js +104 -0
- package/cljs.analyzer.passes.js.map +1 -0
- package/cljs.cache.js +1145 -0
- package/cljs.cache.js.map +1 -0
- package/cljs.cache.wrapped.js +352 -0
- package/cljs.cache.wrapped.js.map +1 -0
- package/cljs.core.async.impl.buffers.js +489 -0
- package/cljs.core.async.impl.buffers.js.map +1 -0
- package/cljs.core.async.impl.channels.js +711 -0
- package/cljs.core.async.impl.channels.js.map +1 -0
- package/cljs.core.async.impl.dispatch.js +81 -0
- package/cljs.core.async.impl.dispatch.js.map +1 -0
- package/cljs.core.async.impl.ioc_helpers.js +192 -0
- package/cljs.core.async.impl.ioc_helpers.js.map +1 -0
- package/cljs.core.async.impl.protocols.js +368 -0
- package/cljs.core.async.impl.protocols.js.map +1 -0
- package/cljs.core.async.impl.timers.js +510 -0
- package/cljs.core.async.impl.timers.js.map +1 -0
- package/cljs.core.async.js +8813 -0
- package/cljs.core.async.js.map +1 -0
- package/cljs.core.js +38764 -0
- package/cljs.core.js.map +1 -0
- package/cljs.env.js +60 -0
- package/cljs.env.js.map +1 -0
- package/cljs.nodejs.js +80 -0
- package/cljs.nodejs.js.map +1 -0
- package/cljs.reader.js +462 -0
- package/cljs.reader.js.map +1 -0
- package/cljs.spec.alpha.js +5312 -0
- package/cljs.spec.alpha.js.map +1 -0
- package/cljs.spec.gen.alpha.js +2020 -0
- package/cljs.spec.gen.alpha.js.map +1 -0
- package/cljs.tagged_literals.js +103 -0
- package/cljs.tagged_literals.js.map +1 -0
- package/cljs.tools.reader.edn.js +960 -0
- package/cljs.tools.reader.edn.js.map +1 -0
- package/cljs.tools.reader.impl.commons.js +217 -0
- package/cljs.tools.reader.impl.commons.js.map +1 -0
- package/cljs.tools.reader.impl.errors.js +441 -0
- package/cljs.tools.reader.impl.errors.js.map +1 -0
- package/cljs.tools.reader.impl.inspect.js +182 -0
- package/cljs.tools.reader.impl.inspect.js.map +1 -0
- package/cljs.tools.reader.impl.utils.js +429 -0
- package/cljs.tools.reader.impl.utils.js.map +1 -0
- package/cljs.tools.reader.js +1830 -0
- package/cljs.tools.reader.js.map +1 -0
- package/cljs.tools.reader.reader_types.js +838 -0
- package/cljs.tools.reader.reader_types.js.map +1 -0
- package/cljs_env.js +18192 -0
- package/cljs_node_io.core.js +1278 -0
- package/cljs_node_io.core.js.map +1 -0
- package/cljs_node_io.file.js +918 -0
- package/cljs_node_io.file.js.map +1 -0
- package/cljs_node_io.fs.js +3911 -0
- package/cljs_node_io.fs.js.map +1 -0
- package/clojure.data.js +319 -0
- package/clojure.data.js.map +1 -0
- package/clojure.edn.js +119 -0
- package/clojure.edn.js.map +1 -0
- package/clojure.set.js +406 -0
- package/clojure.set.js.map +1 -0
- package/clojure.string.js +502 -0
- package/clojure.string.js.map +1 -0
- package/clojure.walk.js +156 -0
- package/clojure.walk.js.map +1 -0
- package/datahike.api.impl.js +621 -0
- package/datahike.api.impl.js.map +1 -0
- package/datahike.api.specification.js +85 -0
- package/datahike.api.specification.js.map +1 -0
- package/datahike.array.js +275 -0
- package/datahike.array.js.map +1 -0
- package/datahike.config.js +437 -0
- package/datahike.config.js.map +1 -0
- package/datahike.connections.js +55 -0
- package/datahike.connections.js.map +1 -0
- package/datahike.connector.js +1248 -0
- package/datahike.connector.js.map +1 -0
- package/datahike.constants.js +66 -0
- package/datahike.constants.js.map +1 -0
- package/datahike.core.js +628 -0
- package/datahike.core.js.map +1 -0
- package/datahike.datom.js +963 -0
- package/datahike.datom.js.map +1 -0
- package/datahike.db.interface.js +819 -0
- package/datahike.db.interface.js.map +1 -0
- package/datahike.db.js +3095 -0
- package/datahike.db.js.map +1 -0
- package/datahike.db.search.js +1004 -0
- package/datahike.db.search.js.map +1 -0
- package/datahike.db.transaction.js +1904 -0
- package/datahike.db.transaction.js.map +1 -0
- package/datahike.db.utils.js +642 -0
- package/datahike.db.utils.js.map +1 -0
- package/datahike.gc.js +1618 -0
- package/datahike.gc.js.map +1 -0
- package/datahike.impl.entity.js +604 -0
- package/datahike.impl.entity.js.map +1 -0
- package/datahike.index.interface.js +484 -0
- package/datahike.index.interface.js.map +1 -0
- package/datahike.index.js +50 -0
- package/datahike.index.js.map +1 -0
- package/datahike.index.persistent_set.js +1250 -0
- package/datahike.index.persistent_set.js.map +1 -0
- package/datahike.js.api.js +2211 -0
- package/datahike.js.api.js.map +1 -0
- package/datahike.lru.js +404 -0
- package/datahike.lru.js.map +1 -0
- package/datahike.pull_api.js +533 -0
- package/datahike.pull_api.js.map +1 -0
- package/datahike.query.js +11891 -0
- package/datahike.query.js.map +1 -0
- package/datahike.query_stats.js +152 -0
- package/datahike.query_stats.js.map +1 -0
- package/datahike.readers.js +166 -0
- package/datahike.readers.js.map +1 -0
- package/datahike.schema.js +251 -0
- package/datahike.schema.js.map +1 -0
- package/datahike.schema_cache.js +66 -0
- package/datahike.schema_cache.js.map +1 -0
- package/datahike.spec.js +70 -0
- package/datahike.spec.js.map +1 -0
- package/datahike.store.js +514 -0
- package/datahike.store.js.map +1 -0
- package/datahike.tools.js +436 -0
- package/datahike.tools.js.map +1 -0
- package/datahike.writer.js +3463 -0
- package/datahike.writer.js.map +1 -0
- package/datahike.writing.js +3168 -0
- package/datahike.writing.js.map +1 -0
- package/datalog.parser.impl.js +1421 -0
- package/datalog.parser.impl.js.map +1 -0
- package/datalog.parser.impl.proto.js +213 -0
- package/datalog.parser.impl.proto.js.map +1 -0
- package/datalog.parser.impl.util.js +117 -0
- package/datalog.parser.impl.util.js.map +1 -0
- package/datalog.parser.js +47 -0
- package/datalog.parser.js.map +1 -0
- package/datalog.parser.pull.js +2603 -0
- package/datalog.parser.pull.js.map +1 -0
- package/datalog.parser.type.js +7502 -0
- package/datalog.parser.type.js.map +1 -0
- package/datalog.parser.util.js +60 -0
- package/datalog.parser.util.js.map +1 -0
- package/environ.core.js +263 -0
- package/environ.core.js.map +1 -0
- package/fress.api.js +607 -0
- package/fress.api.js.map +1 -0
- package/fress.impl.adler32.js +435 -0
- package/fress.impl.adler32.js.map +1 -0
- package/fress.impl.bigint.js +185 -0
- package/fress.impl.bigint.js.map +1 -0
- package/fress.impl.buffer.js +1087 -0
- package/fress.impl.buffer.js.map +1 -0
- package/fress.impl.codes.js +105 -0
- package/fress.impl.codes.js.map +1 -0
- package/fress.impl.hopmap.js +603 -0
- package/fress.impl.hopmap.js.map +1 -0
- package/fress.impl.ranges.js +49 -0
- package/fress.impl.ranges.js.map +1 -0
- package/fress.impl.raw_input.js +837 -0
- package/fress.impl.raw_input.js.map +1 -0
- package/fress.impl.raw_output.js +653 -0
- package/fress.impl.raw_output.js.map +1 -0
- package/fress.impl.table.js +133 -0
- package/fress.impl.table.js.map +1 -0
- package/fress.reader.js +2312 -0
- package/fress.reader.js.map +1 -0
- package/fress.util.js +458 -0
- package/fress.util.js.map +1 -0
- package/fress.writer.js +2141 -0
- package/fress.writer.js.map +1 -0
- package/geheimnis.aes.js +132 -0
- package/geheimnis.aes.js.map +1 -0
- package/hasch.base64.js +42 -0
- package/hasch.base64.js.map +1 -0
- package/hasch.benc.js +201 -0
- package/hasch.benc.js.map +1 -0
- package/hasch.core.js +188 -0
- package/hasch.core.js.map +1 -0
- package/hasch.platform.js +221 -0
- package/hasch.platform.js.map +1 -0
- package/incognito.base.js +276 -0
- package/incognito.base.js.map +1 -0
- package/incognito.edn.js +54 -0
- package/incognito.edn.js.map +1 -0
- package/incognito.fressian.js +330 -0
- package/incognito.fressian.js.map +1 -0
- package/index.d.ts +660 -0
- package/is.simm.partial_cps.async.js +142 -0
- package/is.simm.partial_cps.async.js.map +1 -0
- package/is.simm.partial_cps.runtime.js +65 -0
- package/is.simm.partial_cps.runtime.js.map +1 -0
- package/is.simm.partial_cps.sequence.js +1255 -0
- package/is.simm.partial_cps.sequence.js.map +1 -0
- package/konserve.cache.js +2519 -0
- package/konserve.cache.js.map +1 -0
- package/konserve.compressor.js +502 -0
- package/konserve.compressor.js.map +1 -0
- package/konserve.core.js +8052 -0
- package/konserve.core.js.map +1 -0
- package/konserve.encryptor.js +553 -0
- package/konserve.encryptor.js.map +1 -0
- package/konserve.gc.js +541 -0
- package/konserve.gc.js.map +1 -0
- package/konserve.impl.defaults.js +8290 -0
- package/konserve.impl.defaults.js.map +1 -0
- package/konserve.impl.storage_layout.js +849 -0
- package/konserve.impl.storage_layout.js.map +1 -0
- package/konserve.memory.js +2102 -0
- package/konserve.memory.js.map +1 -0
- package/konserve.node_filestore.js +2951 -0
- package/konserve.node_filestore.js.map +1 -0
- package/konserve.protocols.js +590 -0
- package/konserve.protocols.js.map +1 -0
- package/konserve.serializers.js +562 -0
- package/konserve.serializers.js.map +1 -0
- package/konserve.store.js +2245 -0
- package/konserve.store.js.map +1 -0
- package/konserve.tiered.js +9574 -0
- package/konserve.tiered.js.map +1 -0
- package/konserve.utils.js +180 -0
- package/konserve.utils.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.arrays.js +66 -0
- package/me.tonsky.persistent_sorted_set.arrays.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.branch.js +2779 -0
- package/me.tonsky.persistent_sorted_set.branch.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.btset.js +14196 -0
- package/me.tonsky.persistent_sorted_set.btset.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.impl.node.js +324 -0
- package/me.tonsky.persistent_sorted_set.impl.node.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.impl.storage.js +123 -0
- package/me.tonsky.persistent_sorted_set.impl.storage.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.js +890 -0
- package/me.tonsky.persistent_sorted_set.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.leaf.js +561 -0
- package/me.tonsky.persistent_sorted_set.leaf.js.map +1 -0
- package/me.tonsky.persistent_sorted_set.util.js +402 -0
- package/me.tonsky.persistent_sorted_set.util.js.map +1 -0
- package/medley.core.js +1857 -0
- package/medley.core.js.map +1 -0
- package/package.json +38 -0
- package/spec_tools.core.js +1925 -0
- package/spec_tools.core.js.map +1 -0
- package/spec_tools.data_spec.js +1291 -0
- package/spec_tools.data_spec.js.map +1 -0
- package/spec_tools.form.js +185 -0
- package/spec_tools.form.js.map +1 -0
- package/spec_tools.impl.js +362 -0
- package/spec_tools.impl.js.map +1 -0
- package/spec_tools.parse.js +427 -0
- package/spec_tools.parse.js.map +1 -0
- package/spec_tools.transform.js +288 -0
- package/spec_tools.transform.js.map +1 -0
- package/superv.async.js +8617 -0
- package/superv.async.js.map +1 -0
- package/tailrecursion.priority_map.js +994 -0
- package/tailrecursion.priority_map.js.map +1 -0
- package/taoensso.encore.js +12385 -0
- package/taoensso.encore.js.map +1 -0
- package/taoensso.timbre.appenders.core.js +239 -0
- package/taoensso.timbre.appenders.core.js.map +1 -0
- package/taoensso.timbre.js +1264 -0
- package/taoensso.timbre.js.map +1 -0
- package/taoensso.truss.impl.js +442 -0
- package/taoensso.truss.impl.js.map +1 -0
- package/taoensso.truss.js +743 -0
- package/taoensso.truss.js.map +1 -0
- package/test-config-keys.js +33 -0
- package/test-final.js +36 -0
- package/test-key-duplication.js +67 -0
- package/test.js +557 -0
package/medley.core.js
ADDED
|
@@ -0,0 +1,1857 @@
|
|
|
1
|
+
var $CLJS = require("./cljs_env");
|
|
2
|
+
var $jscomp = $CLJS.$jscomp;
|
|
3
|
+
var COMPILED = false;
|
|
4
|
+
require("./cljs.core.js");
|
|
5
|
+
var environ=$CLJS.environ || ($CLJS.environ = {});
|
|
6
|
+
var fress=$CLJS.fress || ($CLJS.fress = {});
|
|
7
|
+
var datahike=$CLJS.datahike || ($CLJS.datahike = {});
|
|
8
|
+
var clojure=$CLJS.clojure || ($CLJS.clojure = {});
|
|
9
|
+
var hasch=$CLJS.hasch || ($CLJS.hasch = {});
|
|
10
|
+
var tailrecursion=$CLJS.tailrecursion || ($CLJS.tailrecursion = {});
|
|
11
|
+
var superv=$CLJS.superv || ($CLJS.superv = {});
|
|
12
|
+
var geheimnis=$CLJS.geheimnis || ($CLJS.geheimnis = {});
|
|
13
|
+
var is=$CLJS.is || ($CLJS.is = {});
|
|
14
|
+
var cljs=$CLJS.cljs || ($CLJS.cljs = {});
|
|
15
|
+
var cljs_node_io=$CLJS.cljs_node_io || ($CLJS.cljs_node_io = {});
|
|
16
|
+
var goog=$CLJS.goog || ($CLJS.goog = {});
|
|
17
|
+
var konserve=$CLJS.konserve || ($CLJS.konserve = {});
|
|
18
|
+
var datalog=$CLJS.datalog || ($CLJS.datalog = {});
|
|
19
|
+
var spec_tools=$CLJS.spec_tools || ($CLJS.spec_tools = {});
|
|
20
|
+
var taoensso=$CLJS.taoensso || ($CLJS.taoensso = {});
|
|
21
|
+
var incognito=$CLJS.incognito || ($CLJS.incognito = {});
|
|
22
|
+
var medley=$CLJS.medley || ($CLJS.medley = {});
|
|
23
|
+
var me=$CLJS.me || ($CLJS.me = {});
|
|
24
|
+
|
|
25
|
+
$CLJS.SHADOW_ENV.setLoaded("medley.core.js");
|
|
26
|
+
|
|
27
|
+
goog.provide('medley.core');
|
|
28
|
+
/**
|
|
29
|
+
* Finds the first item in a collection that matches a predicate. Returns a
|
|
30
|
+
* transducer when no collection is provided.
|
|
31
|
+
*/
|
|
32
|
+
medley.core.find_first = (function medley$core$find_first(var_args){
|
|
33
|
+
var G__105598 = arguments.length;
|
|
34
|
+
switch (G__105598) {
|
|
35
|
+
case 1:
|
|
36
|
+
return medley.core.find_first.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
37
|
+
|
|
38
|
+
break;
|
|
39
|
+
case 2:
|
|
40
|
+
return medley.core.find_first.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
41
|
+
|
|
42
|
+
break;
|
|
43
|
+
default:
|
|
44
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
45
|
+
|
|
46
|
+
}
|
|
47
|
+
});
|
|
48
|
+
|
|
49
|
+
(medley.core.find_first.cljs$core$IFn$_invoke$arity$1 = (function (pred){
|
|
50
|
+
return (function (rf){
|
|
51
|
+
return (function() {
|
|
52
|
+
var G__105866 = null;
|
|
53
|
+
var G__105866__0 = (function (){
|
|
54
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
55
|
+
});
|
|
56
|
+
var G__105866__1 = (function (result){
|
|
57
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
58
|
+
});
|
|
59
|
+
var G__105866__2 = (function (result,x){
|
|
60
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(x) : pred.call(null, x)))){
|
|
61
|
+
return cljs.core.ensure_reduced((rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x)));
|
|
62
|
+
} else {
|
|
63
|
+
return result;
|
|
64
|
+
}
|
|
65
|
+
});
|
|
66
|
+
G__105866 = function(result,x){
|
|
67
|
+
switch(arguments.length){
|
|
68
|
+
case 0:
|
|
69
|
+
return G__105866__0.call(this);
|
|
70
|
+
case 1:
|
|
71
|
+
return G__105866__1.call(this,result);
|
|
72
|
+
case 2:
|
|
73
|
+
return G__105866__2.call(this,result,x);
|
|
74
|
+
}
|
|
75
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
76
|
+
};
|
|
77
|
+
G__105866.cljs$core$IFn$_invoke$arity$0 = G__105866__0;
|
|
78
|
+
G__105866.cljs$core$IFn$_invoke$arity$1 = G__105866__1;
|
|
79
|
+
G__105866.cljs$core$IFn$_invoke$arity$2 = G__105866__2;
|
|
80
|
+
return G__105866;
|
|
81
|
+
})()
|
|
82
|
+
});
|
|
83
|
+
}));
|
|
84
|
+
|
|
85
|
+
(medley.core.find_first.cljs$core$IFn$_invoke$arity$2 = (function (pred,coll){
|
|
86
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3((function (_,x){
|
|
87
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(x) : pred.call(null, x)))){
|
|
88
|
+
return cljs.core.reduced(x);
|
|
89
|
+
} else {
|
|
90
|
+
return null;
|
|
91
|
+
}
|
|
92
|
+
}),null,coll);
|
|
93
|
+
}));
|
|
94
|
+
|
|
95
|
+
(medley.core.find_first.cljs$lang$maxFixedArity = 2);
|
|
96
|
+
|
|
97
|
+
/**
|
|
98
|
+
* Dissociate a value in a nested associative structure, identified by a sequence
|
|
99
|
+
* of keys. Any collections left empty by the operation will be dissociated from
|
|
100
|
+
* their containing structures.
|
|
101
|
+
*/
|
|
102
|
+
medley.core.dissoc_in = (function medley$core$dissoc_in(var_args){
|
|
103
|
+
var G__105603 = arguments.length;
|
|
104
|
+
switch (G__105603) {
|
|
105
|
+
case 2:
|
|
106
|
+
return medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
107
|
+
|
|
108
|
+
break;
|
|
109
|
+
default:
|
|
110
|
+
var args_arr__5751__auto__ = [];
|
|
111
|
+
var len__5726__auto___105870 = arguments.length;
|
|
112
|
+
var i__5727__auto___105871 = (0);
|
|
113
|
+
while(true){
|
|
114
|
+
if((i__5727__auto___105871 < len__5726__auto___105870)){
|
|
115
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105871]));
|
|
116
|
+
|
|
117
|
+
var G__105872 = (i__5727__auto___105871 + (1));
|
|
118
|
+
i__5727__auto___105871 = G__105872;
|
|
119
|
+
continue;
|
|
120
|
+
} else {
|
|
121
|
+
}
|
|
122
|
+
break;
|
|
123
|
+
}
|
|
124
|
+
|
|
125
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
126
|
+
return medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
127
|
+
|
|
128
|
+
}
|
|
129
|
+
});
|
|
130
|
+
|
|
131
|
+
(medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$2 = (function (m,ks){
|
|
132
|
+
var temp__5802__auto__ = cljs.core.seq(ks);
|
|
133
|
+
if(temp__5802__auto__){
|
|
134
|
+
var vec__105604 = temp__5802__auto__;
|
|
135
|
+
var seq__105605 = cljs.core.seq(vec__105604);
|
|
136
|
+
var first__105606 = cljs.core.first(seq__105605);
|
|
137
|
+
var seq__105605__$1 = cljs.core.next(seq__105605);
|
|
138
|
+
var k = first__105606;
|
|
139
|
+
var ks__$1 = seq__105605__$1;
|
|
140
|
+
if(cljs.core.seq(ks__$1)){
|
|
141
|
+
var v = medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$2(cljs.core.get.cljs$core$IFn$_invoke$arity$2(m,k),ks__$1);
|
|
142
|
+
if(cljs.core.empty_QMARK_(v)){
|
|
143
|
+
return cljs.core.dissoc.cljs$core$IFn$_invoke$arity$2(m,k);
|
|
144
|
+
} else {
|
|
145
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,v);
|
|
146
|
+
}
|
|
147
|
+
} else {
|
|
148
|
+
return cljs.core.dissoc.cljs$core$IFn$_invoke$arity$2(m,k);
|
|
149
|
+
}
|
|
150
|
+
} else {
|
|
151
|
+
return m;
|
|
152
|
+
}
|
|
153
|
+
}));
|
|
154
|
+
|
|
155
|
+
(medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$variadic = (function (m,ks,kss){
|
|
156
|
+
while(true){
|
|
157
|
+
var temp__5802__auto__ = cljs.core.seq(kss);
|
|
158
|
+
if(temp__5802__auto__){
|
|
159
|
+
var vec__105607 = temp__5802__auto__;
|
|
160
|
+
var seq__105608 = cljs.core.seq(vec__105607);
|
|
161
|
+
var first__105609 = cljs.core.first(seq__105608);
|
|
162
|
+
var seq__105608__$1 = cljs.core.next(seq__105608);
|
|
163
|
+
var ks_SINGLEQUOTE_ = first__105609;
|
|
164
|
+
var kss__$1 = seq__105608__$1;
|
|
165
|
+
var G__105875 = medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$2(m,ks);
|
|
166
|
+
var G__105876 = ks_SINGLEQUOTE_;
|
|
167
|
+
var G__105877 = kss__$1;
|
|
168
|
+
m = G__105875;
|
|
169
|
+
ks = G__105876;
|
|
170
|
+
kss = G__105877;
|
|
171
|
+
continue;
|
|
172
|
+
} else {
|
|
173
|
+
return medley.core.dissoc_in.cljs$core$IFn$_invoke$arity$2(m,ks);
|
|
174
|
+
}
|
|
175
|
+
break;
|
|
176
|
+
}
|
|
177
|
+
}));
|
|
178
|
+
|
|
179
|
+
/** @this {Function} */
|
|
180
|
+
(medley.core.dissoc_in.cljs$lang$applyTo = (function (seq105600){
|
|
181
|
+
var G__105601 = cljs.core.first(seq105600);
|
|
182
|
+
var seq105600__$1 = cljs.core.next(seq105600);
|
|
183
|
+
var G__105602 = cljs.core.first(seq105600__$1);
|
|
184
|
+
var seq105600__$2 = cljs.core.next(seq105600__$1);
|
|
185
|
+
var self__5711__auto__ = this;
|
|
186
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105601,G__105602,seq105600__$2);
|
|
187
|
+
}));
|
|
188
|
+
|
|
189
|
+
(medley.core.dissoc_in.cljs$lang$maxFixedArity = (2));
|
|
190
|
+
|
|
191
|
+
/**
|
|
192
|
+
* Associates a key k, with a value v in a map m, if and only if v is not nil.
|
|
193
|
+
*/
|
|
194
|
+
medley.core.assoc_some = (function medley$core$assoc_some(var_args){
|
|
195
|
+
var G__105624 = arguments.length;
|
|
196
|
+
switch (G__105624) {
|
|
197
|
+
case 3:
|
|
198
|
+
return medley.core.assoc_some.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
|
|
199
|
+
|
|
200
|
+
break;
|
|
201
|
+
default:
|
|
202
|
+
var args_arr__5751__auto__ = [];
|
|
203
|
+
var len__5726__auto___105880 = arguments.length;
|
|
204
|
+
var i__5727__auto___105881 = (0);
|
|
205
|
+
while(true){
|
|
206
|
+
if((i__5727__auto___105881 < len__5726__auto___105880)){
|
|
207
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105881]));
|
|
208
|
+
|
|
209
|
+
var G__105882 = (i__5727__auto___105881 + (1));
|
|
210
|
+
i__5727__auto___105881 = G__105882;
|
|
211
|
+
continue;
|
|
212
|
+
} else {
|
|
213
|
+
}
|
|
214
|
+
break;
|
|
215
|
+
}
|
|
216
|
+
|
|
217
|
+
var argseq__5752__auto__ = ((((3) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((3)),(0),null)):null);
|
|
218
|
+
return medley.core.assoc_some.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),argseq__5752__auto__);
|
|
219
|
+
|
|
220
|
+
}
|
|
221
|
+
});
|
|
222
|
+
|
|
223
|
+
(medley.core.assoc_some.cljs$core$IFn$_invoke$arity$3 = (function (m,k,v){
|
|
224
|
+
if((v == null)){
|
|
225
|
+
return m;
|
|
226
|
+
} else {
|
|
227
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,v);
|
|
228
|
+
}
|
|
229
|
+
}));
|
|
230
|
+
|
|
231
|
+
(medley.core.assoc_some.cljs$core$IFn$_invoke$arity$variadic = (function (m,k,v,kvs){
|
|
232
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3((function (m__$1,p__105629){
|
|
233
|
+
var vec__105630 = p__105629;
|
|
234
|
+
var k__$1 = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__105630,(0),null);
|
|
235
|
+
var v__$1 = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__105630,(1),null);
|
|
236
|
+
return medley.core.assoc_some.cljs$core$IFn$_invoke$arity$3(m__$1,k__$1,v__$1);
|
|
237
|
+
}),medley.core.assoc_some.cljs$core$IFn$_invoke$arity$3(m,k,v),cljs.core.partition.cljs$core$IFn$_invoke$arity$2((2),kvs));
|
|
238
|
+
}));
|
|
239
|
+
|
|
240
|
+
/** @this {Function} */
|
|
241
|
+
(medley.core.assoc_some.cljs$lang$applyTo = (function (seq105620){
|
|
242
|
+
var G__105621 = cljs.core.first(seq105620);
|
|
243
|
+
var seq105620__$1 = cljs.core.next(seq105620);
|
|
244
|
+
var G__105622 = cljs.core.first(seq105620__$1);
|
|
245
|
+
var seq105620__$2 = cljs.core.next(seq105620__$1);
|
|
246
|
+
var G__105623 = cljs.core.first(seq105620__$2);
|
|
247
|
+
var seq105620__$3 = cljs.core.next(seq105620__$2);
|
|
248
|
+
var self__5711__auto__ = this;
|
|
249
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105621,G__105622,G__105623,seq105620__$3);
|
|
250
|
+
}));
|
|
251
|
+
|
|
252
|
+
(medley.core.assoc_some.cljs$lang$maxFixedArity = (3));
|
|
253
|
+
|
|
254
|
+
/**
|
|
255
|
+
* Updates a value in a map given a key and a function, if and only if the key
|
|
256
|
+
* exists in the map. See: `clojure.core/update`.
|
|
257
|
+
*/
|
|
258
|
+
medley.core.update_existing = (function medley$core$update_existing(var_args){
|
|
259
|
+
var G__105645 = arguments.length;
|
|
260
|
+
switch (G__105645) {
|
|
261
|
+
case 3:
|
|
262
|
+
return medley.core.update_existing.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
|
|
263
|
+
|
|
264
|
+
break;
|
|
265
|
+
case 4:
|
|
266
|
+
return medley.core.update_existing.cljs$core$IFn$_invoke$arity$4((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]));
|
|
267
|
+
|
|
268
|
+
break;
|
|
269
|
+
case 5:
|
|
270
|
+
return medley.core.update_existing.cljs$core$IFn$_invoke$arity$5((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]),(arguments[(4)]));
|
|
271
|
+
|
|
272
|
+
break;
|
|
273
|
+
case 6:
|
|
274
|
+
return medley.core.update_existing.cljs$core$IFn$_invoke$arity$6((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]),(arguments[(4)]),(arguments[(5)]));
|
|
275
|
+
|
|
276
|
+
break;
|
|
277
|
+
default:
|
|
278
|
+
var args_arr__5751__auto__ = [];
|
|
279
|
+
var len__5726__auto___105886 = arguments.length;
|
|
280
|
+
var i__5727__auto___105887 = (0);
|
|
281
|
+
while(true){
|
|
282
|
+
if((i__5727__auto___105887 < len__5726__auto___105886)){
|
|
283
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105887]));
|
|
284
|
+
|
|
285
|
+
var G__105889 = (i__5727__auto___105887 + (1));
|
|
286
|
+
i__5727__auto___105887 = G__105889;
|
|
287
|
+
continue;
|
|
288
|
+
} else {
|
|
289
|
+
}
|
|
290
|
+
break;
|
|
291
|
+
}
|
|
292
|
+
|
|
293
|
+
var argseq__5752__auto__ = ((((6) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((6)),(0),null)):null);
|
|
294
|
+
return medley.core.update_existing.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),(arguments[(3)]),(arguments[(4)]),(arguments[(5)]),argseq__5752__auto__);
|
|
295
|
+
|
|
296
|
+
}
|
|
297
|
+
});
|
|
298
|
+
|
|
299
|
+
(medley.core.update_existing.cljs$core$IFn$_invoke$arity$3 = (function (m,k,f){
|
|
300
|
+
var temp__5802__auto__ = cljs.core.find(m,k);
|
|
301
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
302
|
+
var kv = temp__5802__auto__;
|
|
303
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,(function (){var G__105646 = cljs.core.val(kv);
|
|
304
|
+
return (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(G__105646) : f.call(null, G__105646));
|
|
305
|
+
})());
|
|
306
|
+
} else {
|
|
307
|
+
return m;
|
|
308
|
+
}
|
|
309
|
+
}));
|
|
310
|
+
|
|
311
|
+
(medley.core.update_existing.cljs$core$IFn$_invoke$arity$4 = (function (m,k,f,x){
|
|
312
|
+
var temp__5802__auto__ = cljs.core.find(m,k);
|
|
313
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
314
|
+
var kv = temp__5802__auto__;
|
|
315
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,(function (){var G__105647 = cljs.core.val(kv);
|
|
316
|
+
var G__105648 = x;
|
|
317
|
+
return (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(G__105647,G__105648) : f.call(null, G__105647,G__105648));
|
|
318
|
+
})());
|
|
319
|
+
} else {
|
|
320
|
+
return m;
|
|
321
|
+
}
|
|
322
|
+
}));
|
|
323
|
+
|
|
324
|
+
(medley.core.update_existing.cljs$core$IFn$_invoke$arity$5 = (function (m,k,f,x,y){
|
|
325
|
+
var temp__5802__auto__ = cljs.core.find(m,k);
|
|
326
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
327
|
+
var kv = temp__5802__auto__;
|
|
328
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,(function (){var G__105649 = cljs.core.val(kv);
|
|
329
|
+
var G__105650 = x;
|
|
330
|
+
var G__105651 = y;
|
|
331
|
+
return (f.cljs$core$IFn$_invoke$arity$3 ? f.cljs$core$IFn$_invoke$arity$3(G__105649,G__105650,G__105651) : f.call(null, G__105649,G__105650,G__105651));
|
|
332
|
+
})());
|
|
333
|
+
} else {
|
|
334
|
+
return m;
|
|
335
|
+
}
|
|
336
|
+
}));
|
|
337
|
+
|
|
338
|
+
(medley.core.update_existing.cljs$core$IFn$_invoke$arity$6 = (function (m,k,f,x,y,z){
|
|
339
|
+
var temp__5802__auto__ = cljs.core.find(m,k);
|
|
340
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
341
|
+
var kv = temp__5802__auto__;
|
|
342
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,(function (){var G__105652 = cljs.core.val(kv);
|
|
343
|
+
var G__105653 = x;
|
|
344
|
+
var G__105654 = y;
|
|
345
|
+
var G__105655 = z;
|
|
346
|
+
return (f.cljs$core$IFn$_invoke$arity$4 ? f.cljs$core$IFn$_invoke$arity$4(G__105652,G__105653,G__105654,G__105655) : f.call(null, G__105652,G__105653,G__105654,G__105655));
|
|
347
|
+
})());
|
|
348
|
+
} else {
|
|
349
|
+
return m;
|
|
350
|
+
}
|
|
351
|
+
}));
|
|
352
|
+
|
|
353
|
+
(medley.core.update_existing.cljs$core$IFn$_invoke$arity$variadic = (function (m,k,f,x,y,z,more){
|
|
354
|
+
var temp__5802__auto__ = cljs.core.find(m,k);
|
|
355
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
356
|
+
var kv = temp__5802__auto__;
|
|
357
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,cljs.core.apply.cljs$core$IFn$_invoke$arity$variadic(f,cljs.core.val(kv),x,y,z,cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([more], 0)));
|
|
358
|
+
} else {
|
|
359
|
+
return m;
|
|
360
|
+
}
|
|
361
|
+
}));
|
|
362
|
+
|
|
363
|
+
/** @this {Function} */
|
|
364
|
+
(medley.core.update_existing.cljs$lang$applyTo = (function (seq105638){
|
|
365
|
+
var G__105639 = cljs.core.first(seq105638);
|
|
366
|
+
var seq105638__$1 = cljs.core.next(seq105638);
|
|
367
|
+
var G__105640 = cljs.core.first(seq105638__$1);
|
|
368
|
+
var seq105638__$2 = cljs.core.next(seq105638__$1);
|
|
369
|
+
var G__105641 = cljs.core.first(seq105638__$2);
|
|
370
|
+
var seq105638__$3 = cljs.core.next(seq105638__$2);
|
|
371
|
+
var G__105642 = cljs.core.first(seq105638__$3);
|
|
372
|
+
var seq105638__$4 = cljs.core.next(seq105638__$3);
|
|
373
|
+
var G__105643 = cljs.core.first(seq105638__$4);
|
|
374
|
+
var seq105638__$5 = cljs.core.next(seq105638__$4);
|
|
375
|
+
var G__105644 = cljs.core.first(seq105638__$5);
|
|
376
|
+
var seq105638__$6 = cljs.core.next(seq105638__$5);
|
|
377
|
+
var self__5711__auto__ = this;
|
|
378
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105639,G__105640,G__105641,G__105642,G__105643,G__105644,seq105638__$6);
|
|
379
|
+
}));
|
|
380
|
+
|
|
381
|
+
(medley.core.update_existing.cljs$lang$maxFixedArity = (6));
|
|
382
|
+
|
|
383
|
+
/**
|
|
384
|
+
* Updates a value in a nested associative structure, if and only if the key
|
|
385
|
+
* path exists. See: `clojure.core/update-in`.
|
|
386
|
+
*/
|
|
387
|
+
medley.core.update_existing_in = (function medley$core$update_existing_in(var_args){
|
|
388
|
+
var args__5732__auto__ = [];
|
|
389
|
+
var len__5726__auto___105895 = arguments.length;
|
|
390
|
+
var i__5727__auto___105896 = (0);
|
|
391
|
+
while(true){
|
|
392
|
+
if((i__5727__auto___105896 < len__5726__auto___105895)){
|
|
393
|
+
args__5732__auto__.push((arguments[i__5727__auto___105896]));
|
|
394
|
+
|
|
395
|
+
var G__105897 = (i__5727__auto___105896 + (1));
|
|
396
|
+
i__5727__auto___105896 = G__105897;
|
|
397
|
+
continue;
|
|
398
|
+
} else {
|
|
399
|
+
}
|
|
400
|
+
break;
|
|
401
|
+
}
|
|
402
|
+
|
|
403
|
+
var argseq__5733__auto__ = ((((3) < args__5732__auto__.length))?(new cljs.core.IndexedSeq(args__5732__auto__.slice((3)),(0),null)):null);
|
|
404
|
+
return medley.core.update_existing_in.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),(arguments[(2)]),argseq__5733__auto__);
|
|
405
|
+
});
|
|
406
|
+
|
|
407
|
+
(medley.core.update_existing_in.cljs$core$IFn$_invoke$arity$variadic = (function (m,ks,f,args){
|
|
408
|
+
var up = (function medley$core$up(m__$1,ks__$1,f__$1,args__$1){
|
|
409
|
+
var vec__105663 = ks__$1;
|
|
410
|
+
var seq__105664 = cljs.core.seq(vec__105663);
|
|
411
|
+
var first__105665 = cljs.core.first(seq__105664);
|
|
412
|
+
var seq__105664__$1 = cljs.core.next(seq__105664);
|
|
413
|
+
var k = first__105665;
|
|
414
|
+
var ks__$2 = seq__105664__$1;
|
|
415
|
+
var temp__5802__auto__ = cljs.core.find(m__$1,k);
|
|
416
|
+
if(cljs.core.truth_(temp__5802__auto__)){
|
|
417
|
+
var kv = temp__5802__auto__;
|
|
418
|
+
if(ks__$2){
|
|
419
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m__$1,k,medley$core$up(cljs.core.val(kv),ks__$2,f__$1,args__$1));
|
|
420
|
+
} else {
|
|
421
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m__$1,k,cljs.core.apply.cljs$core$IFn$_invoke$arity$3(f__$1,cljs.core.val(kv),args__$1));
|
|
422
|
+
}
|
|
423
|
+
} else {
|
|
424
|
+
return m__$1;
|
|
425
|
+
}
|
|
426
|
+
});
|
|
427
|
+
return up(m,ks,f,args);
|
|
428
|
+
}));
|
|
429
|
+
|
|
430
|
+
(medley.core.update_existing_in.cljs$lang$maxFixedArity = (3));
|
|
431
|
+
|
|
432
|
+
/** @this {Function} */
|
|
433
|
+
(medley.core.update_existing_in.cljs$lang$applyTo = (function (seq105658){
|
|
434
|
+
var G__105659 = cljs.core.first(seq105658);
|
|
435
|
+
var seq105658__$1 = cljs.core.next(seq105658);
|
|
436
|
+
var G__105660 = cljs.core.first(seq105658__$1);
|
|
437
|
+
var seq105658__$2 = cljs.core.next(seq105658__$1);
|
|
438
|
+
var G__105661 = cljs.core.first(seq105658__$2);
|
|
439
|
+
var seq105658__$3 = cljs.core.next(seq105658__$2);
|
|
440
|
+
var self__5711__auto__ = this;
|
|
441
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105659,G__105660,G__105661,seq105658__$3);
|
|
442
|
+
}));
|
|
443
|
+
|
|
444
|
+
medley.core.editable_QMARK_ = (function medley$core$editable_QMARK_(coll){
|
|
445
|
+
if((!((coll == null)))){
|
|
446
|
+
if((((coll.cljs$lang$protocol_mask$partition1$ & (4))) || ((cljs.core.PROTOCOL_SENTINEL === coll.cljs$core$IEditableCollection$)))){
|
|
447
|
+
return true;
|
|
448
|
+
} else {
|
|
449
|
+
if((!coll.cljs$lang$protocol_mask$partition1$)){
|
|
450
|
+
return cljs.core.native_satisfies_QMARK_(cljs.core.IEditableCollection,coll);
|
|
451
|
+
} else {
|
|
452
|
+
return false;
|
|
453
|
+
}
|
|
454
|
+
}
|
|
455
|
+
} else {
|
|
456
|
+
return cljs.core.native_satisfies_QMARK_(cljs.core.IEditableCollection,coll);
|
|
457
|
+
}
|
|
458
|
+
});
|
|
459
|
+
medley.core.reduce_map = (function medley$core$reduce_map(f,coll){
|
|
460
|
+
var coll_SINGLEQUOTE_ = ((cljs.core.record_QMARK_(coll))?cljs.core.into.cljs$core$IFn$_invoke$arity$2(cljs.core.PersistentArrayMap.EMPTY,coll):coll);
|
|
461
|
+
if(medley.core.editable_QMARK_(coll_SINGLEQUOTE_)){
|
|
462
|
+
return cljs.core.persistent_BANG_(cljs.core.reduce_kv((f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(cljs.core.assoc_BANG_) : f.call(null, cljs.core.assoc_BANG_)),cljs.core.transient$(cljs.core.empty(coll_SINGLEQUOTE_)),coll_SINGLEQUOTE_));
|
|
463
|
+
} else {
|
|
464
|
+
return cljs.core.reduce_kv((f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(cljs.core.assoc) : f.call(null, cljs.core.assoc)),cljs.core.empty(coll_SINGLEQUOTE_),coll_SINGLEQUOTE_);
|
|
465
|
+
}
|
|
466
|
+
});
|
|
467
|
+
/**
|
|
468
|
+
* Create a map entry for a key and value pair.
|
|
469
|
+
*/
|
|
470
|
+
medley.core.map_entry = (function medley$core$map_entry(k,v){
|
|
471
|
+
return (new cljs.core.MapEntry(k,v,null));
|
|
472
|
+
});
|
|
473
|
+
/**
|
|
474
|
+
* Maps a function over the key/value pairs of an associative collection. Expects
|
|
475
|
+
* a function that takes two arguments, the key and value, and returns the new
|
|
476
|
+
* key and value as a collection of two elements.
|
|
477
|
+
*/
|
|
478
|
+
medley.core.map_kv = (function medley$core$map_kv(f,coll){
|
|
479
|
+
return medley.core.reduce_map((function (xf){
|
|
480
|
+
return (function (m,k,v){
|
|
481
|
+
var vec__105673 = (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(k,v) : f.call(null, k,v));
|
|
482
|
+
var k__$1 = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__105673,(0),null);
|
|
483
|
+
var v__$1 = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__105673,(1),null);
|
|
484
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(m,k__$1,v__$1) : xf.call(null, m,k__$1,v__$1));
|
|
485
|
+
});
|
|
486
|
+
}),coll);
|
|
487
|
+
});
|
|
488
|
+
/**
|
|
489
|
+
* Maps a function over the keys of an associative collection.
|
|
490
|
+
*/
|
|
491
|
+
medley.core.map_keys = (function medley$core$map_keys(f,coll){
|
|
492
|
+
return medley.core.reduce_map((function (xf){
|
|
493
|
+
return (function (m,k,v){
|
|
494
|
+
var G__105676 = m;
|
|
495
|
+
var G__105677 = (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(k) : f.call(null, k));
|
|
496
|
+
var G__105678 = v;
|
|
497
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(G__105676,G__105677,G__105678) : xf.call(null, G__105676,G__105677,G__105678));
|
|
498
|
+
});
|
|
499
|
+
}),coll);
|
|
500
|
+
});
|
|
501
|
+
/**
|
|
502
|
+
* Maps a function over the values of one or more associative collections.
|
|
503
|
+
* The function should accept number-of-colls arguments. Any keys which are not
|
|
504
|
+
* shared among all collections are ignored.
|
|
505
|
+
*/
|
|
506
|
+
medley.core.map_vals = (function medley$core$map_vals(var_args){
|
|
507
|
+
var G__105686 = arguments.length;
|
|
508
|
+
switch (G__105686) {
|
|
509
|
+
case 2:
|
|
510
|
+
return medley.core.map_vals.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
511
|
+
|
|
512
|
+
break;
|
|
513
|
+
default:
|
|
514
|
+
var args_arr__5751__auto__ = [];
|
|
515
|
+
var len__5726__auto___105907 = arguments.length;
|
|
516
|
+
var i__5727__auto___105909 = (0);
|
|
517
|
+
while(true){
|
|
518
|
+
if((i__5727__auto___105909 < len__5726__auto___105907)){
|
|
519
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105909]));
|
|
520
|
+
|
|
521
|
+
var G__105910 = (i__5727__auto___105909 + (1));
|
|
522
|
+
i__5727__auto___105909 = G__105910;
|
|
523
|
+
continue;
|
|
524
|
+
} else {
|
|
525
|
+
}
|
|
526
|
+
break;
|
|
527
|
+
}
|
|
528
|
+
|
|
529
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
530
|
+
return medley.core.map_vals.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
531
|
+
|
|
532
|
+
}
|
|
533
|
+
});
|
|
534
|
+
|
|
535
|
+
(medley.core.map_vals.cljs$core$IFn$_invoke$arity$2 = (function (f,coll){
|
|
536
|
+
return medley.core.reduce_map((function (xf){
|
|
537
|
+
return (function (m,k,v){
|
|
538
|
+
var G__105687 = m;
|
|
539
|
+
var G__105688 = k;
|
|
540
|
+
var G__105689 = (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(v) : f.call(null, v));
|
|
541
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(G__105687,G__105688,G__105689) : xf.call(null, G__105687,G__105688,G__105689));
|
|
542
|
+
});
|
|
543
|
+
}),coll);
|
|
544
|
+
}));
|
|
545
|
+
|
|
546
|
+
(medley.core.map_vals.cljs$core$IFn$_invoke$arity$variadic = (function (f,c1,colls){
|
|
547
|
+
return medley.core.reduce_map((function (xf){
|
|
548
|
+
return (function (m,k,v){
|
|
549
|
+
if(cljs.core.every_QMARK_((function (p1__105679_SHARP_){
|
|
550
|
+
return cljs.core.contains_QMARK_(p1__105679_SHARP_,k);
|
|
551
|
+
}),colls)){
|
|
552
|
+
var G__105690 = m;
|
|
553
|
+
var G__105691 = k;
|
|
554
|
+
var G__105692 = cljs.core.apply.cljs$core$IFn$_invoke$arity$3(f,v,cljs.core.map.cljs$core$IFn$_invoke$arity$2((function (p1__105680_SHARP_){
|
|
555
|
+
return cljs.core.get.cljs$core$IFn$_invoke$arity$2(p1__105680_SHARP_,k);
|
|
556
|
+
}),colls));
|
|
557
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(G__105690,G__105691,G__105692) : xf.call(null, G__105690,G__105691,G__105692));
|
|
558
|
+
} else {
|
|
559
|
+
return m;
|
|
560
|
+
}
|
|
561
|
+
});
|
|
562
|
+
}),c1);
|
|
563
|
+
}));
|
|
564
|
+
|
|
565
|
+
/** @this {Function} */
|
|
566
|
+
(medley.core.map_vals.cljs$lang$applyTo = (function (seq105683){
|
|
567
|
+
var G__105684 = cljs.core.first(seq105683);
|
|
568
|
+
var seq105683__$1 = cljs.core.next(seq105683);
|
|
569
|
+
var G__105685 = cljs.core.first(seq105683__$1);
|
|
570
|
+
var seq105683__$2 = cljs.core.next(seq105683__$1);
|
|
571
|
+
var self__5711__auto__ = this;
|
|
572
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105684,G__105685,seq105683__$2);
|
|
573
|
+
}));
|
|
574
|
+
|
|
575
|
+
(medley.core.map_vals.cljs$lang$maxFixedArity = (2));
|
|
576
|
+
|
|
577
|
+
/**
|
|
578
|
+
* Maps a function over the key/value pairs of an associative collection, using
|
|
579
|
+
* the return of the function as the new key.
|
|
580
|
+
*/
|
|
581
|
+
medley.core.map_kv_keys = (function medley$core$map_kv_keys(f,coll){
|
|
582
|
+
return medley.core.reduce_map((function (xf){
|
|
583
|
+
return (function (m,k,v){
|
|
584
|
+
var G__105696 = m;
|
|
585
|
+
var G__105697 = (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(k,v) : f.call(null, k,v));
|
|
586
|
+
var G__105698 = v;
|
|
587
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(G__105696,G__105697,G__105698) : xf.call(null, G__105696,G__105697,G__105698));
|
|
588
|
+
});
|
|
589
|
+
}),coll);
|
|
590
|
+
});
|
|
591
|
+
/**
|
|
592
|
+
* Maps a function over the key/value pairs of an associative collection, using
|
|
593
|
+
* the return of the function as the new value.
|
|
594
|
+
*/
|
|
595
|
+
medley.core.map_kv_vals = (function medley$core$map_kv_vals(f,coll){
|
|
596
|
+
return medley.core.reduce_map((function (xf){
|
|
597
|
+
return (function (m,k,v){
|
|
598
|
+
var G__105700 = m;
|
|
599
|
+
var G__105701 = k;
|
|
600
|
+
var G__105702 = (f.cljs$core$IFn$_invoke$arity$2 ? f.cljs$core$IFn$_invoke$arity$2(k,v) : f.call(null, k,v));
|
|
601
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(G__105700,G__105701,G__105702) : xf.call(null, G__105700,G__105701,G__105702));
|
|
602
|
+
});
|
|
603
|
+
}),coll);
|
|
604
|
+
});
|
|
605
|
+
/**
|
|
606
|
+
* Returns a new associative collection of the items in coll for which
|
|
607
|
+
* `(pred (key item) (val item))` returns true.
|
|
608
|
+
*/
|
|
609
|
+
medley.core.filter_kv = (function medley$core$filter_kv(pred,coll){
|
|
610
|
+
return medley.core.reduce_map((function (xf){
|
|
611
|
+
return (function (m,k,v){
|
|
612
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$2 ? pred.cljs$core$IFn$_invoke$arity$2(k,v) : pred.call(null, k,v)))){
|
|
613
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(m,k,v) : xf.call(null, m,k,v));
|
|
614
|
+
} else {
|
|
615
|
+
return m;
|
|
616
|
+
}
|
|
617
|
+
});
|
|
618
|
+
}),coll);
|
|
619
|
+
});
|
|
620
|
+
/**
|
|
621
|
+
* Returns a new associative collection of the items in coll for which
|
|
622
|
+
* `(pred (key item))` returns true.
|
|
623
|
+
*/
|
|
624
|
+
medley.core.filter_keys = (function medley$core$filter_keys(pred,coll){
|
|
625
|
+
return medley.core.reduce_map((function (xf){
|
|
626
|
+
return (function (m,k,v){
|
|
627
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(k) : pred.call(null, k)))){
|
|
628
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(m,k,v) : xf.call(null, m,k,v));
|
|
629
|
+
} else {
|
|
630
|
+
return m;
|
|
631
|
+
}
|
|
632
|
+
});
|
|
633
|
+
}),coll);
|
|
634
|
+
});
|
|
635
|
+
/**
|
|
636
|
+
* Returns a new associative collection of the items in coll for which
|
|
637
|
+
* `(pred (val item))` returns true.
|
|
638
|
+
*/
|
|
639
|
+
medley.core.filter_vals = (function medley$core$filter_vals(pred,coll){
|
|
640
|
+
return medley.core.reduce_map((function (xf){
|
|
641
|
+
return (function (m,k,v){
|
|
642
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(v) : pred.call(null, v)))){
|
|
643
|
+
return (xf.cljs$core$IFn$_invoke$arity$3 ? xf.cljs$core$IFn$_invoke$arity$3(m,k,v) : xf.call(null, m,k,v));
|
|
644
|
+
} else {
|
|
645
|
+
return m;
|
|
646
|
+
}
|
|
647
|
+
});
|
|
648
|
+
}),coll);
|
|
649
|
+
});
|
|
650
|
+
/**
|
|
651
|
+
* Returns a new associative collection of the items in coll for which
|
|
652
|
+
* `(pred (key item) (val item))` returns false.
|
|
653
|
+
*/
|
|
654
|
+
medley.core.remove_kv = (function medley$core$remove_kv(pred,coll){
|
|
655
|
+
return medley.core.filter_kv(cljs.core.complement(pred),coll);
|
|
656
|
+
});
|
|
657
|
+
/**
|
|
658
|
+
* Returns a new associative collection of the items in coll for which
|
|
659
|
+
* `(pred (key item))` returns false.
|
|
660
|
+
*/
|
|
661
|
+
medley.core.remove_keys = (function medley$core$remove_keys(pred,coll){
|
|
662
|
+
return medley.core.filter_keys(cljs.core.complement(pred),coll);
|
|
663
|
+
});
|
|
664
|
+
/**
|
|
665
|
+
* Returns a new associative collection of the items in coll for which
|
|
666
|
+
* `(pred (val item))` returns false.
|
|
667
|
+
*/
|
|
668
|
+
medley.core.remove_vals = (function medley$core$remove_vals(pred,coll){
|
|
669
|
+
return medley.core.filter_vals(cljs.core.complement(pred),coll);
|
|
670
|
+
});
|
|
671
|
+
/**
|
|
672
|
+
* Creates an empty persistent queue, or one populated with a collection.
|
|
673
|
+
*/
|
|
674
|
+
medley.core.queue = (function medley$core$queue(var_args){
|
|
675
|
+
var G__105705 = arguments.length;
|
|
676
|
+
switch (G__105705) {
|
|
677
|
+
case 0:
|
|
678
|
+
return medley.core.queue.cljs$core$IFn$_invoke$arity$0();
|
|
679
|
+
|
|
680
|
+
break;
|
|
681
|
+
case 1:
|
|
682
|
+
return medley.core.queue.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
683
|
+
|
|
684
|
+
break;
|
|
685
|
+
default:
|
|
686
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
687
|
+
|
|
688
|
+
}
|
|
689
|
+
});
|
|
690
|
+
|
|
691
|
+
(medley.core.queue.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
692
|
+
return cljs.core.PersistentQueue.EMPTY;
|
|
693
|
+
}));
|
|
694
|
+
|
|
695
|
+
(medley.core.queue.cljs$core$IFn$_invoke$arity$1 = (function (coll){
|
|
696
|
+
return cljs.core.into.cljs$core$IFn$_invoke$arity$2(medley.core.queue.cljs$core$IFn$_invoke$arity$0(),coll);
|
|
697
|
+
}));
|
|
698
|
+
|
|
699
|
+
(medley.core.queue.cljs$lang$maxFixedArity = 1);
|
|
700
|
+
|
|
701
|
+
/**
|
|
702
|
+
* Returns true if x implements clojure.lang.PersistentQueue.
|
|
703
|
+
*/
|
|
704
|
+
medley.core.queue_QMARK_ = (function medley$core$queue_QMARK_(x){
|
|
705
|
+
return (x instanceof cljs.core.PersistentQueue);
|
|
706
|
+
});
|
|
707
|
+
/**
|
|
708
|
+
* Returns true if x is a boolean.
|
|
709
|
+
*/
|
|
710
|
+
medley.core.boolean_QMARK_ = (function medley$core$boolean_QMARK_(x){
|
|
711
|
+
return ((x === true) || (x === false));
|
|
712
|
+
});
|
|
713
|
+
/**
|
|
714
|
+
* Return the least argument (as defined by the compare function) in O(n) time.
|
|
715
|
+
*/
|
|
716
|
+
medley.core.least = (function medley$core$least(var_args){
|
|
717
|
+
var G__105714 = arguments.length;
|
|
718
|
+
switch (G__105714) {
|
|
719
|
+
case 0:
|
|
720
|
+
return medley.core.least.cljs$core$IFn$_invoke$arity$0();
|
|
721
|
+
|
|
722
|
+
break;
|
|
723
|
+
case 1:
|
|
724
|
+
return medley.core.least.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
725
|
+
|
|
726
|
+
break;
|
|
727
|
+
case 2:
|
|
728
|
+
return medley.core.least.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
729
|
+
|
|
730
|
+
break;
|
|
731
|
+
default:
|
|
732
|
+
var args_arr__5751__auto__ = [];
|
|
733
|
+
var len__5726__auto___105918 = arguments.length;
|
|
734
|
+
var i__5727__auto___105919 = (0);
|
|
735
|
+
while(true){
|
|
736
|
+
if((i__5727__auto___105919 < len__5726__auto___105918)){
|
|
737
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105919]));
|
|
738
|
+
|
|
739
|
+
var G__105920 = (i__5727__auto___105919 + (1));
|
|
740
|
+
i__5727__auto___105919 = G__105920;
|
|
741
|
+
continue;
|
|
742
|
+
} else {
|
|
743
|
+
}
|
|
744
|
+
break;
|
|
745
|
+
}
|
|
746
|
+
|
|
747
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
748
|
+
return medley.core.least.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
749
|
+
|
|
750
|
+
}
|
|
751
|
+
});
|
|
752
|
+
|
|
753
|
+
(medley.core.least.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
754
|
+
return null;
|
|
755
|
+
}));
|
|
756
|
+
|
|
757
|
+
(medley.core.least.cljs$core$IFn$_invoke$arity$1 = (function (a){
|
|
758
|
+
return a;
|
|
759
|
+
}));
|
|
760
|
+
|
|
761
|
+
(medley.core.least.cljs$core$IFn$_invoke$arity$2 = (function (a,b){
|
|
762
|
+
if((cljs.core.compare(a,b) < (0))){
|
|
763
|
+
return a;
|
|
764
|
+
} else {
|
|
765
|
+
return b;
|
|
766
|
+
}
|
|
767
|
+
}));
|
|
768
|
+
|
|
769
|
+
(medley.core.least.cljs$core$IFn$_invoke$arity$variadic = (function (a,b,more){
|
|
770
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3(medley.core.least,medley.core.least.cljs$core$IFn$_invoke$arity$2(a,b),more);
|
|
771
|
+
}));
|
|
772
|
+
|
|
773
|
+
/** @this {Function} */
|
|
774
|
+
(medley.core.least.cljs$lang$applyTo = (function (seq105711){
|
|
775
|
+
var G__105712 = cljs.core.first(seq105711);
|
|
776
|
+
var seq105711__$1 = cljs.core.next(seq105711);
|
|
777
|
+
var G__105713 = cljs.core.first(seq105711__$1);
|
|
778
|
+
var seq105711__$2 = cljs.core.next(seq105711__$1);
|
|
779
|
+
var self__5711__auto__ = this;
|
|
780
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105712,G__105713,seq105711__$2);
|
|
781
|
+
}));
|
|
782
|
+
|
|
783
|
+
(medley.core.least.cljs$lang$maxFixedArity = (2));
|
|
784
|
+
|
|
785
|
+
/**
|
|
786
|
+
* Find the greatest argument (as defined by the compare function) in O(n) time.
|
|
787
|
+
*/
|
|
788
|
+
medley.core.greatest = (function medley$core$greatest(var_args){
|
|
789
|
+
var G__105719 = arguments.length;
|
|
790
|
+
switch (G__105719) {
|
|
791
|
+
case 0:
|
|
792
|
+
return medley.core.greatest.cljs$core$IFn$_invoke$arity$0();
|
|
793
|
+
|
|
794
|
+
break;
|
|
795
|
+
case 1:
|
|
796
|
+
return medley.core.greatest.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
797
|
+
|
|
798
|
+
break;
|
|
799
|
+
case 2:
|
|
800
|
+
return medley.core.greatest.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
801
|
+
|
|
802
|
+
break;
|
|
803
|
+
default:
|
|
804
|
+
var args_arr__5751__auto__ = [];
|
|
805
|
+
var len__5726__auto___105922 = arguments.length;
|
|
806
|
+
var i__5727__auto___105923 = (0);
|
|
807
|
+
while(true){
|
|
808
|
+
if((i__5727__auto___105923 < len__5726__auto___105922)){
|
|
809
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105923]));
|
|
810
|
+
|
|
811
|
+
var G__105924 = (i__5727__auto___105923 + (1));
|
|
812
|
+
i__5727__auto___105923 = G__105924;
|
|
813
|
+
continue;
|
|
814
|
+
} else {
|
|
815
|
+
}
|
|
816
|
+
break;
|
|
817
|
+
}
|
|
818
|
+
|
|
819
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
820
|
+
return medley.core.greatest.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
821
|
+
|
|
822
|
+
}
|
|
823
|
+
});
|
|
824
|
+
|
|
825
|
+
(medley.core.greatest.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
826
|
+
return null;
|
|
827
|
+
}));
|
|
828
|
+
|
|
829
|
+
(medley.core.greatest.cljs$core$IFn$_invoke$arity$1 = (function (a){
|
|
830
|
+
return a;
|
|
831
|
+
}));
|
|
832
|
+
|
|
833
|
+
(medley.core.greatest.cljs$core$IFn$_invoke$arity$2 = (function (a,b){
|
|
834
|
+
if((cljs.core.compare(a,b) > (0))){
|
|
835
|
+
return a;
|
|
836
|
+
} else {
|
|
837
|
+
return b;
|
|
838
|
+
}
|
|
839
|
+
}));
|
|
840
|
+
|
|
841
|
+
(medley.core.greatest.cljs$core$IFn$_invoke$arity$variadic = (function (a,b,more){
|
|
842
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3(medley.core.greatest,medley.core.greatest.cljs$core$IFn$_invoke$arity$2(a,b),more);
|
|
843
|
+
}));
|
|
844
|
+
|
|
845
|
+
/** @this {Function} */
|
|
846
|
+
(medley.core.greatest.cljs$lang$applyTo = (function (seq105716){
|
|
847
|
+
var G__105717 = cljs.core.first(seq105716);
|
|
848
|
+
var seq105716__$1 = cljs.core.next(seq105716);
|
|
849
|
+
var G__105718 = cljs.core.first(seq105716__$1);
|
|
850
|
+
var seq105716__$2 = cljs.core.next(seq105716__$1);
|
|
851
|
+
var self__5711__auto__ = this;
|
|
852
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105717,G__105718,seq105716__$2);
|
|
853
|
+
}));
|
|
854
|
+
|
|
855
|
+
(medley.core.greatest.cljs$lang$maxFixedArity = (2));
|
|
856
|
+
|
|
857
|
+
/**
|
|
858
|
+
* Lazily concatenates a collection of collections into a flat sequence.
|
|
859
|
+
*/
|
|
860
|
+
medley.core.join = (function medley$core$join(colls){
|
|
861
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
862
|
+
var temp__5804__auto__ = cljs.core.seq(colls);
|
|
863
|
+
if(temp__5804__auto__){
|
|
864
|
+
var s = temp__5804__auto__;
|
|
865
|
+
return cljs.core.concat.cljs$core$IFn$_invoke$arity$2(cljs.core.first(s),(function (){var G__105720 = cljs.core.rest(s);
|
|
866
|
+
return (medley.core.join.cljs$core$IFn$_invoke$arity$1 ? medley.core.join.cljs$core$IFn$_invoke$arity$1(G__105720) : medley.core.join.call(null, G__105720));
|
|
867
|
+
})());
|
|
868
|
+
} else {
|
|
869
|
+
return null;
|
|
870
|
+
}
|
|
871
|
+
}),null,null));
|
|
872
|
+
});
|
|
873
|
+
/**
|
|
874
|
+
* Recursively merges maps together. If all the maps supplied have nested maps
|
|
875
|
+
* under the same keys, these nested maps are merged. Otherwise the value is
|
|
876
|
+
* overwritten, as in `clojure.core/merge`.
|
|
877
|
+
*/
|
|
878
|
+
medley.core.deep_merge = (function medley$core$deep_merge(var_args){
|
|
879
|
+
var G__105725 = arguments.length;
|
|
880
|
+
switch (G__105725) {
|
|
881
|
+
case 0:
|
|
882
|
+
return medley.core.deep_merge.cljs$core$IFn$_invoke$arity$0();
|
|
883
|
+
|
|
884
|
+
break;
|
|
885
|
+
case 1:
|
|
886
|
+
return medley.core.deep_merge.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
887
|
+
|
|
888
|
+
break;
|
|
889
|
+
case 2:
|
|
890
|
+
return medley.core.deep_merge.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
891
|
+
|
|
892
|
+
break;
|
|
893
|
+
default:
|
|
894
|
+
var args_arr__5751__auto__ = [];
|
|
895
|
+
var len__5726__auto___105927 = arguments.length;
|
|
896
|
+
var i__5727__auto___105928 = (0);
|
|
897
|
+
while(true){
|
|
898
|
+
if((i__5727__auto___105928 < len__5726__auto___105927)){
|
|
899
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105928]));
|
|
900
|
+
|
|
901
|
+
var G__105929 = (i__5727__auto___105928 + (1));
|
|
902
|
+
i__5727__auto___105928 = G__105929;
|
|
903
|
+
continue;
|
|
904
|
+
} else {
|
|
905
|
+
}
|
|
906
|
+
break;
|
|
907
|
+
}
|
|
908
|
+
|
|
909
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
910
|
+
return medley.core.deep_merge.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
911
|
+
|
|
912
|
+
}
|
|
913
|
+
});
|
|
914
|
+
|
|
915
|
+
(medley.core.deep_merge.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
916
|
+
return null;
|
|
917
|
+
}));
|
|
918
|
+
|
|
919
|
+
(medley.core.deep_merge.cljs$core$IFn$_invoke$arity$1 = (function (a){
|
|
920
|
+
return a;
|
|
921
|
+
}));
|
|
922
|
+
|
|
923
|
+
(medley.core.deep_merge.cljs$core$IFn$_invoke$arity$2 = (function (a,b){
|
|
924
|
+
if(cljs.core.truth_((function (){var or__5002__auto__ = a;
|
|
925
|
+
if(cljs.core.truth_(or__5002__auto__)){
|
|
926
|
+
return or__5002__auto__;
|
|
927
|
+
} else {
|
|
928
|
+
return b;
|
|
929
|
+
}
|
|
930
|
+
})())){
|
|
931
|
+
var merge_entry = (function medley$core$merge_entry(m,e){
|
|
932
|
+
var k = cljs.core.key(e);
|
|
933
|
+
var v_SINGLEQUOTE_ = cljs.core.val(e);
|
|
934
|
+
if(cljs.core.contains_QMARK_(m,k)){
|
|
935
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,(function (){var v = cljs.core.get.cljs$core$IFn$_invoke$arity$2(m,k);
|
|
936
|
+
if(((cljs.core.map_QMARK_(v)) && (cljs.core.map_QMARK_(v_SINGLEQUOTE_)))){
|
|
937
|
+
return medley.core.deep_merge.cljs$core$IFn$_invoke$arity$2(v,v_SINGLEQUOTE_);
|
|
938
|
+
} else {
|
|
939
|
+
return v_SINGLEQUOTE_;
|
|
940
|
+
}
|
|
941
|
+
})());
|
|
942
|
+
} else {
|
|
943
|
+
return cljs.core.assoc.cljs$core$IFn$_invoke$arity$3(m,k,v_SINGLEQUOTE_);
|
|
944
|
+
}
|
|
945
|
+
});
|
|
946
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3(merge_entry,(function (){var or__5002__auto__ = a;
|
|
947
|
+
if(cljs.core.truth_(or__5002__auto__)){
|
|
948
|
+
return or__5002__auto__;
|
|
949
|
+
} else {
|
|
950
|
+
return cljs.core.PersistentArrayMap.EMPTY;
|
|
951
|
+
}
|
|
952
|
+
})(),cljs.core.seq(b));
|
|
953
|
+
} else {
|
|
954
|
+
return null;
|
|
955
|
+
}
|
|
956
|
+
}));
|
|
957
|
+
|
|
958
|
+
(medley.core.deep_merge.cljs$core$IFn$_invoke$arity$variadic = (function (a,b,more){
|
|
959
|
+
return cljs.core.reduce.cljs$core$IFn$_invoke$arity$3(medley.core.deep_merge,(function (){var or__5002__auto__ = a;
|
|
960
|
+
if(cljs.core.truth_(or__5002__auto__)){
|
|
961
|
+
return or__5002__auto__;
|
|
962
|
+
} else {
|
|
963
|
+
return cljs.core.PersistentArrayMap.EMPTY;
|
|
964
|
+
}
|
|
965
|
+
})(),cljs.core.cons(b,more));
|
|
966
|
+
}));
|
|
967
|
+
|
|
968
|
+
/** @this {Function} */
|
|
969
|
+
(medley.core.deep_merge.cljs$lang$applyTo = (function (seq105722){
|
|
970
|
+
var G__105723 = cljs.core.first(seq105722);
|
|
971
|
+
var seq105722__$1 = cljs.core.next(seq105722);
|
|
972
|
+
var G__105724 = cljs.core.first(seq105722__$1);
|
|
973
|
+
var seq105722__$2 = cljs.core.next(seq105722__$1);
|
|
974
|
+
var self__5711__auto__ = this;
|
|
975
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105723,G__105724,seq105722__$2);
|
|
976
|
+
}));
|
|
977
|
+
|
|
978
|
+
(medley.core.deep_merge.cljs$lang$maxFixedArity = (2));
|
|
979
|
+
|
|
980
|
+
/**
|
|
981
|
+
* Applies a function f to the argument list formed by concatenating
|
|
982
|
+
* everything but the last element of args with the last element of
|
|
983
|
+
* args. This is useful for applying a function that accepts keyword
|
|
984
|
+
* arguments to a map.
|
|
985
|
+
*/
|
|
986
|
+
medley.core.mapply = (function medley$core$mapply(var_args){
|
|
987
|
+
var G__105731 = arguments.length;
|
|
988
|
+
switch (G__105731) {
|
|
989
|
+
case 2:
|
|
990
|
+
return medley.core.mapply.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
991
|
+
|
|
992
|
+
break;
|
|
993
|
+
default:
|
|
994
|
+
var args_arr__5751__auto__ = [];
|
|
995
|
+
var len__5726__auto___105935 = arguments.length;
|
|
996
|
+
var i__5727__auto___105936 = (0);
|
|
997
|
+
while(true){
|
|
998
|
+
if((i__5727__auto___105936 < len__5726__auto___105935)){
|
|
999
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105936]));
|
|
1000
|
+
|
|
1001
|
+
var G__105938 = (i__5727__auto___105936 + (1));
|
|
1002
|
+
i__5727__auto___105936 = G__105938;
|
|
1003
|
+
continue;
|
|
1004
|
+
} else {
|
|
1005
|
+
}
|
|
1006
|
+
break;
|
|
1007
|
+
}
|
|
1008
|
+
|
|
1009
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
1010
|
+
return medley.core.mapply.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
1011
|
+
|
|
1012
|
+
}
|
|
1013
|
+
});
|
|
1014
|
+
|
|
1015
|
+
(medley.core.mapply.cljs$core$IFn$_invoke$arity$2 = (function (f,m){
|
|
1016
|
+
return cljs.core.apply.cljs$core$IFn$_invoke$arity$2(f,cljs.core.apply.cljs$core$IFn$_invoke$arity$2(cljs.core.concat,m));
|
|
1017
|
+
}));
|
|
1018
|
+
|
|
1019
|
+
(medley.core.mapply.cljs$core$IFn$_invoke$arity$variadic = (function (f,a,args){
|
|
1020
|
+
return cljs.core.apply.cljs$core$IFn$_invoke$arity$3(f,a,cljs.core.apply.cljs$core$IFn$_invoke$arity$3(cljs.core.concat,cljs.core.butlast(args),cljs.core.last(args)));
|
|
1021
|
+
}));
|
|
1022
|
+
|
|
1023
|
+
/** @this {Function} */
|
|
1024
|
+
(medley.core.mapply.cljs$lang$applyTo = (function (seq105728){
|
|
1025
|
+
var G__105729 = cljs.core.first(seq105728);
|
|
1026
|
+
var seq105728__$1 = cljs.core.next(seq105728);
|
|
1027
|
+
var G__105730 = cljs.core.first(seq105728__$1);
|
|
1028
|
+
var seq105728__$2 = cljs.core.next(seq105728__$1);
|
|
1029
|
+
var self__5711__auto__ = this;
|
|
1030
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105729,G__105730,seq105728__$2);
|
|
1031
|
+
}));
|
|
1032
|
+
|
|
1033
|
+
(medley.core.mapply.cljs$lang$maxFixedArity = (2));
|
|
1034
|
+
|
|
1035
|
+
/**
|
|
1036
|
+
* Returns a map of the elements of coll keyed by the result of f on each
|
|
1037
|
+
* element. The value at each key will be the last element in coll associated
|
|
1038
|
+
* with that key. This function is similar to `clojure.core/group-by`, except
|
|
1039
|
+
* that elements with the same key are overwritten, rather than added to a
|
|
1040
|
+
* vector of values.
|
|
1041
|
+
*/
|
|
1042
|
+
medley.core.index_by = (function medley$core$index_by(f,coll){
|
|
1043
|
+
return cljs.core.persistent_BANG_(cljs.core.reduce.cljs$core$IFn$_invoke$arity$3((function (p1__105732_SHARP_,p2__105733_SHARP_){
|
|
1044
|
+
return cljs.core.assoc_BANG_.cljs$core$IFn$_invoke$arity$3(p1__105732_SHARP_,(f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(p2__105733_SHARP_) : f.call(null, p2__105733_SHARP_)),p2__105733_SHARP_);
|
|
1045
|
+
}),cljs.core.transient$(cljs.core.PersistentArrayMap.EMPTY),coll));
|
|
1046
|
+
});
|
|
1047
|
+
/**
|
|
1048
|
+
* Returns a lazy seq of the first item in each coll, then the second, etc.
|
|
1049
|
+
* Unlike `clojure.core/interleave`, the returned seq contains all items in the
|
|
1050
|
+
* supplied collections, even if the collections are different sizes.
|
|
1051
|
+
*/
|
|
1052
|
+
medley.core.interleave_all = (function medley$core$interleave_all(var_args){
|
|
1053
|
+
var G__105738 = arguments.length;
|
|
1054
|
+
switch (G__105738) {
|
|
1055
|
+
case 0:
|
|
1056
|
+
return medley.core.interleave_all.cljs$core$IFn$_invoke$arity$0();
|
|
1057
|
+
|
|
1058
|
+
break;
|
|
1059
|
+
case 1:
|
|
1060
|
+
return medley.core.interleave_all.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1061
|
+
|
|
1062
|
+
break;
|
|
1063
|
+
case 2:
|
|
1064
|
+
return medley.core.interleave_all.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1065
|
+
|
|
1066
|
+
break;
|
|
1067
|
+
default:
|
|
1068
|
+
var args_arr__5751__auto__ = [];
|
|
1069
|
+
var len__5726__auto___105943 = arguments.length;
|
|
1070
|
+
var i__5727__auto___105944 = (0);
|
|
1071
|
+
while(true){
|
|
1072
|
+
if((i__5727__auto___105944 < len__5726__auto___105943)){
|
|
1073
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105944]));
|
|
1074
|
+
|
|
1075
|
+
var G__105945 = (i__5727__auto___105944 + (1));
|
|
1076
|
+
i__5727__auto___105944 = G__105945;
|
|
1077
|
+
continue;
|
|
1078
|
+
} else {
|
|
1079
|
+
}
|
|
1080
|
+
break;
|
|
1081
|
+
}
|
|
1082
|
+
|
|
1083
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
1084
|
+
return medley.core.interleave_all.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
1085
|
+
|
|
1086
|
+
}
|
|
1087
|
+
});
|
|
1088
|
+
|
|
1089
|
+
(medley.core.interleave_all.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
1090
|
+
return cljs.core.List.EMPTY;
|
|
1091
|
+
}));
|
|
1092
|
+
|
|
1093
|
+
(medley.core.interleave_all.cljs$core$IFn$_invoke$arity$1 = (function (c1){
|
|
1094
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1095
|
+
return c1;
|
|
1096
|
+
}),null,null));
|
|
1097
|
+
}));
|
|
1098
|
+
|
|
1099
|
+
(medley.core.interleave_all.cljs$core$IFn$_invoke$arity$2 = (function (c1,c2){
|
|
1100
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1101
|
+
var s1 = cljs.core.seq(c1);
|
|
1102
|
+
var s2 = cljs.core.seq(c2);
|
|
1103
|
+
if(((s1) && (s2))){
|
|
1104
|
+
return cljs.core.cons(cljs.core.first(s1),cljs.core.cons(cljs.core.first(s2),medley.core.interleave_all.cljs$core$IFn$_invoke$arity$2(cljs.core.rest(s1),cljs.core.rest(s2))));
|
|
1105
|
+
} else {
|
|
1106
|
+
return ((s1) || (s2));
|
|
1107
|
+
}
|
|
1108
|
+
}),null,null));
|
|
1109
|
+
}));
|
|
1110
|
+
|
|
1111
|
+
(medley.core.interleave_all.cljs$core$IFn$_invoke$arity$variadic = (function (c1,c2,colls){
|
|
1112
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1113
|
+
var ss = cljs.core.remove.cljs$core$IFn$_invoke$arity$2(cljs.core.nil_QMARK_,cljs.core.map.cljs$core$IFn$_invoke$arity$2(cljs.core.seq,cljs.core.conj.cljs$core$IFn$_invoke$arity$variadic(colls,c2,cljs.core.prim_seq.cljs$core$IFn$_invoke$arity$2([c1], 0))));
|
|
1114
|
+
if(cljs.core.seq(ss)){
|
|
1115
|
+
return cljs.core.concat.cljs$core$IFn$_invoke$arity$2(cljs.core.map.cljs$core$IFn$_invoke$arity$2(cljs.core.first,ss),cljs.core.apply.cljs$core$IFn$_invoke$arity$2(medley.core.interleave_all,cljs.core.map.cljs$core$IFn$_invoke$arity$2(cljs.core.rest,ss)));
|
|
1116
|
+
} else {
|
|
1117
|
+
return null;
|
|
1118
|
+
}
|
|
1119
|
+
}),null,null));
|
|
1120
|
+
}));
|
|
1121
|
+
|
|
1122
|
+
/** @this {Function} */
|
|
1123
|
+
(medley.core.interleave_all.cljs$lang$applyTo = (function (seq105735){
|
|
1124
|
+
var G__105736 = cljs.core.first(seq105735);
|
|
1125
|
+
var seq105735__$1 = cljs.core.next(seq105735);
|
|
1126
|
+
var G__105737 = cljs.core.first(seq105735__$1);
|
|
1127
|
+
var seq105735__$2 = cljs.core.next(seq105735__$1);
|
|
1128
|
+
var self__5711__auto__ = this;
|
|
1129
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105736,G__105737,seq105735__$2);
|
|
1130
|
+
}));
|
|
1131
|
+
|
|
1132
|
+
(medley.core.interleave_all.cljs$lang$maxFixedArity = (2));
|
|
1133
|
+
|
|
1134
|
+
/**
|
|
1135
|
+
* Returns a lazy sequence of the elements of coll, removing any elements that
|
|
1136
|
+
* return duplicate values when passed to a function f. Returns a transducer
|
|
1137
|
+
* when no collection is provided.
|
|
1138
|
+
*/
|
|
1139
|
+
medley.core.distinct_by = (function medley$core$distinct_by(var_args){
|
|
1140
|
+
var G__105746 = arguments.length;
|
|
1141
|
+
switch (G__105746) {
|
|
1142
|
+
case 1:
|
|
1143
|
+
return medley.core.distinct_by.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1144
|
+
|
|
1145
|
+
break;
|
|
1146
|
+
case 2:
|
|
1147
|
+
return medley.core.distinct_by.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1148
|
+
|
|
1149
|
+
break;
|
|
1150
|
+
default:
|
|
1151
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1152
|
+
|
|
1153
|
+
}
|
|
1154
|
+
});
|
|
1155
|
+
|
|
1156
|
+
(medley.core.distinct_by.cljs$core$IFn$_invoke$arity$1 = (function (f){
|
|
1157
|
+
return (function (rf){
|
|
1158
|
+
var seen = cljs.core.volatile_BANG_(cljs.core.PersistentHashSet.EMPTY);
|
|
1159
|
+
return (function() {
|
|
1160
|
+
var G__105951 = null;
|
|
1161
|
+
var G__105951__0 = (function (){
|
|
1162
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1163
|
+
});
|
|
1164
|
+
var G__105951__1 = (function (result){
|
|
1165
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1166
|
+
});
|
|
1167
|
+
var G__105951__2 = (function (result,x){
|
|
1168
|
+
var fx = (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(x) : f.call(null, x));
|
|
1169
|
+
if(cljs.core.contains_QMARK_(cljs.core.deref(seen),fx)){
|
|
1170
|
+
return result;
|
|
1171
|
+
} else {
|
|
1172
|
+
seen.cljs$core$IVolatile$_vreset_BANG_$arity$2(null, cljs.core.conj.cljs$core$IFn$_invoke$arity$2(seen.cljs$core$IDeref$_deref$arity$1(null, ),fx));
|
|
1173
|
+
|
|
1174
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1175
|
+
}
|
|
1176
|
+
});
|
|
1177
|
+
G__105951 = function(result,x){
|
|
1178
|
+
switch(arguments.length){
|
|
1179
|
+
case 0:
|
|
1180
|
+
return G__105951__0.call(this);
|
|
1181
|
+
case 1:
|
|
1182
|
+
return G__105951__1.call(this,result);
|
|
1183
|
+
case 2:
|
|
1184
|
+
return G__105951__2.call(this,result,x);
|
|
1185
|
+
}
|
|
1186
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1187
|
+
};
|
|
1188
|
+
G__105951.cljs$core$IFn$_invoke$arity$0 = G__105951__0;
|
|
1189
|
+
G__105951.cljs$core$IFn$_invoke$arity$1 = G__105951__1;
|
|
1190
|
+
G__105951.cljs$core$IFn$_invoke$arity$2 = G__105951__2;
|
|
1191
|
+
return G__105951;
|
|
1192
|
+
})()
|
|
1193
|
+
});
|
|
1194
|
+
}));
|
|
1195
|
+
|
|
1196
|
+
(medley.core.distinct_by.cljs$core$IFn$_invoke$arity$2 = (function (f,coll){
|
|
1197
|
+
var step = (function medley$core$step(xs,seen){
|
|
1198
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1199
|
+
return (function (p__105748,seen__$1){
|
|
1200
|
+
while(true){
|
|
1201
|
+
var vec__105749 = p__105748;
|
|
1202
|
+
var x = cljs.core.nth.cljs$core$IFn$_invoke$arity$3(vec__105749,(0),null);
|
|
1203
|
+
var xs__$1 = vec__105749;
|
|
1204
|
+
var temp__5804__auto__ = cljs.core.seq(xs__$1);
|
|
1205
|
+
if(temp__5804__auto__){
|
|
1206
|
+
var s = temp__5804__auto__;
|
|
1207
|
+
var fx = (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(x) : f.call(null, x));
|
|
1208
|
+
if(cljs.core.contains_QMARK_(seen__$1,fx)){
|
|
1209
|
+
var G__105952 = cljs.core.rest(s);
|
|
1210
|
+
var G__105953 = seen__$1;
|
|
1211
|
+
p__105748 = G__105952;
|
|
1212
|
+
seen__$1 = G__105953;
|
|
1213
|
+
continue;
|
|
1214
|
+
} else {
|
|
1215
|
+
return cljs.core.cons(x,medley$core$step(cljs.core.rest(s),cljs.core.conj.cljs$core$IFn$_invoke$arity$2(seen__$1,fx)));
|
|
1216
|
+
}
|
|
1217
|
+
} else {
|
|
1218
|
+
return null;
|
|
1219
|
+
}
|
|
1220
|
+
break;
|
|
1221
|
+
}
|
|
1222
|
+
})(xs,seen);
|
|
1223
|
+
}),null,null));
|
|
1224
|
+
});
|
|
1225
|
+
return step(coll,cljs.core.PersistentHashSet.EMPTY);
|
|
1226
|
+
}));
|
|
1227
|
+
|
|
1228
|
+
(medley.core.distinct_by.cljs$lang$maxFixedArity = 2);
|
|
1229
|
+
|
|
1230
|
+
/**
|
|
1231
|
+
* Returns a lazy sequence of the elements of coll, removing any **consecutive**
|
|
1232
|
+
* elements that return duplicate values when passed to a function f. Returns a
|
|
1233
|
+
* transducer when no collection is provided.
|
|
1234
|
+
*/
|
|
1235
|
+
medley.core.dedupe_by = (function medley$core$dedupe_by(var_args){
|
|
1236
|
+
var G__105753 = arguments.length;
|
|
1237
|
+
switch (G__105753) {
|
|
1238
|
+
case 1:
|
|
1239
|
+
return medley.core.dedupe_by.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1240
|
+
|
|
1241
|
+
break;
|
|
1242
|
+
case 2:
|
|
1243
|
+
return medley.core.dedupe_by.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1244
|
+
|
|
1245
|
+
break;
|
|
1246
|
+
default:
|
|
1247
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1248
|
+
|
|
1249
|
+
}
|
|
1250
|
+
});
|
|
1251
|
+
|
|
1252
|
+
(medley.core.dedupe_by.cljs$core$IFn$_invoke$arity$1 = (function (f){
|
|
1253
|
+
return (function (rf){
|
|
1254
|
+
var pv = cljs.core.volatile_BANG_(new cljs.core.Keyword("medley.core","none","medley.core/none",60848325));
|
|
1255
|
+
return (function() {
|
|
1256
|
+
var G__105955 = null;
|
|
1257
|
+
var G__105955__0 = (function (){
|
|
1258
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1259
|
+
});
|
|
1260
|
+
var G__105955__1 = (function (result){
|
|
1261
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1262
|
+
});
|
|
1263
|
+
var G__105955__2 = (function (result,x){
|
|
1264
|
+
var prior = cljs.core.deref(pv);
|
|
1265
|
+
var fx = (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(x) : f.call(null, x));
|
|
1266
|
+
cljs.core.vreset_BANG_(pv,fx);
|
|
1267
|
+
|
|
1268
|
+
if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2(prior,fx)){
|
|
1269
|
+
return result;
|
|
1270
|
+
} else {
|
|
1271
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1272
|
+
}
|
|
1273
|
+
});
|
|
1274
|
+
G__105955 = function(result,x){
|
|
1275
|
+
switch(arguments.length){
|
|
1276
|
+
case 0:
|
|
1277
|
+
return G__105955__0.call(this);
|
|
1278
|
+
case 1:
|
|
1279
|
+
return G__105955__1.call(this,result);
|
|
1280
|
+
case 2:
|
|
1281
|
+
return G__105955__2.call(this,result,x);
|
|
1282
|
+
}
|
|
1283
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1284
|
+
};
|
|
1285
|
+
G__105955.cljs$core$IFn$_invoke$arity$0 = G__105955__0;
|
|
1286
|
+
G__105955.cljs$core$IFn$_invoke$arity$1 = G__105955__1;
|
|
1287
|
+
G__105955.cljs$core$IFn$_invoke$arity$2 = G__105955__2;
|
|
1288
|
+
return G__105955;
|
|
1289
|
+
})()
|
|
1290
|
+
});
|
|
1291
|
+
}));
|
|
1292
|
+
|
|
1293
|
+
(medley.core.dedupe_by.cljs$core$IFn$_invoke$arity$2 = (function (f,coll){
|
|
1294
|
+
return cljs.core.sequence.cljs$core$IFn$_invoke$arity$2(medley.core.dedupe_by.cljs$core$IFn$_invoke$arity$1(f),coll);
|
|
1295
|
+
}));
|
|
1296
|
+
|
|
1297
|
+
(medley.core.dedupe_by.cljs$lang$maxFixedArity = 2);
|
|
1298
|
+
|
|
1299
|
+
/**
|
|
1300
|
+
* Returns a lazy sequence of successive items from coll up to and including
|
|
1301
|
+
* the first item for which `(pred item)` returns true. Returns a transducer
|
|
1302
|
+
* when no collection is provided.
|
|
1303
|
+
*/
|
|
1304
|
+
medley.core.take_upto = (function medley$core$take_upto(var_args){
|
|
1305
|
+
var G__105755 = arguments.length;
|
|
1306
|
+
switch (G__105755) {
|
|
1307
|
+
case 1:
|
|
1308
|
+
return medley.core.take_upto.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1309
|
+
|
|
1310
|
+
break;
|
|
1311
|
+
case 2:
|
|
1312
|
+
return medley.core.take_upto.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1313
|
+
|
|
1314
|
+
break;
|
|
1315
|
+
default:
|
|
1316
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1317
|
+
|
|
1318
|
+
}
|
|
1319
|
+
});
|
|
1320
|
+
|
|
1321
|
+
(medley.core.take_upto.cljs$core$IFn$_invoke$arity$1 = (function (pred){
|
|
1322
|
+
return (function (rf){
|
|
1323
|
+
return (function() {
|
|
1324
|
+
var G__105959 = null;
|
|
1325
|
+
var G__105959__0 = (function (){
|
|
1326
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1327
|
+
});
|
|
1328
|
+
var G__105959__1 = (function (result){
|
|
1329
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1330
|
+
});
|
|
1331
|
+
var G__105959__2 = (function (result,x){
|
|
1332
|
+
var result__$1 = (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1333
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(x) : pred.call(null, x)))){
|
|
1334
|
+
return cljs.core.ensure_reduced(result__$1);
|
|
1335
|
+
} else {
|
|
1336
|
+
return result__$1;
|
|
1337
|
+
}
|
|
1338
|
+
});
|
|
1339
|
+
G__105959 = function(result,x){
|
|
1340
|
+
switch(arguments.length){
|
|
1341
|
+
case 0:
|
|
1342
|
+
return G__105959__0.call(this);
|
|
1343
|
+
case 1:
|
|
1344
|
+
return G__105959__1.call(this,result);
|
|
1345
|
+
case 2:
|
|
1346
|
+
return G__105959__2.call(this,result,x);
|
|
1347
|
+
}
|
|
1348
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1349
|
+
};
|
|
1350
|
+
G__105959.cljs$core$IFn$_invoke$arity$0 = G__105959__0;
|
|
1351
|
+
G__105959.cljs$core$IFn$_invoke$arity$1 = G__105959__1;
|
|
1352
|
+
G__105959.cljs$core$IFn$_invoke$arity$2 = G__105959__2;
|
|
1353
|
+
return G__105959;
|
|
1354
|
+
})()
|
|
1355
|
+
});
|
|
1356
|
+
}));
|
|
1357
|
+
|
|
1358
|
+
(medley.core.take_upto.cljs$core$IFn$_invoke$arity$2 = (function (pred,coll){
|
|
1359
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1360
|
+
var temp__5804__auto__ = cljs.core.seq(coll);
|
|
1361
|
+
if(temp__5804__auto__){
|
|
1362
|
+
var s = temp__5804__auto__;
|
|
1363
|
+
var x = cljs.core.first(s);
|
|
1364
|
+
return cljs.core.cons(x,(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(x) : pred.call(null, x)))?null:medley.core.take_upto.cljs$core$IFn$_invoke$arity$2(pred,cljs.core.rest(s))));
|
|
1365
|
+
} else {
|
|
1366
|
+
return null;
|
|
1367
|
+
}
|
|
1368
|
+
}),null,null));
|
|
1369
|
+
}));
|
|
1370
|
+
|
|
1371
|
+
(medley.core.take_upto.cljs$lang$maxFixedArity = 2);
|
|
1372
|
+
|
|
1373
|
+
/**
|
|
1374
|
+
* Returns a lazy sequence of the items in coll starting *after* the first item
|
|
1375
|
+
* for which `(pred item)` returns true. Returns a transducer when no collection
|
|
1376
|
+
* is provided.
|
|
1377
|
+
*/
|
|
1378
|
+
medley.core.drop_upto = (function medley$core$drop_upto(var_args){
|
|
1379
|
+
var G__105759 = arguments.length;
|
|
1380
|
+
switch (G__105759) {
|
|
1381
|
+
case 1:
|
|
1382
|
+
return medley.core.drop_upto.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1383
|
+
|
|
1384
|
+
break;
|
|
1385
|
+
case 2:
|
|
1386
|
+
return medley.core.drop_upto.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1387
|
+
|
|
1388
|
+
break;
|
|
1389
|
+
default:
|
|
1390
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1391
|
+
|
|
1392
|
+
}
|
|
1393
|
+
});
|
|
1394
|
+
|
|
1395
|
+
(medley.core.drop_upto.cljs$core$IFn$_invoke$arity$1 = (function (pred){
|
|
1396
|
+
return (function (rf){
|
|
1397
|
+
var dv = cljs.core.volatile_BANG_(true);
|
|
1398
|
+
return (function() {
|
|
1399
|
+
var G__105965 = null;
|
|
1400
|
+
var G__105965__0 = (function (){
|
|
1401
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1402
|
+
});
|
|
1403
|
+
var G__105965__1 = (function (result){
|
|
1404
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1405
|
+
});
|
|
1406
|
+
var G__105965__2 = (function (result,x){
|
|
1407
|
+
if(cljs.core.truth_(cljs.core.deref(dv))){
|
|
1408
|
+
if(cljs.core.truth_((pred.cljs$core$IFn$_invoke$arity$1 ? pred.cljs$core$IFn$_invoke$arity$1(x) : pred.call(null, x)))){
|
|
1409
|
+
cljs.core.vreset_BANG_(dv,false);
|
|
1410
|
+
} else {
|
|
1411
|
+
}
|
|
1412
|
+
|
|
1413
|
+
return result;
|
|
1414
|
+
} else {
|
|
1415
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1416
|
+
}
|
|
1417
|
+
});
|
|
1418
|
+
G__105965 = function(result,x){
|
|
1419
|
+
switch(arguments.length){
|
|
1420
|
+
case 0:
|
|
1421
|
+
return G__105965__0.call(this);
|
|
1422
|
+
case 1:
|
|
1423
|
+
return G__105965__1.call(this,result);
|
|
1424
|
+
case 2:
|
|
1425
|
+
return G__105965__2.call(this,result,x);
|
|
1426
|
+
}
|
|
1427
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1428
|
+
};
|
|
1429
|
+
G__105965.cljs$core$IFn$_invoke$arity$0 = G__105965__0;
|
|
1430
|
+
G__105965.cljs$core$IFn$_invoke$arity$1 = G__105965__1;
|
|
1431
|
+
G__105965.cljs$core$IFn$_invoke$arity$2 = G__105965__2;
|
|
1432
|
+
return G__105965;
|
|
1433
|
+
})()
|
|
1434
|
+
});
|
|
1435
|
+
}));
|
|
1436
|
+
|
|
1437
|
+
(medley.core.drop_upto.cljs$core$IFn$_invoke$arity$2 = (function (pred,coll){
|
|
1438
|
+
return cljs.core.rest(cljs.core.drop_while.cljs$core$IFn$_invoke$arity$2(cljs.core.complement(pred),coll));
|
|
1439
|
+
}));
|
|
1440
|
+
|
|
1441
|
+
(medley.core.drop_upto.cljs$lang$maxFixedArity = 2);
|
|
1442
|
+
|
|
1443
|
+
/**
|
|
1444
|
+
* Returns an ordered, lazy sequence of vectors `[index item]`, where item is a
|
|
1445
|
+
* value in coll, and index its position starting from zero. Returns a transducer
|
|
1446
|
+
* when no collection is provided.
|
|
1447
|
+
*/
|
|
1448
|
+
medley.core.indexed = (function medley$core$indexed(var_args){
|
|
1449
|
+
var G__105764 = arguments.length;
|
|
1450
|
+
switch (G__105764) {
|
|
1451
|
+
case 0:
|
|
1452
|
+
return medley.core.indexed.cljs$core$IFn$_invoke$arity$0();
|
|
1453
|
+
|
|
1454
|
+
break;
|
|
1455
|
+
case 1:
|
|
1456
|
+
return medley.core.indexed.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1457
|
+
|
|
1458
|
+
break;
|
|
1459
|
+
default:
|
|
1460
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1461
|
+
|
|
1462
|
+
}
|
|
1463
|
+
});
|
|
1464
|
+
|
|
1465
|
+
(medley.core.indexed.cljs$core$IFn$_invoke$arity$0 = (function (){
|
|
1466
|
+
return (function (rf){
|
|
1467
|
+
var i = cljs.core.volatile_BANG_((-1));
|
|
1468
|
+
return (function() {
|
|
1469
|
+
var G__105967 = null;
|
|
1470
|
+
var G__105967__0 = (function (){
|
|
1471
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1472
|
+
});
|
|
1473
|
+
var G__105967__1 = (function (result){
|
|
1474
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1475
|
+
});
|
|
1476
|
+
var G__105967__2 = (function (result,x){
|
|
1477
|
+
var G__105765 = result;
|
|
1478
|
+
var G__105766 = new cljs.core.PersistentVector(null, 2, 5, cljs.core.PersistentVector.EMPTY_NODE, [i.cljs$core$IVolatile$_vreset_BANG_$arity$2(null, (i.cljs$core$IDeref$_deref$arity$1(null, ) + (1))),x], null);
|
|
1479
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(G__105765,G__105766) : rf.call(null, G__105765,G__105766));
|
|
1480
|
+
});
|
|
1481
|
+
G__105967 = function(result,x){
|
|
1482
|
+
switch(arguments.length){
|
|
1483
|
+
case 0:
|
|
1484
|
+
return G__105967__0.call(this);
|
|
1485
|
+
case 1:
|
|
1486
|
+
return G__105967__1.call(this,result);
|
|
1487
|
+
case 2:
|
|
1488
|
+
return G__105967__2.call(this,result,x);
|
|
1489
|
+
}
|
|
1490
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1491
|
+
};
|
|
1492
|
+
G__105967.cljs$core$IFn$_invoke$arity$0 = G__105967__0;
|
|
1493
|
+
G__105967.cljs$core$IFn$_invoke$arity$1 = G__105967__1;
|
|
1494
|
+
G__105967.cljs$core$IFn$_invoke$arity$2 = G__105967__2;
|
|
1495
|
+
return G__105967;
|
|
1496
|
+
})()
|
|
1497
|
+
});
|
|
1498
|
+
}));
|
|
1499
|
+
|
|
1500
|
+
(medley.core.indexed.cljs$core$IFn$_invoke$arity$1 = (function (coll){
|
|
1501
|
+
return cljs.core.map_indexed.cljs$core$IFn$_invoke$arity$2(cljs.core.vector,coll);
|
|
1502
|
+
}));
|
|
1503
|
+
|
|
1504
|
+
(medley.core.indexed.cljs$lang$maxFixedArity = 1);
|
|
1505
|
+
|
|
1506
|
+
/**
|
|
1507
|
+
* Returns a lazy sequence of the items in coll, with a new item inserted at
|
|
1508
|
+
* the supplied index, followed by all subsequent items of the collection. Runs
|
|
1509
|
+
* in O(n) time. Returns a transducer when no collection is provided.
|
|
1510
|
+
*/
|
|
1511
|
+
medley.core.insert_nth = (function medley$core$insert_nth(var_args){
|
|
1512
|
+
var G__105770 = arguments.length;
|
|
1513
|
+
switch (G__105770) {
|
|
1514
|
+
case 2:
|
|
1515
|
+
return medley.core.insert_nth.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1516
|
+
|
|
1517
|
+
break;
|
|
1518
|
+
case 3:
|
|
1519
|
+
return medley.core.insert_nth.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
|
|
1520
|
+
|
|
1521
|
+
break;
|
|
1522
|
+
default:
|
|
1523
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1524
|
+
|
|
1525
|
+
}
|
|
1526
|
+
});
|
|
1527
|
+
|
|
1528
|
+
(medley.core.insert_nth.cljs$core$IFn$_invoke$arity$2 = (function (index,item){
|
|
1529
|
+
return (function (rf){
|
|
1530
|
+
var idx = cljs.core.volatile_BANG_((index + (1)));
|
|
1531
|
+
return (function() {
|
|
1532
|
+
var G__105971 = null;
|
|
1533
|
+
var G__105971__0 = (function (){
|
|
1534
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1535
|
+
});
|
|
1536
|
+
var G__105971__1 = (function (result){
|
|
1537
|
+
if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2(cljs.core.deref(idx),(1))){
|
|
1538
|
+
var G__105788 = (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,item) : rf.call(null, result,item));
|
|
1539
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(G__105788) : rf.call(null, G__105788));
|
|
1540
|
+
} else {
|
|
1541
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1542
|
+
}
|
|
1543
|
+
});
|
|
1544
|
+
var G__105971__2 = (function (result,x){
|
|
1545
|
+
if((idx.cljs$core$IVolatile$_vreset_BANG_$arity$2(null, (idx.cljs$core$IDeref$_deref$arity$1(null, ) - (1))) === (0))){
|
|
1546
|
+
var G__105789 = (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,item) : rf.call(null, result,item));
|
|
1547
|
+
var G__105790 = x;
|
|
1548
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(G__105789,G__105790) : rf.call(null, G__105789,G__105790));
|
|
1549
|
+
} else {
|
|
1550
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1551
|
+
}
|
|
1552
|
+
});
|
|
1553
|
+
G__105971 = function(result,x){
|
|
1554
|
+
switch(arguments.length){
|
|
1555
|
+
case 0:
|
|
1556
|
+
return G__105971__0.call(this);
|
|
1557
|
+
case 1:
|
|
1558
|
+
return G__105971__1.call(this,result);
|
|
1559
|
+
case 2:
|
|
1560
|
+
return G__105971__2.call(this,result,x);
|
|
1561
|
+
}
|
|
1562
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1563
|
+
};
|
|
1564
|
+
G__105971.cljs$core$IFn$_invoke$arity$0 = G__105971__0;
|
|
1565
|
+
G__105971.cljs$core$IFn$_invoke$arity$1 = G__105971__1;
|
|
1566
|
+
G__105971.cljs$core$IFn$_invoke$arity$2 = G__105971__2;
|
|
1567
|
+
return G__105971;
|
|
1568
|
+
})()
|
|
1569
|
+
});
|
|
1570
|
+
}));
|
|
1571
|
+
|
|
1572
|
+
(medley.core.insert_nth.cljs$core$IFn$_invoke$arity$3 = (function (index,item,coll){
|
|
1573
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1574
|
+
if((index === (0))){
|
|
1575
|
+
return cljs.core.cons(item,coll);
|
|
1576
|
+
} else {
|
|
1577
|
+
if(cljs.core.seq(coll)){
|
|
1578
|
+
return cljs.core.cons(cljs.core.first(coll),medley.core.insert_nth.cljs$core$IFn$_invoke$arity$3((index - (1)),item,cljs.core.rest(coll)));
|
|
1579
|
+
} else {
|
|
1580
|
+
return null;
|
|
1581
|
+
}
|
|
1582
|
+
}
|
|
1583
|
+
}),null,null));
|
|
1584
|
+
}));
|
|
1585
|
+
|
|
1586
|
+
(medley.core.insert_nth.cljs$lang$maxFixedArity = 3);
|
|
1587
|
+
|
|
1588
|
+
/**
|
|
1589
|
+
* Returns a lazy sequence of the items in coll, except for the item at the
|
|
1590
|
+
* supplied index. Runs in O(n) time. Returns a transducer when no collection is
|
|
1591
|
+
* provided.
|
|
1592
|
+
*/
|
|
1593
|
+
medley.core.remove_nth = (function medley$core$remove_nth(var_args){
|
|
1594
|
+
var G__105793 = arguments.length;
|
|
1595
|
+
switch (G__105793) {
|
|
1596
|
+
case 1:
|
|
1597
|
+
return medley.core.remove_nth.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
|
|
1598
|
+
|
|
1599
|
+
break;
|
|
1600
|
+
case 2:
|
|
1601
|
+
return medley.core.remove_nth.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1602
|
+
|
|
1603
|
+
break;
|
|
1604
|
+
default:
|
|
1605
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1606
|
+
|
|
1607
|
+
}
|
|
1608
|
+
});
|
|
1609
|
+
|
|
1610
|
+
(medley.core.remove_nth.cljs$core$IFn$_invoke$arity$1 = (function (index){
|
|
1611
|
+
return (function (rf){
|
|
1612
|
+
var idx = cljs.core.volatile_BANG_((index + (1)));
|
|
1613
|
+
return (function() {
|
|
1614
|
+
var G__105975 = null;
|
|
1615
|
+
var G__105975__0 = (function (){
|
|
1616
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1617
|
+
});
|
|
1618
|
+
var G__105975__1 = (function (result){
|
|
1619
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1620
|
+
});
|
|
1621
|
+
var G__105975__2 = (function (result,x){
|
|
1622
|
+
if((idx.cljs$core$IVolatile$_vreset_BANG_$arity$2(null, (idx.cljs$core$IDeref$_deref$arity$1(null, ) - (1))) === (0))){
|
|
1623
|
+
return result;
|
|
1624
|
+
} else {
|
|
1625
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1626
|
+
}
|
|
1627
|
+
});
|
|
1628
|
+
G__105975 = function(result,x){
|
|
1629
|
+
switch(arguments.length){
|
|
1630
|
+
case 0:
|
|
1631
|
+
return G__105975__0.call(this);
|
|
1632
|
+
case 1:
|
|
1633
|
+
return G__105975__1.call(this,result);
|
|
1634
|
+
case 2:
|
|
1635
|
+
return G__105975__2.call(this,result,x);
|
|
1636
|
+
}
|
|
1637
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1638
|
+
};
|
|
1639
|
+
G__105975.cljs$core$IFn$_invoke$arity$0 = G__105975__0;
|
|
1640
|
+
G__105975.cljs$core$IFn$_invoke$arity$1 = G__105975__1;
|
|
1641
|
+
G__105975.cljs$core$IFn$_invoke$arity$2 = G__105975__2;
|
|
1642
|
+
return G__105975;
|
|
1643
|
+
})()
|
|
1644
|
+
});
|
|
1645
|
+
}));
|
|
1646
|
+
|
|
1647
|
+
(medley.core.remove_nth.cljs$core$IFn$_invoke$arity$2 = (function (index,coll){
|
|
1648
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1649
|
+
if((index === (0))){
|
|
1650
|
+
return cljs.core.rest(coll);
|
|
1651
|
+
} else {
|
|
1652
|
+
if(cljs.core.seq(coll)){
|
|
1653
|
+
return cljs.core.cons(cljs.core.first(coll),medley.core.remove_nth.cljs$core$IFn$_invoke$arity$2((index - (1)),cljs.core.rest(coll)));
|
|
1654
|
+
} else {
|
|
1655
|
+
return null;
|
|
1656
|
+
}
|
|
1657
|
+
}
|
|
1658
|
+
}),null,null));
|
|
1659
|
+
}));
|
|
1660
|
+
|
|
1661
|
+
(medley.core.remove_nth.cljs$lang$maxFixedArity = 2);
|
|
1662
|
+
|
|
1663
|
+
/**
|
|
1664
|
+
* Returns a lazy sequence of the items in coll, with a new item replacing the
|
|
1665
|
+
* item at the supplied index. Runs in O(n) time. Returns a transducer when no
|
|
1666
|
+
* collection is provided.
|
|
1667
|
+
*/
|
|
1668
|
+
medley.core.replace_nth = (function medley$core$replace_nth(var_args){
|
|
1669
|
+
var G__105801 = arguments.length;
|
|
1670
|
+
switch (G__105801) {
|
|
1671
|
+
case 2:
|
|
1672
|
+
return medley.core.replace_nth.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1673
|
+
|
|
1674
|
+
break;
|
|
1675
|
+
case 3:
|
|
1676
|
+
return medley.core.replace_nth.cljs$core$IFn$_invoke$arity$3((arguments[(0)]),(arguments[(1)]),(arguments[(2)]));
|
|
1677
|
+
|
|
1678
|
+
break;
|
|
1679
|
+
default:
|
|
1680
|
+
throw (new Error(["Invalid arity: ",cljs.core.str.cljs$core$IFn$_invoke$arity$1(arguments.length)].join('')));
|
|
1681
|
+
|
|
1682
|
+
}
|
|
1683
|
+
});
|
|
1684
|
+
|
|
1685
|
+
(medley.core.replace_nth.cljs$core$IFn$_invoke$arity$2 = (function (index,item){
|
|
1686
|
+
return (function (rf){
|
|
1687
|
+
var idx = cljs.core.volatile_BANG_((index + (1)));
|
|
1688
|
+
return (function() {
|
|
1689
|
+
var G__105978 = null;
|
|
1690
|
+
var G__105978__0 = (function (){
|
|
1691
|
+
return (rf.cljs$core$IFn$_invoke$arity$0 ? rf.cljs$core$IFn$_invoke$arity$0() : rf.call(null, ));
|
|
1692
|
+
});
|
|
1693
|
+
var G__105978__1 = (function (result){
|
|
1694
|
+
return (rf.cljs$core$IFn$_invoke$arity$1 ? rf.cljs$core$IFn$_invoke$arity$1(result) : rf.call(null, result));
|
|
1695
|
+
});
|
|
1696
|
+
var G__105978__2 = (function (result,x){
|
|
1697
|
+
if((idx.cljs$core$IVolatile$_vreset_BANG_$arity$2(null, (idx.cljs$core$IDeref$_deref$arity$1(null, ) - (1))) === (0))){
|
|
1698
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,item) : rf.call(null, result,item));
|
|
1699
|
+
} else {
|
|
1700
|
+
return (rf.cljs$core$IFn$_invoke$arity$2 ? rf.cljs$core$IFn$_invoke$arity$2(result,x) : rf.call(null, result,x));
|
|
1701
|
+
}
|
|
1702
|
+
});
|
|
1703
|
+
G__105978 = function(result,x){
|
|
1704
|
+
switch(arguments.length){
|
|
1705
|
+
case 0:
|
|
1706
|
+
return G__105978__0.call(this);
|
|
1707
|
+
case 1:
|
|
1708
|
+
return G__105978__1.call(this,result);
|
|
1709
|
+
case 2:
|
|
1710
|
+
return G__105978__2.call(this,result,x);
|
|
1711
|
+
}
|
|
1712
|
+
throw(new Error('Invalid arity: ' + arguments.length));
|
|
1713
|
+
};
|
|
1714
|
+
G__105978.cljs$core$IFn$_invoke$arity$0 = G__105978__0;
|
|
1715
|
+
G__105978.cljs$core$IFn$_invoke$arity$1 = G__105978__1;
|
|
1716
|
+
G__105978.cljs$core$IFn$_invoke$arity$2 = G__105978__2;
|
|
1717
|
+
return G__105978;
|
|
1718
|
+
})()
|
|
1719
|
+
});
|
|
1720
|
+
}));
|
|
1721
|
+
|
|
1722
|
+
(medley.core.replace_nth.cljs$core$IFn$_invoke$arity$3 = (function (index,item,coll){
|
|
1723
|
+
return (new cljs.core.LazySeq(null,(function (){
|
|
1724
|
+
if((index === (0))){
|
|
1725
|
+
return cljs.core.cons(item,cljs.core.rest(coll));
|
|
1726
|
+
} else {
|
|
1727
|
+
if(cljs.core.seq(coll)){
|
|
1728
|
+
return cljs.core.cons(cljs.core.first(coll),medley.core.replace_nth.cljs$core$IFn$_invoke$arity$3((index - (1)),item,cljs.core.rest(coll)));
|
|
1729
|
+
} else {
|
|
1730
|
+
return null;
|
|
1731
|
+
}
|
|
1732
|
+
}
|
|
1733
|
+
}),null,null));
|
|
1734
|
+
}));
|
|
1735
|
+
|
|
1736
|
+
(medley.core.replace_nth.cljs$lang$maxFixedArity = 3);
|
|
1737
|
+
|
|
1738
|
+
/**
|
|
1739
|
+
* Returns the absolute value of a number.
|
|
1740
|
+
*/
|
|
1741
|
+
medley.core.abs = (function medley$core$abs(x){
|
|
1742
|
+
if((x < (0))){
|
|
1743
|
+
return (- x);
|
|
1744
|
+
} else {
|
|
1745
|
+
return x;
|
|
1746
|
+
}
|
|
1747
|
+
});
|
|
1748
|
+
/**
|
|
1749
|
+
* Atomically swaps the value of the atom to be `(apply f x args)`, where x is
|
|
1750
|
+
* the current value of the atom, then returns the original value of the atom.
|
|
1751
|
+
* This function therefore acts like an atomic `deref` then `swap!`.
|
|
1752
|
+
*/
|
|
1753
|
+
medley.core.deref_swap_BANG_ = (function medley$core$deref_swap_BANG_(var_args){
|
|
1754
|
+
var G__105815 = arguments.length;
|
|
1755
|
+
switch (G__105815) {
|
|
1756
|
+
case 2:
|
|
1757
|
+
return medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
|
|
1758
|
+
|
|
1759
|
+
break;
|
|
1760
|
+
default:
|
|
1761
|
+
var args_arr__5751__auto__ = [];
|
|
1762
|
+
var len__5726__auto___105981 = arguments.length;
|
|
1763
|
+
var i__5727__auto___105982 = (0);
|
|
1764
|
+
while(true){
|
|
1765
|
+
if((i__5727__auto___105982 < len__5726__auto___105981)){
|
|
1766
|
+
args_arr__5751__auto__.push((arguments[i__5727__auto___105982]));
|
|
1767
|
+
|
|
1768
|
+
var G__105983 = (i__5727__auto___105982 + (1));
|
|
1769
|
+
i__5727__auto___105982 = G__105983;
|
|
1770
|
+
continue;
|
|
1771
|
+
} else {
|
|
1772
|
+
}
|
|
1773
|
+
break;
|
|
1774
|
+
}
|
|
1775
|
+
|
|
1776
|
+
var argseq__5752__auto__ = ((((2) < args_arr__5751__auto__.length))?(new cljs.core.IndexedSeq(args_arr__5751__auto__.slice((2)),(0),null)):null);
|
|
1777
|
+
return medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$variadic((arguments[(0)]),(arguments[(1)]),argseq__5752__auto__);
|
|
1778
|
+
|
|
1779
|
+
}
|
|
1780
|
+
});
|
|
1781
|
+
|
|
1782
|
+
(medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$2 = (function (atom,f){
|
|
1783
|
+
var value = cljs.core.deref(atom);
|
|
1784
|
+
cljs.core.reset_BANG_(atom,(f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(value) : f.call(null, value)));
|
|
1785
|
+
|
|
1786
|
+
return value;
|
|
1787
|
+
}));
|
|
1788
|
+
|
|
1789
|
+
(medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$variadic = (function (atom,f,args){
|
|
1790
|
+
return medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$2(atom,(function (p1__105809_SHARP_){
|
|
1791
|
+
return cljs.core.apply.cljs$core$IFn$_invoke$arity$3(f,p1__105809_SHARP_,args);
|
|
1792
|
+
}));
|
|
1793
|
+
}));
|
|
1794
|
+
|
|
1795
|
+
/** @this {Function} */
|
|
1796
|
+
(medley.core.deref_swap_BANG_.cljs$lang$applyTo = (function (seq105812){
|
|
1797
|
+
var G__105813 = cljs.core.first(seq105812);
|
|
1798
|
+
var seq105812__$1 = cljs.core.next(seq105812);
|
|
1799
|
+
var G__105814 = cljs.core.first(seq105812__$1);
|
|
1800
|
+
var seq105812__$2 = cljs.core.next(seq105812__$1);
|
|
1801
|
+
var self__5711__auto__ = this;
|
|
1802
|
+
return self__5711__auto__.cljs$core$IFn$_invoke$arity$variadic(G__105813,G__105814,seq105812__$2);
|
|
1803
|
+
}));
|
|
1804
|
+
|
|
1805
|
+
(medley.core.deref_swap_BANG_.cljs$lang$maxFixedArity = (2));
|
|
1806
|
+
|
|
1807
|
+
/**
|
|
1808
|
+
* Sets the value of the atom without regard for the current value, then returns
|
|
1809
|
+
* the original value of the atom. See also: [[deref-swap!]].
|
|
1810
|
+
*/
|
|
1811
|
+
medley.core.deref_reset_BANG_ = (function medley$core$deref_reset_BANG_(atom,newval){
|
|
1812
|
+
return medley.core.deref_swap_BANG_.cljs$core$IFn$_invoke$arity$2(atom,cljs.core.constantly(newval));
|
|
1813
|
+
});
|
|
1814
|
+
/**
|
|
1815
|
+
* Returns the message attached to the given Error/Throwable object. For all
|
|
1816
|
+
* other types returns nil. Same as `cljs.core/ex-message` except it works for
|
|
1817
|
+
* Clojure as well as ClojureScript.
|
|
1818
|
+
*/
|
|
1819
|
+
medley.core.ex_message = (function medley$core$ex_message(ex){
|
|
1820
|
+
return cljs.core.ex_message(ex);
|
|
1821
|
+
});
|
|
1822
|
+
/**
|
|
1823
|
+
* Returns the cause attached to the given ExceptionInfo/Throwable object. For
|
|
1824
|
+
* all other types returns nil. Same as `cljs.core/ex-cause` except it works for
|
|
1825
|
+
* Clojure as well as ClojureScript.
|
|
1826
|
+
*/
|
|
1827
|
+
medley.core.ex_cause = (function medley$core$ex_cause(ex){
|
|
1828
|
+
return cljs.core.ex_cause(ex);
|
|
1829
|
+
});
|
|
1830
|
+
/**
|
|
1831
|
+
* Returns true if the value is a UUID.
|
|
1832
|
+
*/
|
|
1833
|
+
medley.core.uuid_QMARK_ = (function medley$core$uuid_QMARK_(x){
|
|
1834
|
+
return (x instanceof cljs.core.UUID);
|
|
1835
|
+
});
|
|
1836
|
+
/**
|
|
1837
|
+
* Returns a UUID generated from the supplied string. Same as `cljs.core/uuid`
|
|
1838
|
+
* in ClojureScript, while in Clojure it returns a `java.util.UUID` object.
|
|
1839
|
+
*/
|
|
1840
|
+
medley.core.uuid = (function medley$core$uuid(s){
|
|
1841
|
+
return cljs.core.uuid(s);
|
|
1842
|
+
});
|
|
1843
|
+
/**
|
|
1844
|
+
* Generates a new random UUID. Same as `cljs.core/random-uuid` except it works
|
|
1845
|
+
* for Clojure as well as ClojureScript.
|
|
1846
|
+
*/
|
|
1847
|
+
medley.core.random_uuid = (function medley$core$random_uuid(){
|
|
1848
|
+
return cljs.core.random_uuid();
|
|
1849
|
+
});
|
|
1850
|
+
/**
|
|
1851
|
+
* Returns true if the value is a regular expression.
|
|
1852
|
+
*/
|
|
1853
|
+
medley.core.regexp_QMARK_ = (function medley$core$regexp_QMARK_(x){
|
|
1854
|
+
return (x instanceof RegExp);
|
|
1855
|
+
});
|
|
1856
|
+
|
|
1857
|
+
//# sourceMappingURL=medley.core.js.map
|