squint-cljs 0.4.57 → 0.4.59
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 +1 -1
- package/lib/cli.js +39 -39
- package/lib/cljs.pprint.js +152 -152
- package/lib/compiler.js +509 -509
- package/lib/compiler.node.js +30 -30
- package/lib/compiler.sci.js +1050 -1050
- package/lib/node.nrepl_server.js +15 -15
- package/lib/squint.core.umd.js +1 -1
- package/package.json +1 -1
- package/src/squint/core.js +29 -0
package/lib/node.nrepl_server.js
CHANGED
|
@@ -4,20 +4,20 @@ import "./node.js";
|
|
|
4
4
|
import "./compiler.node.js";
|
|
5
5
|
const shadow_esm_import = function(x) { return import(x) };
|
|
6
6
|
import*as esm_import$fs from"fs";import*as esm_import$net from"net";
|
|
7
|
-
var K9=function(a,b){a=a.indexOf(b);if(0>a)throw Error("out of input");return a},L9=function(a,b){if(a.length<b)throw Error("out of input");return a.slice(b)},M9=function(a,b){if(b>a.length)throw Error("out of input");return a.slice(0,b)},N9=function(a){return console.debug($APP.lp.g(" ",a))},
|
|
8
|
-
|
|
9
|
-
"version-string",a)},
|
|
10
|
-
$APP.
|
|
11
|
-
|
|
12
|
-
"ns",$APP.t.h($APP.
|
|
13
|
-
["status",new $APP.J(null,3,5,$APP.N,["error","unknown-op","done"],null)],null);return b.g?b.g(a,c):b.call(null,a,c)},
|
|
14
|
-
0,null);m=$APP.C.j(m,1,null);if(null==l){k=new $APP.J(null,2,5,$APP.N,[k,m],null);break a}k=$APP.Ee.g(k,l);l=m}f=$APP.C.j(k,0,null);k=$APP.C.j(k,1,null);$APP.
|
|
15
|
-
|
|
16
|
-
|
|
7
|
+
var K9=function(a,b){a=a.indexOf(b);if(0>a)throw Error("out of input");return a},L9=function(a,b){if(a.length<b)throw Error("out of input");return a.slice(b)},M9=function(a,b){if(b>a.length)throw Error("out of input");return a.slice(0,b)},N9=function(a){return console.debug($APP.lp.g(" ",a))},vfa=function(a){return function(b,c){b=$APP.kf(b);var d=$APP.fe.g(b,$APP.EF),e=$APP.fe.g(b,ufa);c=$APP.zi.j(c,"id",d);c=$APP.r(e)?$APP.zi.j(c,"session",e):c;return a.g?a.g(b,c):a.call(null,b,c)}},xfa=function(){var a=
|
|
8
|
+
wfa;return function(b,c){b=$APP.Lm.j(b,O9,$APP.vi);return a.g?a.g(b,c):a.call(null,b,c)}},zfa=function(){var a=yfa();return function(b,c){N9($APP.F(["request",b]));return a.g?a.g(b,c):a.call(null,b,c)}},Afa=function(a){return function(b,c){N9($APP.F(["response",c]));return a.g?a.g(b,c):a.call(null,b,c)}},yfa=function(){var a=xfa();return function(b,c){return a.g?a.g(b,c):a.call(null,b,c)}},P9=function(a){return $APP.zi.j($APP.Yh(new $APP.J(null,3,5,$APP.N,["major","minor","incremental"],null),$APP.wu.h(a.split("."))),
|
|
9
|
+
"version-string",a)},Bfa=function(a,b,c){if($APP.r(a))if(a=Q9.h?Q9.h(a):Q9.call(null,a),$APP.r(a)){b=$APP.kf(b);var d=$APP.fe.g(b,$APP.s9),e=$APP.fe.g(b,$APP.l9),f=$APP.fe.g(b,$APP.u9);b=$APP.Qa;var k=$APP.hi,l=$APP.T6;$APP.Qa=e;$APP.hi=f;$APP.T6=d;try{var m=new $APP.Fa;d=$APP.Ta;e=$APP.Ua;$APP.Ta=!0;$APP.Ua=function(g){return m.append(g)};try{a.h?a.h(c):a.call(null,c)}finally{$APP.Ua=e,$APP.Ta=d}return $APP.t.h(m)}finally{$APP.T6=l,$APP.hi=k,$APP.Qa=b}}else return N9($APP.F(["Pretty-Printing is only supported for cider.nrepl.pprint/pprint"])),
|
|
10
|
+
$APP.Hs.l($APP.F([c]));else return $APP.Hs.l($APP.F([c]))},Dfa=function(a){a:{var b=$APP.jq;$APP.jq=$APP.v(R9);try{var c=$APP.Et(a,new $APP.n(null,5,[$APP.gp,$APP.fp,$APP.Rs,Cfa,$APP.tt,!0,$APP.Vs,!0,$APP.cs,!0],null));break a}finally{$APP.jq=b}c=void 0}c=$APP.kf(c);a=$APP.fe.g(c,$APP.Dt);c=$APP.fe.g(c,$APP.S);a=$APP.Sj("(async function () {\n%s\n}) ()","%s",a);$APP.Jf(R9,c);return a},Jfa=function(a,b){var c=$APP.kf(a);$APP.fe.g(c,$APP.S);a=$APP.fe.g(c,Efa);$APP.fe.g(c,$APP.Sk);$APP.fe.g(c,Ffa);$APP.fe.g(c,
|
|
11
|
+
Gfa);return Promise.resolve(a).then(Dfa).then(function(d){$APP.zF.l($APP.F(["About to eval:"]));$APP.zF.l($APP.F([d]));return eval(d)}).then(function(d){d=new $APP.n(null,2,["ns",$APP.t.h($APP.v(R9)),"value",Bfa(Hfa.h(c),Ifa.h(c),d)],null);return b.g?b.g(c,d):b.call(null,c,d)}).catch(function(d){console.error(d);var e=$APP.DF.h($APP.ij(d));e=$APP.r(e)?e:d.message;$APP.r(e)&&(e=new $APP.n(null,1,["err",[$APP.t.h(e),"\n"].join("")],null),b.g?b.g(c,e):b.call(null,c,e));d=new $APP.n(null,2,["ex",$APP.t.h(d),
|
|
12
|
+
"ns",$APP.t.h($APP.jq)],null);return b.g?b.g(c,d):b.call(null,c,d)}).finally(function(){var d=new $APP.n(null,2,["ns",$APP.t.h($APP.v(R9)),"status",new $APP.J(null,1,5,$APP.N,["done"],null)],null);return b.g?b.g(c,d):b.call(null,c,d)})},S9=function(a){a=$APP.kf(a);$APP.fe.g(a,$APP.S);return null},wfa=function(a,b){a=$APP.kf(a);var c=$APP.fe.g(a,O9),d=$APP.fe.g(T9,c);if($APP.r(d))return d.g?d.g(a,b):d.call(null,a,b);console.warn($APP.lp.g(" ",$APP.F(["Unhandled operation",c])));c=new $APP.n(null,1,
|
|
13
|
+
["status",new $APP.J(null,3,5,$APP.N,["error","unknown-op","done"],null)],null);return b.g?b.g(a,c):b.call(null,a,c)},Kfa=function(a){return function(b,c){return a.write(U9(c))}},Lfa=function(a,b){N9($APP.F(["Connection accepted"]));b.setNoDelay(!0);var c=zfa(),d=vfa(Afa(Kfa(b))),e=$APP.Oi.h(null);b.on("data",function(f){var k=$APP.v(e);if($APP.r(k)){f=[$APP.t.h(k),$APP.t.h(f)].join("");$APP.Jf(e,null);var l=f}else l=f;a:for(f=$APP.F([$APP.xu,!0]),k=$APP.lg;;){var m=$APP.Gf.j(V9,l,f);l=$APP.C.j(m,
|
|
14
|
+
0,null);m=$APP.C.j(m,1,null);if(null==l){k=new $APP.J(null,2,5,$APP.N,[k,m],null);break a}k=$APP.Ee.g(k,l);l=m}f=$APP.C.j(k,0,null);k=$APP.C.j(k,1,null);$APP.YE(k)||$APP.Jf(e,k);f=$APP.x(f);k=null;for(var g=m=0;;)if(g<m)l=k.ba(null,g),c(l,d),g+=1;else if(f=$APP.x(f))k=f,$APP.Zd(k)?(f=$APP.uc(k),m=$APP.vc(k),k=f,l=$APP.xd(f),f=m,m=l):(l=$APP.y(k),c(l,d),f=$APP.z(k),k=null,m=0),g=0;else return null});return b.on("close",function(f){return $APP.r(f)?N9($APP.F(["Connection lost"])):N9($APP.F(["Connection closed"]))})},
|
|
15
|
+
Gfa=new $APP.I(null,"_line","_line",232847719),Ifa=new $APP.I("nrepl.middleware.print","options","nrepl.middleware.print/options",868480159),ufa=new $APP.I(null,"session","session",1008279103),Mfa=new $APP.I(null,"lookup","lookup",1225356838),Nfa=new $APP.I(null,"load-file","load-file",-424586670),Ffa=new $APP.I(null,"_load-file?","_load-file?",-1198848711),O9=new $APP.I(null,"op","op",-1882987955),Ofa=new $APP.I(null,"describe","describe",1369790582),Efa=new $APP.I(null,"code","code",1586293142),
|
|
16
|
+
Pfa=new $APP.I(null,"eldoc","eldoc",-1321421900),Qfa=new $APP.I(null,"log_level","log_level",-1756736313),Hfa=new $APP.I("nrepl.middleware.print","print","nrepl.middleware.print/print",-1616742548),Rfa=new $APP.I(null,"clone","clone",711747572),Sfa=new $APP.I(null,"close","close",1835149582),Tfa=new $APP.I(null,"info","info",-317069002),Ufa=new $APP.I(null,"host","host",-1558485167),Vfa=new $APP.I(null,"complete","complete",-500388775);var W9=function W9(a,b){switch($APP.t.h(M9(a,1))){case "i":return a=L9(a,1),b=K9(a,"e"),new $APP.J(null,2,5,$APP.N,[parseInt(M9(a,b)),L9(a,b+1)],null);case "l":var d=a=L9(a,1);for(a=$APP.mc($APP.lg);;){if($APP.A.g($APP.t.h(M9(d,1)),"e"))return new $APP.J(null,2,5,$APP.N,[$APP.pc(a),L9(d,1)],null);var e=W9.g?W9.g(d,b):W9.call(null,d,b),f=$APP.C.j(e,0,null),k=$APP.C.j(e,1,null);e=k;a=$APP.gg.g(a,f);d=e}case "d":for(a=L9(a,1),f=$APP.kf(b),f=$APP.fe.g(f,$APP.xu),d=a,e=$APP.mc($APP.hf);;){if($APP.A.g($APP.t.h(M9(d,
|
|
17
17
|
1)),"e"))return new $APP.J(null,2,5,$APP.N,[$APP.pc(e),L9(d,1)],null);a=W9.g?W9.g(d,b):W9.call(null,d,b);d=$APP.C.j(a,0,null);k=$APP.C.j(a,1,null);k=W9.g?W9.g(k,b):W9.call(null,k,b);a=$APP.C.j(k,0,null);k=$APP.C.j(k,1,null);d=$APP.r(f)?$APP.vi.h(d):d;a=$APP.Ug.j(e,d,a);d=k;e=a}default:return b=K9(a,":"),f=parseInt(M9(a,b)),a=L9(a,b+1),new $APP.J(null,2,5,$APP.N,[$APP.t.h(M9(a,f)),L9(a,f)],null)}},V9=function V9(a){for(var c=[],d=arguments.length,e=0;;)if(e<d)c.push(arguments[e]),e+=1;else break;return V9.l(arguments[0],
|
|
18
18
|
1<c.length?new $APP.Zc(c.slice(1),0,null):null)};V9.l=function(a,b){try{return W9(a,b)}catch(c){if(c instanceof Error)return new $APP.J(null,2,5,$APP.N,[null,a],null);throw c;}};V9.m=1;V9.o=function(a){var b=$APP.y(a);a=$APP.z(a);return this.l(b,a)};
|
|
19
|
-
var U9=function U9(a){for(;;){if("string"===typeof a)return[$APP.t.h(Buffer.from(a).length),":",a].join("");if(a instanceof $APP.I||a instanceof $APP.w)a=[function(){var c=$APP.Oe(a);return $APP.r(c)?[c,"/"].join(""):null}(),$APP.Xh(a)].join("");else return"number"===typeof a?["i",$APP.t.h(a),"e"].join(""):$APP.Td(a)||$APP.Yd(a)||null==a?["l",$APP.t.h($APP.Gf.g($APP.t,$APP.ui.g(U9,a))),"e"].join(""):$APP.
|
|
20
|
-
0,null);c=$APP.C.j(c,1,null);return[$APP.t.h(U9.h?U9.h(d):U9.call(null,d)),$APP.t.h(U9.h?U9.h(c):U9.call(null,c))].join("")}}(a),$APP.
|
|
21
|
-
var
|
|
22
|
-
2,["nbb-nrepl",P9("TODO"),"node",P9(process.version)],null),"aux",$APP.hf,"ops",$APP.Yh($APP.ui.g($APP.Xh,$APP.Mh(T9)),$APP.
|
|
23
|
-
":",$APP.t.h(f)].join("")]));try{return esm_import$fs.writeFileSync(".nrepl-port",$APP.t.h(f))}catch(k){return console.warn($APP.lp.g(" ",$APP.F(["Could not write .nrepl-port",k])))}});return $APP.Jf(
|
|
19
|
+
var U9=function U9(a){for(;;){if("string"===typeof a)return[$APP.t.h(Buffer.from(a).length),":",a].join("");if(a instanceof $APP.I||a instanceof $APP.w)a=[function(){var c=$APP.Oe(a);return $APP.r(c)?[c,"/"].join(""):null}(),$APP.Xh(a)].join("");else return"number"===typeof a?["i",$APP.t.h(a),"e"].join(""):$APP.Td(a)||$APP.Yd(a)||null==a?["l",$APP.t.h($APP.Gf.g($APP.t,$APP.ui.g(U9,a))),"e"].join(""):$APP.Wd(a)?["d",$APP.t.h($APP.Gf.g($APP.t,$APP.ui.g(function(){return function(c){var d=$APP.C.j(c,
|
|
20
|
+
0,null);c=$APP.C.j(c,1,null);return[$APP.t.h(U9.h?U9.h(d):U9.call(null,d)),$APP.t.h(U9.h?U9.h(c):U9.call(null,c))].join("")}}(a),$APP.wF.g($APP.y,a)))),"e"].join(""):null}};var R9=$APP.Oi.h($APP.jq),Q9=new $APP.n(null,1,["cider.nrepl.pprint/pprint",$APP.B9],null);$APP.Oi.h(!1);
|
|
21
|
+
var Cfa=$APP.Oi.h($APP.hf),T9=$APP.vh([Mfa,Sfa,Nfa,Pfa,Rfa,Ofa,Tfa,Vfa,$APP.FF],[S9,function(a,b){var c=new $APP.n(null,1,["status",new $APP.J(null,1,5,$APP.N,["done"],null)],null);return b.g?b.g(a,c):b.call(null,a,c)},function(a){a=$APP.kf(a);$APP.fe.g(a,$APP.Sk);return null},S9,function(a,b){var c=new $APP.n(null,2,["new-session",$APP.t.h($APP.VE()),"status",new $APP.J(null,1,5,$APP.N,["done"],null)],null);return b.g?b.g(a,c):b.call(null,a,c)},function(a,b){var c=new $APP.n(null,4,["versions",new $APP.n(null,
|
|
22
|
+
2,["nbb-nrepl",P9("TODO"),"node",P9(process.version)],null),"aux",$APP.hf,"ops",$APP.Yh($APP.ui.g($APP.Xh,$APP.Mh(T9)),$APP.Zt.h($APP.hf)),"status",new $APP.J(null,1,5,$APP.N,["done"],null)],null);return b.g?b.g(a,c):b.call(null,a,c)},S9,function(){return null},function(a,b){a=$APP.kf(a);var c=$APP.fe.g(a,$APP.S);$APP.xF.l($APP.F([$APP.S,c]));return Jfa($APP.zi.j(a,$APP.S,$APP.v(R9)),b)}]),Wfa=$APP.Oi.h(null);export const startServer=function(a){return Promise.resolve(null).then(function(){var b=function(){var e=$APP.BF.h(a);return $APP.r(e)?e:0}(),c=function(){var e=Ufa.h(a);return $APP.r(e)?e:"127.0.0.1"}();(function(){var e=$APP.$a(a)?a.bg:Qfa.h(a);return $APP.r(e)?e:"info"})();var d=esm_import$net.createServer($APP.Lk.g(Lfa,$APP.hf));d.listen(b,c,function(){var e=d.address(),f=e.port;e=e.address;$APP.zF.l($APP.F([["nREPL server started on port ",$APP.t.h(f)," on host ",$APP.t.h(e)," - nrepl://",$APP.t.h(e),
|
|
23
|
+
":",$APP.t.h(f)].join("")]));try{return esm_import$fs.writeFileSync(".nrepl-port",$APP.t.h(f))}catch(k){return console.warn($APP.lp.g(" ",$APP.F(["Could not write .nrepl-port",k])))}});return $APP.Jf(Wfa,d)})};
|
package/lib/squint.core.umd.js
CHANGED
|
@@ -1 +1 @@
|
|
|
1
|
-
var squint;(squint||={}).core=(()=>{var B=Object.defineProperty;var Ce=Object.getOwnPropertyDescriptor;var Fe=Object.getOwnPropertyNames;var Ve=Object.prototype.hasOwnProperty;var We=(e,t)=>{for(var r in t)B(e,r,{get:t[r],enumerable:!0})},Je=(e,t,r,n)=>{if(t&&typeof t=="object"||typeof t=="function")for(let o of Fe(t))!Ve.call(e,o)&&o!==r&&B(e,o,{get:()=>t[o],enumerable:!(n=Ce(t,o))||n.enumerable});return e};var De=e=>Je(B({},"__esModule",{value:!0}),e);var cn={};We(cn,{Atom:()=>ae,Cons:()=>fe,IIterable:()=>Y,IIterable__iterator:()=>ue,LazySeq:()=>pr,NaN_QMARK_:()=>Yr,PROTOCOL_SENTINEL:()=>At,_:()=>Ze,_GT_:()=>Ue,_PLUS_:()=>Xe,_iterator:()=>N,aclone:()=>Sr,add_watch:()=>jr,alength:()=>Er,apply:()=>Nt,array_QMARK_:()=>ye,aset:()=>Rr,assoc:()=>v,assoc_BANG_:()=>A,assoc_in:()=>X,assoc_in_BANG_:()=>rt,atom:()=>Mt,boolean$:()=>mr,boolean_QMARK_:()=>Hr,bounded_count:()=>en,butlast:()=>xr,coll_QMARK_:()=>Cr,comp:()=>nt,compare:()=>G,complement:()=>de,concat:()=>we,conj:()=>Z,conj_BANG_:()=>z,cons:()=>ce,constantly:()=>It,contains_QMARK_:()=>ee,count:()=>Q,counted_QMARK_:()=>qe,cycle:()=>Jt,dec:()=>ft,deref:()=>pe,disj:()=>ot,disj_BANG_:()=>H,dissoc:()=>it,dissoc_BANG_:()=>ut,distinct:()=>Dt,doall:()=>Qr,dorun:()=>Kr,drop:()=>T,drop_last:()=>_r,drop_while:()=>Ke,empty:()=>be,empty_QMARK_:()=>ir,es6_iterator:()=>O,even_QMARK_:()=>he,every_QMARK_:()=>Se,every_pred:()=>Tr,ex_cause:()=>Jr,ex_data:()=>Vr,ex_info:()=>Dr,ex_message:()=>Wr,false_QMARK_:()=>wr,ffirst:()=>st,filter:()=>C,filterv:()=>ht,find:()=>tn,first:()=>R,fn_QMARK_:()=>zr,fnil:()=>W,frequencies:()=>ar,get:()=>h,get_in:()=>Qe,group_by:()=>lr,identical_QMARK_:()=>Ft,identity:()=>ge,inc:()=>te,int_QMARK_:()=>Ye,integer_QMARK_:()=>Ur,interleave:()=>me,interpose:()=>Bt,into:()=>Ee,into_array:()=>ke,iterable:()=>f,iterate:()=>Br,js_keys:()=>$r,js_obj:()=>Mr,juxt:()=>Lr,keep:()=>Ht,keep_indexed:()=>wt,key:()=>ve,keys:()=>Pe,last:()=>at,lazy:()=>s,list:()=>Tt,list_QMARK_:()=>kt,map:()=>M,map_QMARK_:()=>kr,map_indexed:()=>yt,mapcat:()=>Gt,mapv:()=>_e,max:()=>Ie,max_key:()=>on,merge:()=>$t,merge_with:()=>qt,meta:()=>Xr,min:()=>Ir,min_key:()=>nn,mod:()=>rn,neg_QMARK_:()=>br,next:()=>Te,nil_QMARK_:()=>mt,not:()=>se,not_any_QMARK_:()=>or,not_every_QMARK_:()=>Zt,nth:()=>ne,number_QMARK_:()=>Le,object_QMARK_:()=>et,odd_QMARK_:()=>Ot,parse_long:()=>fn,partial:()=>Wt,partition:()=>zt,partition_all:()=>Pt,partition_by:()=>Yt,pos_QMARK_:()=>vr,pr_str:()=>le,println:()=>re,prn:()=>vt,rand_int:()=>Oe,rand_nth:()=>fr,range:()=>Rt,re_matches:()=>Kt,re_seq:()=>Be,reduce:()=>L,reduce_kv:()=>Or,reduced:()=>pt,reduced_QMARK_:()=>xt,regexp_QMARK_:()=>Fr,remove:()=>dt,remove_watch:()=>Nr,repeat:()=>V,repeatedly:()=>sr,replace:()=>ur,reset_BANG_:()=>xe,rest:()=>lt,reverse:()=>er,satisfies_QMARK_:()=>He,second:()=>ct,select_keys:()=>Lt,seq:()=>$,seqable_QMARK_:()=>oe,set:()=>jt,shuffle:()=>nr,some:()=>Ne,some_QMARK_:()=>gr,some_fn:()=>Gr,sort:()=>je,sort_by:()=>rr,split_at:()=>hr,split_with:()=>dr,str:()=>gt,string_QMARK_:()=>ze,subs:()=>Ge,subvec:()=>Qt,swap_BANG_:()=>Et,system_time:()=>Ct,t:()=>g,take:()=>k,take_nth:()=>Vt,take_while:()=>Re,to_array:()=>Pr,true_QMARK_:()=>yr,update:()=>Ut,update_BANG_:()=>J,update_in:()=>Xt,val:()=>Me,vals:()=>qr,vec:()=>E,vector:()=>F,vector_QMARK_:()=>St,warn_on_lazy_reusage_BANG_:()=>_t,with_meta:()=>Zr,zero_QMARK_:()=>Ar});function c(e){if(e==null||e instanceof Function)return e;let t=typeof e;return t==="string"?(r,n)=>h(r,e,n):t==="object"?(r,n)=>h(e,r,n):e}globalThis.toFn=c;function Ue(e,t){return e>t}function Xe(...e){return e.reduce((t,r)=>t+r,0)}function Ze(...e){return e.length==1?0-e[0]:e.reduce((t,r)=>t-r)}function He(e,t){return t[e]}function A(e,t,r,...n){if(n.length%2!==0)throw new Error("Illegal argument: assoc expects an odd number of arguments.");switch(p(e)){case x:e.set(t,r);for(let o=0;o<n.length;o+=2)e.set(n[o],n[o+1]);break;case _:case y:e[t]=r;for(let o=0;o<n.length;o+=2)e[n[o]]=n[o+1];break;default:throw new Error(`Illegal argument: assoc! expects a Map, Array, or Object as the first argument, but got ${typeof e}.`)}return e}function U(e){switch(p(e)){case x:return new Map(e.entries());case _:return[...e];case y:return{...e};default:throw new Error(`Don't know how to copy object of type ${typeof e}.`)}}function v(e,t,r,...n){e||(e={});let o=U(e);return A(o,t,r,...n),o}const x=1,_=2,y=3,b=4,w=5,S=6;function j(e){switch(e){case x:return new Map;case _:return[];case y:return{};case b:return new I;case w:return new Set;case S:return s(function*(){})}}function P(e){return e.constructor===Object}function et(e){return e!=null&&P(e)}function p(e){if(e!=null){if(P(e))return y;if(e instanceof Map)return x;if(e instanceof Set)return w;if(e instanceof I)return b;if(Array.isArray(e))return _;if(e instanceof q)return S;if(e instanceof Object)return y}}function tt(e,t,r,n,o){let u=p(r);if(u!==x&&u!==_&&u!==y)throw new Error(`Illegal argument: ${t} expects the first argument to be a Map, Array, or Object.`);const i=[r];let l=r;for(let a=0;a<n.length-1;a+=1){let m=n[a],d;l instanceof Map?d=l.get(m):d=l[m],d||(d=j(u)),i.push(d),l=d}i.push(o);for(let a=i.length-2;a>=0;a-=1)i[a]=e(i[a],n[a],i[a+1]);return i[0]}function X(e,t,r){return tt(v,"assoc-in",e,t,r)}function rt(e,t,r){var n=e;let o=p(e);for(const u of t.splice(0,t.length-1)){let i=h(n,u);i===void 0&&(i=j(o),A(n,u,i)),n=i}return A(n,t[t.length-1],r),e}function nt(...e){if(e=e.map(c),e.length===0)return ge;if(e.length===1)return e[0];let[t,...r]=e.slice().reverse();return function(...n){let o=t(...n);for(const u of r)o=u(o);return o}}function z(...e){if(e.length===0)return F();let[t,...r]=e;switch(t==null&&(t=[]),p(t)){case w:for(const n of r)t.add(n);break;case b:t.unshift(...r.reverse());break;case _:t.push(...r);break;case x:for(const n of r)Array.isArray(n)?t.set(n[0],n[1]):f(n).forEach(o=>{t.set(o[0],o[1])});break;case y:for(const n of r)Array.isArray(n)?t[n[0]]=n[1]:Object.assign(t,n);break;default:throw new Error("Illegal argument: conj! expects a Set, Array, List, Map, or Object as the first argument.")}return t}function Z(...e){if(e.length===0)return F();let[t,...r]=e;switch(t==null&&(t=[]),p(t)){case w:return new Set([...t,...r]);case b:return new I(...r.reverse(),...t);case _:return[...t,...r];case x:const n=new Map(t);for(const u of r)Array.isArray(u)?n.set(u[0],u[1]):f(u).forEach(i=>{n.set(i[0],i[1])});return n;case S:return s(function*(){yield*r,yield*t});case y:const o={...t};for(const u of r)Array.isArray(u)?o[u[0]]=u[1]:Object.assign(o,u);return o;default:throw new Error("Illegal argument: conj expects a Set, Array, List, Map, or Object as the first argument.")}}function H(e,...t){for(const r of t)e.delete(r);return e}function ot(e,...t){let r=new Set([...e]);return H(r,...t)}function ee(e,t){switch(p(e)){case w:case x:return e.has(t);case void 0:return!1;default:return t in e}}function ut(e,...t){for(const r of t)delete e[r];return e}function it(e,...t){let r={...e};for(const n of t)delete r[n];return r}function te(e){return e+1}function ft(e){return e-1}function re(...e){console.log(...e)}function ne(e,t,r){if(e){var n=void 0;if(Array.isArray(e))n=e[t];else{let o=f(e),u=0;for(let i of o)if(u++==t){n=i;break}}if(n!==void 0)return n}return r}function h(e,t,r=void 0){if(e==null)return r;let n;if(P(e))return n=e[t],n===void 0?r:n;switch(p(e)){case w:e.has(t)&&(n=t);break;case x:n=e.get(t);break;case _:n=e[t];break;default:if(e.get instanceof Function)try{n=e.get(t);break}catch{}n=e[t];break}return n!==void 0?n:r}function oe(e){return typeof e=="string"||e===null||e===void 0||e instanceof Object&&Symbol.iterator in e}function f(e){return e==null?[]:oe(e)?e:Object.entries(e)}const Y=Symbol("Iterable"),ue=Symbol.iterator;function N(e){return e[Symbol.iterator]()}const O=N;function $(e){let t=f(e);return t.length===0||t.size===0?null:t}function R(e){let[t]=f(e);return t}function ct(e){let[t,r]=f(e);return r}function st(e){return R(R(e))}function lt(e){return s(function*(){let t=!0;for(const r of f(e))t?t=!1:yield r})}class K{value;constructor(t){this.value=t}_deref(){return this.value}}function at(e){switch(e=f(e),p(e)){case _:return e[e.length-1];default:let t;for(const r of e)t=r;return t}}function pt(e){return new K(e)}function xt(e){return e instanceof K}function L(e,t,r){e=c(e);let n,o;if(r===void 0){let u=f(t)[Symbol.iterator]();o=u.next().value,n=u}else o=t,n=f(r);if(o instanceof K)return o.value;for(const u of n)if(o=e(o,u),o instanceof K){o=o.value;break}return o}var ie=!1;function _t(){ie=!0}class q{constructor(t){this.gen=t,this.usages=0}[Symbol.iterator](){if(this.usages++,this.usages>=2&&ie)try{throw new Error}catch(t){console.warn("Re-use of lazy value",t.stack)}return this.gen()}}q.prototype[Y]=!0;function s(e){return new q(e)}class fe{constructor(t,r){this.x=t,this.coll=r}*[Symbol.iterator](){yield this.x,yield*f(this.coll)}}function ce(e,t){return new fe(e,t)}function M(e,...t){switch(e=c(e),t.length){case 0:throw new Error("map with 2 arguments is not supported yet");case 1:return s(function*(){for(const r of f(t[0]))yield e(r)});default:return s(function*(){const r=t.map(n=>O(f(n)));for(;;){let n=[];for(const o of r){const u=o.next();if(u.done)return;n.push(u.value)}yield e(...n)}})}}function C(e,t){return e=c(e),s(function*(){for(const r of f(t))g(e(r))&&(yield r)})}function ht(e,t){return[...C(e,t)]}function dt(e,t){return C(de(e),t)}function yt(e,t){e=c(e);let r=[],n=0;for(const o of f(t))r.push(e(n,o)),n++;return r}function wt(e,t){e=c(e);let r=[],n=0;for(const o of f(t)){let u=e(n,o);g(u)&&r.push(u),n++}return r}function gt(...e){return e.join("")}function se(e){return!e}function mt(e){return e==null}const At={};function bt(e){return e===null?"null":JSON.stringify(e,(t,r)=>{switch(p(r)){case w:case S:return[...r];case x:return Object.fromEntries(r);default:return r}})}function le(...e){return e.map(bt).join(" ")}function vt(...e){re(le(...e))}function ae(e){this.val=e,this._watches={},this._deref=()=>this.val,this._hasWatches=!1,this._reset_BANG_=t=>{let r=this.val;if(this.val=t,this._hasWatches)for(let n of Object.entries(this._watches)){let o=n[0],u=n[1];u(o,this,r,t)}return t},this._add_watch=(t,r)=>{this._watches[t]=r,this._hasWatches=!0},this._remove_watch=t=>{delete this._watches[t]}}function Mt(e){return new ae(e)}function pe(e){return e._deref()}function xe(e,t){e._reset_BANG_(t)}function Et(e,t,...r){t=c(t);const n=t(pe(e),...r);return xe(e,n),n}function Rt(e,t,r){return s(function*(){let n=e,o=t,u=r;t===void 0&&(n=0,o=e);let i=n||0;for(u=r||1;o===void 0||i<o;)yield i,i+=u})}function Kt(e,t){let r=e.exec(t);if(r&&t===r[0])return r.length===1?r[0]:r}function Qt(e,t,r){return e.slice(t,r)}function F(...e){return e}function St(e){return p(e)===_}function _e(...e){return[...M(...e)]}function E(e){return ye(e)?e:[...f(e)]}function jt(e){return new Set(f(e))}function Nt(e,...t){e=c(e);const r=t.slice(0,t.length-1),n=t[t.length-1];return e(...r,...n)}function he(e){return e%2==0}function Ot(e){return!he(e)}function de(e){return e=c(e),(...t)=>se(e(...t))}function It(e){return(...t)=>e}class I extends Array{constructor(...t){super(),this.push(...t)}}function kt(e){return p(e)===b}function Tt(...e){return new I(...e)}function ye(e){return Array.isArray(e)}function we(...e){return s(function*(){for(const t of e)yield*f(t)})}function Gt(e,...t){return we(...M(e,...t))}function ge(e){return e}function me(...e){return s(function*(){const t=e.map(r=>O(f(r)));for(;;){let r=[];for(const n of t){const o=n.next();if(o.done)return;r.push(o.value)}yield*r}})}function Bt(e,t){return T(1,me(V(e),t))}function Lt(e,t){const r=p(e),n=j(r)||{};for(const o of t){const u=h(e,o);u!=null&&A(n,o,u)}return n}function Pt(e,...t){let r=e,n=t[0];return t.length===2&&([r,n]=t),Ae(e,r,[],n,!0)}function zt(e,...t){let r=e,n=[],o=t[0];return t.length===2?[r,o]=t:t.length>2&&([r,n,o]=t),Ae(e,r,n,o,!1)}function Ae(e,t,r,n,o){return s(function*(){let u=[],i=0;for(let l of f(n))i<e&&(u.push(l),u.length===e&&(yield u,u=t<e?u.slice(t):[])),i++,i===t&&(i=0);u.length>0&&(u.length===e||o?yield u:r.length&&(u.push(...r.slice(0,e-u.length)),yield u))})}function Yt(e,t){return e=c(e),s(function*(){let r=O(t),n=r.next();n.done&&(yield*null);let o=n.value,u=e(o),i=[o],l=[];for(;;){let a=r.next();if(a.done){yield i;break}let m=a.value,d=e(m);u==d?i.push(m):(yield i,l.push(m),i=l,u=d,l=[])}})}function be(e){const t=p(e);if(t!=null)return j(t);throw new Error(`Can't create empty of ${typeof e}`)}function $t(...e){const t=e[0];let r;return t==null?r={}:r=Ee(be(t),t),z(r,...e.slice(1))}function ve(e){return e[0]}function Me(e){return e[1]}function qt(e,...t){e=c(e);var r=!1;for(const n of t)if(n!=null){r=!0;break}if(r){let n=(u,i)=>{let l=ve(i),a=Me(i);return ee(u,l)?v(u,l,e(h(u,l),a)):v(u,l,a)};return L((u,i)=>L(n,u||{},$(i)),t)}else return null}function Ct(){return performance.now()}function Ee(...e){switch(e.length){case 0:return[];case 1:return e[0];default:return Z(e[0]??[],...f(e[1]))}}function Ft(e,t){return e===t}function V(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[Y]:!0,[ue]:e.length==1?function*(){let t=e[0];for(;;)yield t}:function*(){let[t,r]=e;for(var n=0;n<t;n++)yield r}}}function k(e,t){return s(function*(){let r=e-1;for(const n of f(t))if(r-->=0&&(yield n),r<0)return})}function Re(e,t){return e=c(e),s(function*(){for(const r of f(t))if(g(e(r)))yield r;else return})}function Vt(e,t){return e<=0?V(R(t)):s(function*(){let r=0;for(let n of f(t))r%e===0&&(yield n),r++})}function Wt(e,...t){return e=c(e),function(...r){return e(...t,...r)}}function Jt(e){return s(function*(){for(;;)yield*e})}function T(e,t){return s(function*(){let r=N(f(t));for(let n=0;n<e;n++)r.next();yield*r})}function Ke(e,t){return e=c(e),s(function*(){let r=N(f(t));for(;;){let n=r.next();if(n.done)break;let o=n.value;if(!g(e(o))){yield o;break}}yield*r})}function Dt(e){return s(function*(){let t=new Set;for(const r of f(e))t.has(r)||(yield r),t.add(r)})}function Ut(e,t,r,...n){return r=c(r),v(e,t,r(h(e,t),...n))}function Qe(e,t,r){let n=e;for(const o of t)n=h(n,o);return n===void 0?r:n}function Xt(e,t,r,...n){return r=c(r),X(e,t,r(Qe(e,t),...n))}function W(e,t,...r){return e=c(e),function(n,...o){return n?e(n,...r,...o):e(t,...r,...o)}}function Se(e,t){e=c(e);for(let r of f(t))if(!e(r))return!1;return!0}function Zt(e,t){return!Se(e,t)}function Ht(e,t){return e=c(e),s(function*(){for(const r of f(t)){const n=e(r);g(n)&&(yield n)}})}function er(e){return Array.isArray(e)?e.reverse():[...e].reverse()}function je(e,t){return t===void 0&&(t=e,e=void 0),e=c(e),[...t].sort(e||G)}function tr(e){return e===G?e:(t,r)=>{let n=e(t,r);return Le(n)?n:n?-1:e(r,t)?1:0}}function rr(e,t,r){return r===void 0&&(r=t,t=G),e=c(e),t=c(t),je((n,o)=>{let u=tr(t),i=e(n),l=e(o);return u(i,l)},r)}function nr(e){return[...e].sort(function(t,r){return Math.random()-.5})}function Ne(e,t){e=c(e);for(const r of f(t)){const n=e(r);if(g(n))return n}}function or(e,t){return e=c(e),!Ne(e,t)}function ur(e,t){return(Array.isArray(t)?_e:M)(n=>{const o=e[n];return o!==void 0?o:n},t)}function ir(e){return!$(e)}function Oe(e){return Math.floor(Math.random()*e)}function fr(e){let t=Oe(Q(e));return ne(e,t)}function cr(e){return s(function*(){for(;;)yield e()})}function sr(e,t){t===void 0&&(t=e,e=void 0);const r=cr(t);return e?k(e,r):r}function J(e,t,r,...n){const o=h(e,t);return A(e,t,r(o,...n))}function lr(e,t){const r={};for(const n of f(t)){const o=e(n);J(r,o,W(z,[]),n)}return r}function ar(e){const t={},r=W(te,0);for(const n of f(e))J(t,n,r);return t}class pr{constructor(t){this.f=t,this.res=void 0}*[Symbol.iterator](){this.res===void 0&&(this.res=this.f(),this.f=null),yield*f(this.res)}}function xr(e){let t=[...f(e)];return t.pop(),t.length>0?t:null}function _r(...e){let[t,r]=e.length>1?e:[1,e[0]];return M((n,o)=>n,r,T(t,r))}function hr(e,t){return[k(e,t),T(e,t)]}function dr(e,t){return[Re(e,t),Ke(e,t)]}function Q(e){if(!e)return 0;const t=e.length||e.size;if(typeof t=="number")return t;let r=0;for(const n of f(e))r++;return r}function yr(e){return e===!0}function wr(e){return e===!1}function gr(e){return e!=null}function mr(e){return!!e}function Ar(e){return e===0}function br(e){return e<0}function vr(e){return e>0}function Mr(...e){var t=0;let r={};for(;!(t>=e.length);)r[e[t]]=e[t+1],t=t+2;return r}function Er(e){return e.length}function Rr(e,t,r,...n){if(n.length==0)return e[t]=r,r;{let o=[t,r,...n],u=o[o.length-1],i=e,l=0,a=o.length-2;for(;l<a;l++)i=i[o[l]];return i[o[l]]=u,r}}function Kr(e){for(const t of f(e));return null}function Qr(e){return E(e)}function Sr(e){return[...e]}function jr(e,t,r){return e._add_watch(t,r)}function Nr(e,t){return e._remove_watch(t)}function Or(e,t,r){if(!r)return t;var n=t;for(let o of Object.entries(r))n=e(n,o[0],o[1]);return n}function Ie(e,t,...r){return t==null?e:Math.max(e,t,...r)}function Ir(e,t,...r){return t==null?e:Math.min(e,t,...r)}function kr(e){return e instanceof Object}function Tr(...e){return(...t)=>{for(let r of e)for(let n of t)if(!r(n))return!1;return!0}}function Gr(...e){return(...t)=>{for(let r of e)for(let n of t){let o=r(n);if(o)return o}}}function ke(e,t){return E(t||e)}function Br(e,t){var r=t;return s(function*(){for(;;)yield r,r=e(r)})}function Lr(...e){return e=e.map(c),(...t)=>{let r=[];for(let n of e)r.push(n(...t));return r}}function Te(e){if(Array.isArray(e)){let t=e.slice(1);return t.length>0?t:null}else return Te(E(e))}function G(e,t){if(e===t)return 0;if(e==null)return-1;if(t==null)return 1;if(typeof e=="number"){if(typeof t=="number")return e===t?0:e<t?-1:1;throw new Error("comparing number to other type")}else throw new Error("comparing number to other type")}function Pr(e){return ke(e)}function g(e){return e!=null&&e!==!1}function Ge(e,t,r){return e.substring(t,r)}function zr(e){return typeof e=="function"}function*Be(e,t){let r=e.exec(t);if(r){let n=r[0],o=r.length===1?n:E(r);yield*ce(o,s(function*(){let u=r.index+Ie(1,n.length);u<=t.length&&(yield*Be(e,Ge(t,u)))}))}}function Yr(e){return Number.isNaN(e)}function Le(e){return typeof e=="number"}function Pe(e){return e?Object.keys(e):null}function $r(e){return Pe(e)}function qr(e){return e?Object.values(e):null}function ze(e){return typeof e=="string"}function Cr(e){return p(e)!=null}function Fr(e){return e instanceof RegExp}class D extends Error{constructor(t,r,n){super(t),this._data=r,this._cause=n}}function Vr(e){return e instanceof D?e._data:null}function Wr(e){return e instanceof Error?e.message:null}function Jr(e){return e instanceof D?e._cause:null}function Dr(e,t,r){return new D(e,t,r)}function Ye(e){return Number.isInteger(e)}const Ur=Ye,$e=Symbol("meta");function Xr(e){return e instanceof Object?e[$e]:null}function Zr(e,t){let r=U(e);return r[$e]=t,r}function Hr(e){return e===!0||e===!1}function qe(e){switch(p(e)){case w:return!0}return!1}function en(e,t){return qe(t)?Q(t):Q(k(e,t))}function tn(e,t){let r=h(e,t);if(r!==void 0)return[t,r]}function rn(e,t){return(e%t+t)%t}function nn(e,t,...r){if(r.length==0)return t;var n=e(t),o=t;return r.forEach(u=>{var i=e(u);i<=n&&(n=i,o=u)}),o}function on(e,t,...r){if(r.length==0)return t;var n=e(t),o=t;return r.forEach(u=>{var i=e(u);i>=n&&(n=i,o=u)}),o}function un(e){throw new Error(`Expected string, got: ${typeof e}`)}function fn(e){if(ze(e)){if(/^[+-]?\d+$/.test(e)){let t=parseInt(e);if(Number.MIN_SAFE_INTEGER<=t<=Number.MAX_SAFE_INTEGER)return t}return null}return un(e)}return De(cn);})();
|
|
1
|
+
var squint;(squint||={}).core=(()=>{var L=Object.defineProperty;var Fe=Object.getOwnPropertyDescriptor;var Ve=Object.getOwnPropertyNames;var We=Object.prototype.hasOwnProperty;var Je=(e,t)=>{for(var r in t)L(e,r,{get:t[r],enumerable:!0})},De=(e,t,r,n)=>{if(t&&typeof t=="object"||typeof t=="function")for(let o of Ve(t))!We.call(e,o)&&o!==r&&L(e,o,{get:()=>t[o],enumerable:!(n=Fe(t,o))||n.enumerable});return e};var Ue=e=>De(L({},"__esModule",{value:!0}),e);var pn={};Je(pn,{Atom:()=>xe,Cons:()=>se,IIterable:()=>$,IIterable__iterator:()=>fe,LazySeq:()=>_r,NaN_QMARK_:()=>qr,PROTOCOL_SENTINEL:()=>bt,_:()=>He,_GT_:()=>Xe,_PLUS_:()=>Ze,_iterator:()=>O,aclone:()=>Nr,add_watch:()=>Or,alength:()=>Kr,apply:()=>It,array_QMARK_:()=>we,aset:()=>Qr,assoc:()=>M,assoc_BANG_:()=>b,assoc_in:()=>H,assoc_in_BANG_:()=>nt,atom:()=>Et,boolean$:()=>br,boolean_QMARK_:()=>tn,bounded_count:()=>rn,butlast:()=>hr,coll_QMARK_:()=>Vr,comp:()=>ot,compare:()=>B,complement:()=>ge,concat:()=>me,conj:()=>ee,conj_BANG_:()=>Y,cons:()=>le,constantly:()=>Tt,contains_QMARK_:()=>re,count:()=>S,counted_QMARK_:()=>Ce,cycle:()=>Ut,dec:()=>ct,deref:()=>_e,disj:()=>ut,disj_BANG_:()=>te,dissoc:()=>ft,dissoc_BANG_:()=>it,distinct:()=>Xt,doall:()=>jr,dorun:()=>Sr,drop:()=>G,drop_last:()=>dr,drop_while:()=>Se,empty:()=>Me,empty_QMARK_:()=>cr,es6_iterator:()=>I,even_QMARK_:()=>ye,every_QMARK_:()=>Ne,every_pred:()=>Br,ex_cause:()=>Ur,ex_data:()=>Jr,ex_info:()=>Xr,ex_message:()=>Dr,false_QMARK_:()=>mr,ffirst:()=>lt,filter:()=>F,filterv:()=>dt,find:()=>nn,first:()=>K,fn_QMARK_:()=>$r,fnil:()=>J,frequencies:()=>xr,get:()=>d,get_in:()=>je,group_by:()=>pr,identical_QMARK_:()=>Wt,identity:()=>Ae,inc:()=>ne,int_QMARK_:()=>$e,integer_QMARK_:()=>Zr,interleave:()=>be,interpose:()=>Pt,into:()=>Ke,into_array:()=>Ge,iterable:()=>f,iterate:()=>Pr,js_keys:()=>Cr,js_obj:()=>Rr,juxt:()=>zr,keep:()=>tr,keep_indexed:()=>wt,key:()=>Ee,keys:()=>Ye,last:()=>pt,lazy:()=>s,list:()=>Bt,list_QMARK_:()=>Gt,map:()=>E,map_QMARK_:()=>Gr,map_indexed:()=>gt,mapcat:()=>Lt,mapv:()=>de,max:()=>Te,max_key:()=>fn,merge:()=>Ct,merge_with:()=>Ft,meta:()=>Hr,min:()=>Tr,min_key:()=>un,mod:()=>on,neg_QMARK_:()=>Mr,next:()=>Be,nil_QMARK_:()=>At,not:()=>ae,not_any_QMARK_:()=>ir,not_every_QMARK_:()=>er,nth:()=>ue,number_QMARK_:()=>ze,object_QMARK_:()=>tt,odd_QMARK_:()=>kt,parse_long:()=>sn,partial:()=>Dt,partition:()=>$t,partition_all:()=>Yt,partition_by:()=>qt,pos_QMARK_:()=>Er,pr_str:()=>pe,println:()=>oe,prn:()=>Mt,quot:()=>an,rand_int:()=>ke,rand_nth:()=>sr,range:()=>Kt,re_find:()=>St,re_matches:()=>Qt,re_seq:()=>Pe,reduce:()=>P,reduce_kv:()=>kr,reduced:()=>xt,reduced_QMARK_:()=>_t,regexp_QMARK_:()=>Wr,remove:()=>yt,remove_watch:()=>Ir,repeat:()=>W,repeatedly:()=>ar,replace:()=>fr,reset_BANG_:()=>he,rest:()=>at,reverse:()=>rr,satisfies_QMARK_:()=>et,second:()=>st,select_keys:()=>zt,seq:()=>q,seqable_QMARK_:()=>ie,set:()=>Ot,shuffle:()=>ur,some:()=>Ie,some_QMARK_:()=>Ar,some_fn:()=>Lr,sort:()=>Oe,sort_by:()=>or,split_at:()=>yr,split_with:()=>gr,str:()=>mt,string_QMARK_:()=>U,subs:()=>Le,subvec:()=>jt,swap_BANG_:()=>Rt,system_time:()=>Vt,t:()=>m,take:()=>T,take_nth:()=>Jt,take_while:()=>Qe,to_array:()=>Yr,true_QMARK_:()=>wr,update:()=>Zt,update_BANG_:()=>D,update_in:()=>Ht,val:()=>Re,vals:()=>Fr,vec:()=>R,vector:()=>V,vector_QMARK_:()=>Nt,warn_on_lazy_reusage_BANG_:()=>ht,with_meta:()=>en,zero_QMARK_:()=>vr});function c(e){if(e==null||e instanceof Function)return e;let t=typeof e;return t==="string"?(r,n)=>d(r,e,n):t==="object"?(r,n)=>d(e,r,n):e}globalThis.toFn=c;function Xe(e,t){return e>t}function Ze(...e){return e.reduce((t,r)=>t+r,0)}function He(...e){return e.length==1?0-e[0]:e.reduce((t,r)=>t-r)}function et(e,t){return t[e]}function b(e,t,r,...n){if(n.length%2!==0)throw new Error("Illegal argument: assoc expects an odd number of arguments.");switch(p(e)){case _:e.set(t,r);for(let o=0;o<n.length;o+=2)e.set(n[o],n[o+1]);break;case h:case g:e[t]=r;for(let o=0;o<n.length;o+=2)e[n[o]]=n[o+1];break;default:throw new Error(`Illegal argument: assoc! expects a Map, Array, or Object as the first argument, but got ${typeof e}.`)}return e}function Z(e){switch(p(e)){case _:return new Map(e.entries());case h:return[...e];case g:return{...e};default:throw new Error(`Don't know how to copy object of type ${typeof e}.`)}}function M(e,t,r,...n){e||(e={});let o=Z(e);return b(o,t,r,...n),o}const _=1,h=2,g=3,v=4,w=5,j=6;function N(e){switch(e){case _:return new Map;case h:return[];case g:return{};case v:return new k;case w:return new Set;case j:return s(function*(){})}}function z(e){return e.constructor===Object}function tt(e){return e!=null&&z(e)}function p(e){if(e!=null){if(z(e))return g;if(e instanceof Map)return _;if(e instanceof Set)return w;if(e instanceof k)return v;if(Array.isArray(e))return h;if(e instanceof C)return j;if(e instanceof Object)return g}}function rt(e,t,r,n,o){let u=p(r);if(u!==_&&u!==h&&u!==g)throw new Error(`Illegal argument: ${t} expects the first argument to be a Map, Array, or Object.`);const i=[r];let l=r;for(let a=0;a<n.length-1;a+=1){let A=n[a],y;l instanceof Map?y=l.get(A):y=l[A],y||(y=N(u)),i.push(y),l=y}i.push(o);for(let a=i.length-2;a>=0;a-=1)i[a]=e(i[a],n[a],i[a+1]);return i[0]}function H(e,t,r){return rt(M,"assoc-in",e,t,r)}function nt(e,t,r){var n=e;let o=p(e);for(const u of t.splice(0,t.length-1)){let i=d(n,u);i===void 0&&(i=N(o),b(n,u,i)),n=i}return b(n,t[t.length-1],r),e}function ot(...e){if(e=e.map(c),e.length===0)return Ae;if(e.length===1)return e[0];let[t,...r]=e.slice().reverse();return function(...n){let o=t(...n);for(const u of r)o=u(o);return o}}function Y(...e){if(e.length===0)return V();let[t,...r]=e;switch(t==null&&(t=[]),p(t)){case w:for(const n of r)t.add(n);break;case v:t.unshift(...r.reverse());break;case h:t.push(...r);break;case _:for(const n of r)Array.isArray(n)?t.set(n[0],n[1]):f(n).forEach(o=>{t.set(o[0],o[1])});break;case g:for(const n of r)Array.isArray(n)?t[n[0]]=n[1]:Object.assign(t,n);break;default:throw new Error("Illegal argument: conj! expects a Set, Array, List, Map, or Object as the first argument.")}return t}function ee(...e){if(e.length===0)return V();let[t,...r]=e;switch(t==null&&(t=[]),p(t)){case w:return new Set([...t,...r]);case v:return new k(...r.reverse(),...t);case h:return[...t,...r];case _:const n=new Map(t);for(const u of r)Array.isArray(u)?n.set(u[0],u[1]):f(u).forEach(i=>{n.set(i[0],i[1])});return n;case j:return s(function*(){yield*r,yield*t});case g:const o={...t};for(const u of r)Array.isArray(u)?o[u[0]]=u[1]:Object.assign(o,u);return o;default:throw new Error("Illegal argument: conj expects a Set, Array, List, Map, or Object as the first argument.")}}function te(e,...t){for(const r of t)e.delete(r);return e}function ut(e,...t){let r=new Set([...e]);return te(r,...t)}function re(e,t){switch(p(e)){case w:case _:return e.has(t);case void 0:return!1;default:return t in e}}function it(e,...t){for(const r of t)delete e[r];return e}function ft(e,...t){let r={...e};for(const n of t)delete r[n];return r}function ne(e){return e+1}function ct(e){return e-1}function oe(...e){console.log(...e)}function ue(e,t,r){if(e){var n=void 0;if(Array.isArray(e))n=e[t];else{let o=f(e),u=0;for(let i of o)if(u++==t){n=i;break}}if(n!==void 0)return n}return r}function d(e,t,r=void 0){if(e==null)return r;let n;if(z(e))return n=e[t],n===void 0?r:n;switch(p(e)){case w:e.has(t)&&(n=t);break;case _:n=e.get(t);break;case h:n=e[t];break;default:if(e.get instanceof Function)try{n=e.get(t);break}catch{}n=e[t];break}return n!==void 0?n:r}function ie(e){return typeof e=="string"||e===null||e===void 0||e instanceof Object&&Symbol.iterator in e}function f(e){return e==null?[]:ie(e)?e:Object.entries(e)}const $=Symbol("Iterable"),fe=Symbol.iterator;function O(e){return e[Symbol.iterator]()}const I=O;function q(e){let t=f(e);return t.length===0||t.size===0?null:t}function K(e){let[t]=f(e);return t}function st(e){let[t,r]=f(e);return r}function lt(e){return K(K(e))}function at(e){return s(function*(){let t=!0;for(const r of f(e))t?t=!1:yield r})}class Q{value;constructor(t){this.value=t}_deref(){return this.value}}function pt(e){switch(e=f(e),p(e)){case h:return e[e.length-1];default:let t;for(const r of e)t=r;return t}}function xt(e){return new Q(e)}function _t(e){return e instanceof Q}function P(e,t,r){e=c(e);let n,o;if(r===void 0){let u=f(t)[Symbol.iterator]();o=u.next().value,n=u}else o=t,n=f(r);if(o instanceof Q)return o.value;for(const u of n)if(o=e(o,u),o instanceof Q){o=o.value;break}return o}var ce=!1;function ht(){ce=!0}class C{constructor(t){this.gen=t,this.usages=0}[Symbol.iterator](){if(this.usages++,this.usages>=2&&ce)try{throw new Error}catch(t){console.warn("Re-use of lazy value",t.stack)}return this.gen()}}C.prototype[$]=!0;function s(e){return new C(e)}class se{constructor(t,r){this.x=t,this.coll=r}*[Symbol.iterator](){yield this.x,yield*f(this.coll)}}function le(e,t){return new se(e,t)}function E(e,...t){switch(e=c(e),t.length){case 0:throw new Error("map with 2 arguments is not supported yet");case 1:return s(function*(){for(const r of f(t[0]))yield e(r)});default:return s(function*(){const r=t.map(n=>I(f(n)));for(;;){let n=[];for(const o of r){const u=o.next();if(u.done)return;n.push(u.value)}yield e(...n)}})}}function F(e,t){return e=c(e),s(function*(){for(const r of f(t))m(e(r))&&(yield r)})}function dt(e,t){return[...F(e,t)]}function yt(e,t){return F(ge(e),t)}function gt(e,t){e=c(e);let r=[],n=0;for(const o of f(t))r.push(e(n,o)),n++;return r}function wt(e,t){e=c(e);let r=[],n=0;for(const o of f(t)){let u=e(n,o);m(u)&&r.push(u),n++}return r}function mt(...e){return e.join("")}function ae(e){return!e}function At(e){return e==null}const bt={};function vt(e){return e===null?"null":JSON.stringify(e,(t,r)=>{switch(p(r)){case w:case j:return[...r];case _:return Object.fromEntries(r);default:return r}})}function pe(...e){return e.map(vt).join(" ")}function Mt(...e){oe(pe(...e))}function xe(e){this.val=e,this._watches={},this._deref=()=>this.val,this._hasWatches=!1,this._reset_BANG_=t=>{let r=this.val;if(this.val=t,this._hasWatches)for(let n of Object.entries(this._watches)){let o=n[0],u=n[1];u(o,this,r,t)}return t},this._add_watch=(t,r)=>{this._watches[t]=r,this._hasWatches=!0},this._remove_watch=t=>{delete this._watches[t]}}function Et(e){return new xe(e)}function _e(e){return e._deref()}function he(e,t){e._reset_BANG_(t)}function Rt(e,t,...r){t=c(t);const n=t(_e(e),...r);return he(e,n),n}function Kt(e,t,r){return s(function*(){let n=e,o=t,u=r;t===void 0&&(n=0,o=e);let i=n||0;for(u=r||1;o===void 0||i<o;)yield i,i+=u})}function Qt(e,t){let r=e.exec(t);return r&&t===r[0]?r.length===1?r[0]:r:null}function St(e,t){if(U(t)){let r=e.exec(t);return r!=null?r.length===1?r[0]:[...r]:null}else throw new TypeError("re-find must match against a string.")}function jt(e,t,r){return e.slice(t,r)}function V(...e){return e}function Nt(e){return p(e)===h}function de(...e){return[...E(...e)]}function R(e){return we(e)?e:[...f(e)]}function Ot(e){return new Set(f(e))}function It(e,...t){e=c(e);const r=t.slice(0,t.length-1),n=t[t.length-1];return e(...r,...n)}function ye(e){return e%2==0}function kt(e){return!ye(e)}function ge(e){return e=c(e),(...t)=>ae(e(...t))}function Tt(e){return(...t)=>e}class k extends Array{constructor(...t){super(),this.push(...t)}}function Gt(e){return p(e)===v}function Bt(...e){return new k(...e)}function we(e){return Array.isArray(e)}function me(...e){return s(function*(){for(const t of e)yield*f(t)})}function Lt(e,...t){return me(...E(e,...t))}function Ae(e){return e}function be(...e){return s(function*(){const t=e.map(r=>I(f(r)));for(;;){let r=[];for(const n of t){const o=n.next();if(o.done)return;r.push(o.value)}yield*r}})}function Pt(e,t){return G(1,be(W(e),t))}function zt(e,t){const r=p(e),n=N(r)||{};for(const o of t){const u=d(e,o);u!=null&&b(n,o,u)}return n}function Yt(e,...t){let r=e,n=t[0];return t.length===2&&([r,n]=t),ve(e,r,[],n,!0)}function $t(e,...t){let r=e,n=[],o=t[0];return t.length===2?[r,o]=t:t.length>2&&([r,n,o]=t),ve(e,r,n,o,!1)}function ve(e,t,r,n,o){return s(function*(){let u=[],i=0;for(let l of f(n))i<e&&(u.push(l),u.length===e&&(yield u,u=t<e?u.slice(t):[])),i++,i===t&&(i=0);u.length>0&&(u.length===e||o?yield u:r.length&&(u.push(...r.slice(0,e-u.length)),yield u))})}function qt(e,t){return e=c(e),s(function*(){let r=I(t),n=r.next();n.done&&(yield*null);let o=n.value,u=e(o),i=[o],l=[];for(;;){let a=r.next();if(a.done){yield i;break}let A=a.value,y=e(A);u==y?i.push(A):(yield i,l.push(A),i=l,u=y,l=[])}})}function Me(e){const t=p(e);if(t!=null)return N(t);throw new Error(`Can't create empty of ${typeof e}`)}function Ct(...e){const t=e[0];let r;return t==null?r={}:r=Ke(Me(t),t),Y(r,...e.slice(1))}function Ee(e){return e[0]}function Re(e){return e[1]}function Ft(e,...t){e=c(e);var r=!1;for(const n of t)if(n!=null){r=!0;break}if(r){let n=(u,i)=>{let l=Ee(i),a=Re(i);return re(u,l)?M(u,l,e(d(u,l),a)):M(u,l,a)};return P((u,i)=>P(n,u||{},q(i)),t)}else return null}function Vt(){return performance.now()}function Ke(...e){switch(e.length){case 0:return[];case 1:return e[0];default:return ee(e[0]??[],...f(e[1]))}}function Wt(e,t){return e===t}function W(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[$]:!0,[fe]:e.length==1?function*(){let t=e[0];for(;;)yield t}:function*(){let[t,r]=e;for(var n=0;n<t;n++)yield r}}}function T(e,t){return s(function*(){let r=e-1;for(const n of f(t))if(r-->=0&&(yield n),r<0)return})}function Qe(e,t){return e=c(e),s(function*(){for(const r of f(t))if(m(e(r)))yield r;else return})}function Jt(e,t){return e<=0?W(K(t)):s(function*(){let r=0;for(let n of f(t))r%e===0&&(yield n),r++})}function Dt(e,...t){return e=c(e),function(...r){return e(...t,...r)}}function Ut(e){return s(function*(){for(;;)yield*e})}function G(e,t){return s(function*(){let r=O(f(t));for(let n=0;n<e;n++)r.next();yield*r})}function Se(e,t){return e=c(e),s(function*(){let r=O(f(t));for(;;){let n=r.next();if(n.done)break;let o=n.value;if(!m(e(o))){yield o;break}}yield*r})}function Xt(e){return s(function*(){let t=new Set;for(const r of f(e))t.has(r)||(yield r),t.add(r)})}function Zt(e,t,r,...n){return r=c(r),M(e,t,r(d(e,t),...n))}function je(e,t,r){let n=e;for(const o of t)n=d(n,o);return n===void 0?r:n}function Ht(e,t,r,...n){return r=c(r),H(e,t,r(je(e,t),...n))}function J(e,t,...r){return e=c(e),function(n,...o){return n?e(n,...r,...o):e(t,...r,...o)}}function Ne(e,t){e=c(e);for(let r of f(t))if(!e(r))return!1;return!0}function er(e,t){return!Ne(e,t)}function tr(e,t){return e=c(e),s(function*(){for(const r of f(t)){const n=e(r);m(n)&&(yield n)}})}function rr(e){return Array.isArray(e)?e.reverse():[...e].reverse()}function Oe(e,t){return t===void 0&&(t=e,e=void 0),e=c(e),[...t].sort(e||B)}function nr(e){return e===B?e:(t,r)=>{let n=e(t,r);return ze(n)?n:n?-1:e(r,t)?1:0}}function or(e,t,r){return r===void 0&&(r=t,t=B),e=c(e),t=c(t),Oe((n,o)=>{let u=nr(t),i=e(n),l=e(o);return u(i,l)},r)}function ur(e){return[...e].sort(function(t,r){return Math.random()-.5})}function Ie(e,t){e=c(e);for(const r of f(t)){const n=e(r);if(m(n))return n}}function ir(e,t){return e=c(e),!Ie(e,t)}function fr(e,t){return(Array.isArray(t)?de:E)(n=>{const o=e[n];return o!==void 0?o:n},t)}function cr(e){return!q(e)}function ke(e){return Math.floor(Math.random()*e)}function sr(e){let t=ke(S(e));return ue(e,t)}function lr(e){return s(function*(){for(;;)yield e()})}function ar(e,t){t===void 0&&(t=e,e=void 0);const r=lr(t);return e?T(e,r):r}function D(e,t,r,...n){const o=d(e,t);return b(e,t,r(o,...n))}function pr(e,t){const r={};for(const n of f(t)){const o=e(n);D(r,o,J(Y,[]),n)}return r}function xr(e){const t={},r=J(ne,0);for(const n of f(e))D(t,n,r);return t}class _r{constructor(t){this.f=t,this.res=void 0}*[Symbol.iterator](){this.res===void 0&&(this.res=this.f(),this.f=null),yield*f(this.res)}}function hr(e){let t=[...f(e)];return t.pop(),t.length>0?t:null}function dr(...e){let[t,r]=e.length>1?e:[1,e[0]];return E((n,o)=>n,r,G(t,r))}function yr(e,t){return[T(e,t),G(e,t)]}function gr(e,t){return[Qe(e,t),Se(e,t)]}function S(e){if(!e)return 0;const t=e.length||e.size;if(typeof t=="number")return t;let r=0;for(const n of f(e))r++;return r}function wr(e){return e===!0}function mr(e){return e===!1}function Ar(e){return e!=null}function br(e){return!!e}function vr(e){return e===0}function Mr(e){return e<0}function Er(e){return e>0}function Rr(...e){var t=0;let r={};for(;!(t>=e.length);)r[e[t]]=e[t+1],t=t+2;return r}function Kr(e){return e.length}function Qr(e,t,r,...n){if(n.length==0)return e[t]=r,r;{let o=[t,r,...n],u=o[o.length-1],i=e,l=0,a=o.length-2;for(;l<a;l++)i=i[o[l]];return i[o[l]]=u,r}}function Sr(e){for(const t of f(e));return null}function jr(e){return R(e)}function Nr(e){return[...e]}function Or(e,t,r){return e._add_watch(t,r)}function Ir(e,t){return e._remove_watch(t)}function kr(e,t,r){if(!r)return t;var n=t;for(let o of Object.entries(r))n=e(n,o[0],o[1]);return n}function Te(e,t,...r){return t==null?e:Math.max(e,t,...r)}function Tr(e,t,...r){return t==null?e:Math.min(e,t,...r)}function Gr(e){return e instanceof Object}function Br(...e){return(...t)=>{for(let r of e)for(let n of t)if(!r(n))return!1;return!0}}function Lr(...e){return(...t)=>{for(let r of e)for(let n of t){let o=r(n);if(o)return o}}}function Ge(e,t){return R(t||e)}function Pr(e,t){var r=t;return s(function*(){for(;;)yield r,r=e(r)})}function zr(...e){return e=e.map(c),(...t)=>{let r=[];for(let n of e)r.push(n(...t));return r}}function Be(e){if(Array.isArray(e)){let t=e.slice(1);return t.length>0?t:null}else return Be(R(e))}function B(e,t){if(e===t)return 0;if(e==null)return-1;if(t==null)return 1;if(typeof e=="number"){if(typeof t=="number")return e===t?0:e<t?-1:1;throw new Error("comparing number to other type")}else throw new Error("comparing number to other type")}function Yr(e){return Ge(e)}function m(e){return e!=null&&e!==!1}function Le(e,t,r){return e.substring(t,r)}function $r(e){return typeof e=="function"}function*Pe(e,t){let r=e.exec(t);if(r){let n=r[0],o=r.length===1?n:R(r);yield*le(o,s(function*(){let u=r.index+Te(1,n.length);u<=t.length&&(yield*Pe(e,Le(t,u)))}))}}function qr(e){return Number.isNaN(e)}function ze(e){return typeof e=="number"}function Ye(e){return e?Object.keys(e):null}function Cr(e){return Ye(e)}function Fr(e){return e?Object.values(e):null}function U(e){return typeof e=="string"}function Vr(e){return p(e)!=null}function Wr(e){return e instanceof RegExp}class X extends Error{constructor(t,r,n){super(t),this._data=r,this._cause=n}}function Jr(e){return e instanceof X?e._data:null}function Dr(e){return e instanceof Error?e.message:null}function Ur(e){return e instanceof X?e._cause:null}function Xr(e,t,r){return new X(e,t,r)}function $e(e){return Number.isInteger(e)}const Zr=$e,qe=Symbol("meta");function Hr(e){return e instanceof Object?e[qe]:null}function en(e,t){let r=Z(e);return r[qe]=t,r}function tn(e){return e===!0||e===!1}function Ce(e){switch(p(e)){case w:return!0}return!1}function rn(e,t){return Ce(t)?S(t):S(T(e,t))}function nn(e,t){let r=d(e,t);if(r!==void 0)return[t,r]}function on(e,t){return(e%t+t)%t}function un(e,t,...r){if(r.length==0)return t;var n=e(t),o=t;return r.forEach(u=>{var i=e(u);i<=n&&(n=i,o=u)}),o}function fn(e,t,...r){if(r.length==0)return t;var n=e(t),o=t;return r.forEach(u=>{var i=e(u);i>=n&&(n=i,o=u)}),o}function cn(e){throw new Error(`Expected string, got: ${typeof e}`)}function sn(e){if(U(e)){if(/^[+-]?\d+$/.test(e)){let t=parseInt(e);if(Number.MIN_SAFE_INTEGER<=t<=Number.MAX_SAFE_INTEGER)return t}return null}return cn(e)}function ln(e){return e>=0?Math.floor(e):Math.ceil(x)}function an(e,t){let r=e%t;return ln((e-r)/t)}return Ue(pn);})();
|
package/package.json
CHANGED
package/src/squint/core.js
CHANGED
|
@@ -782,6 +782,23 @@ export function re_matches(re, s) {
|
|
|
782
782
|
return matches;
|
|
783
783
|
}
|
|
784
784
|
}
|
|
785
|
+
return null;
|
|
786
|
+
}
|
|
787
|
+
|
|
788
|
+
export function re_find(re, s) {
|
|
789
|
+
if (string_QMARK_(s)) {
|
|
790
|
+
let matches = re.exec(s);
|
|
791
|
+
if (matches != null) {
|
|
792
|
+
if (matches.length === 1)
|
|
793
|
+
return matches[0];
|
|
794
|
+
else {
|
|
795
|
+
return [...matches];
|
|
796
|
+
}
|
|
797
|
+
}
|
|
798
|
+
return null;
|
|
799
|
+
} else {
|
|
800
|
+
throw new TypeError("re-find must match against a string.");
|
|
801
|
+
}
|
|
785
802
|
}
|
|
786
803
|
|
|
787
804
|
export function subvec(arr, start, end) {
|
|
@@ -1830,3 +1847,15 @@ export function parse_long(x) {
|
|
|
1830
1847
|
}
|
|
1831
1848
|
return parsing_err(x);
|
|
1832
1849
|
}
|
|
1850
|
+
|
|
1851
|
+
function fix(q) {
|
|
1852
|
+
if (q >= 0) {
|
|
1853
|
+
return Math.floor(q);
|
|
1854
|
+
}
|
|
1855
|
+
return Math.ceil(x);
|
|
1856
|
+
}
|
|
1857
|
+
|
|
1858
|
+
export function quot(n, d) {
|
|
1859
|
+
let rem = n % d;
|
|
1860
|
+
return fix((n - rem) / d);
|
|
1861
|
+
}
|