Some refactor; update JS with latest changes

This commit is contained in:
Chris Hodapp
2020-07-12 18:24:28 -04:00
parent 6cd73c7323
commit 4a568cb523
14 changed files with 6783 additions and 6720 deletions

View File

@@ -15,44 +15,44 @@ clojure.string.reverse = (function clojure$string$reverse(s){
return s.replace(clojure.string.re_surrogate_pair,"$2$1").split("").reverse().join("");
});
clojure.string.replace_all = (function clojure$string$replace_all(s,re,replacement){
var r = (new RegExp(re.source,(function (){var G__5651 = "g";
var G__5651__$1 = (cljs.core.truth_(re.ignoreCase)?[G__5651,"i"].join(''):G__5651);
var G__5651__$2 = (cljs.core.truth_(re.multiline)?[G__5651__$1,"m"].join(''):G__5651__$1);
var r = (new RegExp(re.source,(function (){var G__5666 = "g";
var G__5666__$1 = (cljs.core.truth_(re.ignoreCase)?[G__5666,"i"].join(''):G__5666);
var G__5666__$2 = (cljs.core.truth_(re.multiline)?[G__5666__$1,"m"].join(''):G__5666__$1);
if(cljs.core.truth_(re.unicode)){
return [G__5651__$2,"u"].join('');
return [G__5666__$2,"u"].join('');
} else {
return G__5651__$2;
return G__5666__$2;
}
})()));
return s.replace(r,replacement);
});
clojure.string.replace_with = (function clojure$string$replace_with(f){
return (function() {
var G__5654__delegate = function (args){
var G__5669__delegate = function (args){
var matches = cljs.core.drop_last.cljs$core$IFn$_invoke$arity$2((2),args);
if(cljs.core._EQ_.cljs$core$IFn$_invoke$arity$2(cljs.core.count(matches),(1))){
var G__5652 = cljs.core.first(matches);
return (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(G__5652) : f.call(null,G__5652));
var G__5667 = cljs.core.first(matches);
return (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(G__5667) : f.call(null,G__5667));
} else {
var G__5653 = cljs.core.vec(matches);
return (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(G__5653) : f.call(null,G__5653));
var G__5668 = cljs.core.vec(matches);
return (f.cljs$core$IFn$_invoke$arity$1 ? f.cljs$core$IFn$_invoke$arity$1(G__5668) : f.call(null,G__5668));
}
};
var G__5654 = function (var_args){
var G__5669 = function (var_args){
var args = null;
if (arguments.length > 0) {
var G__5655__i = 0, G__5655__a = new Array(arguments.length - 0);
while (G__5655__i < G__5655__a.length) {G__5655__a[G__5655__i] = arguments[G__5655__i + 0]; ++G__5655__i;}
args = new cljs.core.IndexedSeq(G__5655__a,0,null);
var G__5670__i = 0, G__5670__a = new Array(arguments.length - 0);
while (G__5670__i < G__5670__a.length) {G__5670__a[G__5670__i] = arguments[G__5670__i + 0]; ++G__5670__i;}
args = new cljs.core.IndexedSeq(G__5670__a,0,null);
}
return G__5654__delegate.call(this,args);};
G__5654.cljs$lang$maxFixedArity = 0;
G__5654.cljs$lang$applyTo = (function (arglist__5656){
var args = cljs.core.seq(arglist__5656);
return G__5654__delegate(args);
return G__5669__delegate.call(this,args);};
G__5669.cljs$lang$maxFixedArity = 0;
G__5669.cljs$lang$applyTo = (function (arglist__5671){
var args = cljs.core.seq(arglist__5671);
return G__5669__delegate(args);
});
G__5654.cljs$core$IFn$_invoke$arity$variadic = G__5654__delegate;
return G__5654;
G__5669.cljs$core$IFn$_invoke$arity$variadic = G__5669__delegate;
return G__5669;
})()
;
});
@@ -123,8 +123,8 @@ return s.replace(match,replacement);
* separated by an optional separator.
*/
clojure.string.join = (function clojure$string$join(var_args){
var G__5658 = arguments.length;
switch (G__5658) {
var G__5673 = arguments.length;
switch (G__5673) {
case 1:
return clojure.string.join.cljs$core$IFn$_invoke$arity$1((arguments[(0)]));
@@ -144,10 +144,10 @@ var sb = (new goog.string.StringBuffer());
var coll__$1 = cljs.core.seq(coll);
while(true){
if((!((coll__$1 == null)))){
var G__5660 = sb.append(cljs.core.str.cljs$core$IFn$_invoke$arity$1(cljs.core.first(coll__$1)));
var G__5661 = cljs.core.next(coll__$1);
sb = G__5660;
coll__$1 = G__5661;
var G__5675 = sb.append(cljs.core.str.cljs$core$IFn$_invoke$arity$1(cljs.core.first(coll__$1)));
var G__5676 = cljs.core.next(coll__$1);
sb = G__5675;
coll__$1 = G__5676;
continue;
} else {
return sb.toString();
@@ -169,10 +169,10 @@ if((coll__$2 == null)){
sb.append(separator);
}
var G__5662 = sb;
var G__5663 = coll__$2;
sb = G__5662;
coll__$1 = G__5663;
var G__5677 = sb;
var G__5678 = coll__$2;
sb = G__5677;
coll__$1 = G__5678;
continue;
} else {
return sb.toString();
@@ -206,8 +206,8 @@ clojure.string.pop_last_while_empty = (function clojure$string$pop_last_while_em
var v__$1 = v;
while(true){
if(("" === cljs.core.peek(v__$1))){
var G__5664 = cljs.core.pop(v__$1);
v__$1 = G__5664;
var G__5679 = cljs.core.pop(v__$1);
v__$1 = G__5679;
continue;
} else {
return v__$1;
@@ -226,12 +226,12 @@ clojure.string.split_with_empty_regex = (function clojure$string$split_with_empt
if((((limit <= (0))) || ((limit >= ((2) + cljs.core.count(s)))))){
return cljs.core.conj.cljs$core$IFn$_invoke$arity$2(cljs.core.vec(cljs.core.cons("",cljs.core.map.cljs$core$IFn$_invoke$arity$2(cljs.core.str,cljs.core.seq(s)))),"");
} else {
var pred__5665 = cljs.core._EQ__EQ_;
var expr__5666 = limit;
if(cljs.core.truth_((pred__5665.cljs$core$IFn$_invoke$arity$2 ? pred__5665.cljs$core$IFn$_invoke$arity$2((1),expr__5666) : pred__5665.call(null,(1),expr__5666)))){
var pred__5680 = cljs.core._EQ__EQ_;
var expr__5681 = limit;
if(cljs.core.truth_((pred__5680.cljs$core$IFn$_invoke$arity$2 ? pred__5680.cljs$core$IFn$_invoke$arity$2((1),expr__5681) : pred__5680.call(null,(1),expr__5681)))){
return (new cljs.core.PersistentVector(null,1,(5),cljs.core.PersistentVector.EMPTY_NODE,[s],null));
} else {
if(cljs.core.truth_((pred__5665.cljs$core$IFn$_invoke$arity$2 ? pred__5665.cljs$core$IFn$_invoke$arity$2((2),expr__5666) : pred__5665.call(null,(2),expr__5666)))){
if(cljs.core.truth_((pred__5680.cljs$core$IFn$_invoke$arity$2 ? pred__5680.cljs$core$IFn$_invoke$arity$2((2),expr__5681) : pred__5680.call(null,(2),expr__5681)))){
return (new cljs.core.PersistentVector(null,2,(5),cljs.core.PersistentVector.EMPTY_NODE,["",s],null));
} else {
var c = (limit - (2));
@@ -245,8 +245,8 @@ return cljs.core.conj.cljs$core$IFn$_invoke$arity$2(cljs.core.vec(cljs.core.cons
* the maximum number of splits. Not lazy. Returns vector of the splits.
*/
clojure.string.split = (function clojure$string$split(var_args){
var G__5669 = arguments.length;
switch (G__5669) {
var G__5684 = arguments.length;
switch (G__5684) {
case 2:
return clojure.string.split.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
@@ -276,12 +276,12 @@ return cljs.core.conj.cljs$core$IFn$_invoke$arity$2(parts,s__$1);
var m = cljs.core.re_find(re,s__$1);
if((!((m == null)))){
var index = s__$1.indexOf(m);
var G__5671 = s__$1.substring((index + cljs.core.count(m)));
var G__5672 = (limit__$1 - (1));
var G__5673 = cljs.core.conj.cljs$core$IFn$_invoke$arity$2(parts,s__$1.substring((0),index));
s__$1 = G__5671;
limit__$1 = G__5672;
parts = G__5673;
var G__5686 = s__$1.substring((index + cljs.core.count(m)));
var G__5687 = (limit__$1 - (1));
var G__5688 = cljs.core.conj.cljs$core$IFn$_invoke$arity$2(parts,s__$1.substring((0),index));
s__$1 = G__5686;
limit__$1 = G__5687;
parts = G__5688;
continue;
} else {
return cljs.core.conj.cljs$core$IFn$_invoke$arity$2(parts,s__$1);
@@ -330,8 +330,8 @@ return "";
} else {
var ch = cljs.core.get.cljs$core$IFn$_invoke$arity$2(s,(index - (1)));
if(((("\n" === ch)) || (("\r" === ch)))){
var G__5674 = (index - (1));
index = G__5674;
var G__5689 = (index - (1));
index = G__5689;
continue;
} else {
return s.substring((0),index);
@@ -369,8 +369,8 @@ buffer.append(cljs.core.str.cljs$core$IFn$_invoke$arity$1(replacement));
buffer.append(ch);
}
var G__5675 = (index + (1));
index = G__5675;
var G__5690 = (index + (1));
index = G__5690;
continue;
}
break;
@@ -381,8 +381,8 @@ break;
* forward from from-index or nil if not found.
*/
clojure.string.index_of = (function clojure$string$index_of(var_args){
var G__5677 = arguments.length;
switch (G__5677) {
var G__5692 = arguments.length;
switch (G__5692) {
case 2:
return clojure.string.index_of.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));
@@ -422,8 +422,8 @@ clojure.string.index_of.cljs$lang$maxFixedArity = 3;
* searching backward from from-index or nil if not found.
*/
clojure.string.last_index_of = (function clojure$string$last_index_of(var_args){
var G__5680 = arguments.length;
switch (G__5680) {
var G__5695 = arguments.length;
switch (G__5695) {
case 2:
return clojure.string.last_index_of.cljs$core$IFn$_invoke$arity$2((arguments[(0)]),(arguments[(1)]));