squint-cljs 0.4.54 → 0.4.55
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 +6 -1
- package/lib/cli.js +7 -7
- package/lib/cljs.pprint.js +67 -67
- package/lib/compiler.js +180 -179
- package/lib/compiler.node.js +3 -3
- package/lib/compiler.sci.js +593 -593
- package/lib/squint.core.umd.js +1 -1
- package/package.json +1 -1
- package/src/squint/core.js +15 -14
package/lib/squint.core.umd.js
CHANGED
|
@@ -1 +1 @@
|
|
|
1
|
-
var squint;(squint||={}).core=(()=>{var G=Object.defineProperty;var $e=Object.getOwnPropertyDescriptor;var Fe=Object.getOwnPropertyNames;var Ve=Object.prototype.hasOwnProperty;var We=(e,t)=>{for(var n in t)G(e,n,{get:t[n],enumerable:!0})},Je=(e,t,n,r)=>{if(t&&typeof t=="object"||typeof t=="function")for(let o of Fe(t))!Ve.call(e,o)&&o!==n&&G(e,o,{get:()=>t[o],enumerable:!(r=$e(t,o))||r.enumerable});return e};var De=e=>Je(G({},"__esModule",{value:!0}),e);var cr={};We(cr,{Atom:()=>ae,Cons:()=>fe,IIterable:()=>z,IIterable__iterator:()=>ue,LazySeq:()=>xn,NaN_QMARK_:()=>qn,PROTOCOL_SENTINEL:()=>bt,_:()=>Ze,_GT_:()=>Ue,_PLUS_:()=>Xe,_iterator:()=>N,aclone:()=>jn,add_watch:()=>Nn,alength:()=>Rn,apply:()=>Nt,array_QMARK_:()=>ye,aset:()=>Kn,assoc:()=>v,assoc_BANG_:()=>b,assoc_in:()=>X,assoc_in_BANG_:()=>nt,atom:()=>Mt,boolean$:()=>bn,boolean_QMARK_:()=>er,bounded_count:()=>tr,butlast:()=>_n,coll_QMARK_:()=>Fn,comp:()=>rt,compare:()=>J,complement:()=>de,concat:()=>we,conj:()=>Z,conj_BANG_:()=>P,cons:()=>ce,constantly:()=>Ot,contains_QMARK_:()=>ee,count:()=>Q,counted_QMARK_:()=>Ce,cycle:()=>Jt,dec:()=>ft,deref:()=>pe,disj:()=>ot,disj_BANG_:()=>H,dissoc:()=>it,dissoc_BANG_:()=>ut,distinct:()=>Dt,doall:()=>Sn,dorun:()=>Qn,drop:()=>T,drop_last:()=>hn,drop_while:()=>Ke,empty:()=>Ae,empty_QMARK_:()=>fn,es6_iterator:()=>I,even_QMARK_:()=>he,every_QMARK_:()=>Se,every_pred:()=>Gn,ex_cause:()=>Dn,ex_data:()=>Wn,ex_info:()=>Un,ex_message:()=>Jn,false_QMARK_:()=>gn,ffirst:()=>st,filter:()=>C,filterv:()=>ht,find:()=>nr,first:()=>R,fn_QMARK_:()=>Yn,fnil:()=>V,frequencies:()=>pn,get:()=>h,get_in:()=>Qe,group_by:()=>an,identical_QMARK_:()=>Ft,identity:()=>ge,inc:()=>te,int_QMARK_:()=>Ye,integer_QMARK_:()=>Xn,interleave:()=>me,interpose:()=>Bt,into:()=>Ee,into_array:()=>ke,iterable:()=>f,iterate:()=>Ln,js_keys:()=>Cn,js_obj:()=>En,juxt:()=>Pn,keep:()=>Ht,keep_indexed:()=>wt,key:()=>ve,keys:()=>Pe,last:()=>at,lazy:()=>s,list:()=>Tt,list_QMARK_:()=>kt,map:()=>M,map_QMARK_:()=>Tn,map_indexed:()=>yt,mapcat:()=>Gt,mapv:()=>_e,max:()=>Oe,max_key:()=>ur,merge:()=>qt,merge_with:()=>Ct,meta:()=>Zn,min:()=>kn,min_key:()=>or,mod:()=>rr,neg_QMARK_:()=>vn,next:()=>Te,nil_QMARK_:()=>mt,not:()=>se,not_any_QMARK_:()=>on,not_every_QMARK_:()=>Zt,nth:()=>re,number_QMARK_:()=>Le,object_QMARK_:()=>et,odd_QMARK_:()=>It,parse_long:()=>fr,partial:()=>Wt,partition:()=>zt,partition_all:()=>Pt,partition_by:()=>Yt,pos_QMARK_:()=>Mn,pr_str:()=>le,println:()=>ne,prn:()=>vt,rand_int:()=>Ie,rand_nth:()=>cn,range:()=>Rt,re_matches:()=>Kt,re_seq:()=>Be,reduce:()=>B,reduce_kv:()=>On,reduced:()=>pt,reduced_QMARK_:()=>xt,regexp_QMARK_:()=>Vn,remove:()=>dt,remove_watch:()=>In,repeat:()=>F,repeatedly:()=>ln,replace:()=>un,reset_BANG_:()=>xe,rest:()=>lt,reverse:()=>en,satisfies_QMARK_:()=>He,second:()=>ct,select_keys:()=>Lt,seq:()=>Y,seqable_QMARK_:()=>oe,set:()=>jt,shuffle:()=>rn,some:()=>Ne,some_QMARK_:()=>mn,some_fn:()=>Bn,sort:()=>je,sort_by:()=>nn,split_at:()=>dn,split_with:()=>yn,str:()=>gt,string_QMARK_:()=>ze,subs:()=>Ge,subvec:()=>Qt,swap_BANG_:()=>Et,system_time:()=>$t,t:()=>g,take:()=>k,take_nth:()=>Vt,take_while:()=>Re,to_array:()=>zn,true_QMARK_:()=>wn,update:()=>Ut,update_BANG_:()=>W,update_in:()=>Xt,val:()=>Me,vals:()=>$n,vec:()=>E,vector:()=>$,vector_QMARK_:()=>St,warn_on_lazy_reusage_BANG_:()=>_t,with_meta:()=>Hn,zero_QMARK_:()=>An});function c(e){if(e==null||e instanceof Function)return e;let t=typeof e;return t==="string"?(n,r)=>h(n,e,r):t==="object"?(n,r)=>h(e,n,r):e}globalThis.toFn=c;function Ue(e,t){return e>t}function Xe(...e){return e.reduce((t,n)=>t+n,0)}function Ze(...e){return e.length==1?0-e[0]:e.reduce((t,n)=>t-n)}function He(e,t){return t[e]}function b(e,t,n,...r){if(r.length%2!==0)throw new Error("Illegal argument: assoc expects an odd number of arguments.");switch(p(e)){case x:e.set(t,n);for(let o=0;o<r.length;o+=2)e.set(r[o],r[o+1]);break;case _:case y:e[t]=n;for(let o=0;o<r.length;o+=2)e[r[o]]=r[o+1];break;default:throw new Error("Illegal argument: assoc! expects a Map, Array, or Object as the first argument.")}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,n,...r){e||(e={});let o=U(e);return b(o,t,n,...r),o}const x=1,_=2,y=3,A=4,w=5,S=6;function j(e){switch(e){case x:return new Map;case _:return[];case y:return{};case A:return new O;case w:return new Set;case S:return s(function*(){})}}function L(e){return e.constructor===Object}function et(e){return e!=null&&L(e)}function p(e){if(e!=null){if(L(e))return y;if(e instanceof Map)return x;if(e instanceof Set)return w;if(e instanceof O)return A;if(e instanceof Array)return _;if(e instanceof q)return S}}function tt(e,t,n,r,o){let u=p(n);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=[n];let l=n;for(let a=0;a<r.length-1;a+=1){let m=r[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],r[a],i[a+1]);return i[0]}function X(e,t,n){return tt(v,"assoc-in",e,t,n)}function nt(e,t,n){var r=e;let o=p(e);for(const u of t.splice(0,t.length-1)){let i=h(r,u);i===void 0&&(i=j(o),b(r,u,i)),r=i}return b(r,t[t.length-1],n),e}function rt(...e){if(e=e.map(c),e.length===0)return ge;if(e.length===1)return e[0];let[t,...n]=e.slice().reverse();return function(...r){let o=t(...r);for(const u of n)o=u(o);return o}}function P(...e){if(e.length===0)return $();let[t,...n]=e;switch(t==null&&(t=[]),p(t)){case w:for(const r of n)t.add(r);break;case A:t.unshift(...n.reverse());break;case _:t.push(...n);break;case x:for(const r of n)r instanceof Array?t.set(r[0],r[1]):f(r).forEach(o=>{t.set(o[0],o[1])});break;case y:for(const r of n)r instanceof Array?t[r[0]]=r[1]:Object.assign(t,r);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 $();let[t,...n]=e;switch(t==null&&(t=[]),p(t)){case w:return new Set([...t,...n]);case A:return new O(...n.reverse(),...t);case _:return[...t,...n];case x:const r=new Map(t);for(const u of n)u instanceof Array?r.set(u[0],u[1]):f(u).forEach(i=>{r.set(i[0],i[1])});return r;case S:return s(function*(){yield*n,yield*t});case y:const o={...t};for(const u of n)u instanceof Array?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 n of t)e.delete(n);return e}function ot(e,...t){let n=new Set([...e]);return H(n,...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 n of t)delete e[n];return e}function it(e,...t){let n={...e};for(const r of t)delete n[r];return n}function te(e){return e+1}function ft(e){return e-1}function ne(...e){console.log(...e)}function re(e,t,n){if(e){var r=void 0;if(e instanceof Array)r=e[t];else{let o=f(e),u=0;for(let i of o)if(u++==t){r=i;break}}if(r!==void 0)return r}return n}function h(e,t,n=void 0){if(e==null)return n;let r;if(L(e))return r=e[t],r===void 0?n:r;switch(p(e)){case w:e.has(t)&&(r=t);break;case x:r=e.get(t);break;case _:r=e[t];break;default:if(e.get instanceof Function){r=e.get(t);break}r=e[t];break}return r!==void 0?r:n}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 z=Symbol("Iterable"),ue=Symbol.iterator;function N(e){return e[Symbol.iterator]()}const I=N;function Y(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,n]=f(e);return n}function st(e){return R(R(e))}function lt(e){return s(function*(){let t=!0;for(const n of f(e))t?t=!1:yield n})}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 n of e)t=n;return t}}function pt(e){return new K(e)}function xt(e){return e instanceof K}function B(e,t,n){e=c(e);let r,o;if(n===void 0){let u=f(t)[Symbol.iterator]();o=u.next().value,r=u}else o=t,r=f(n);if(o instanceof K)return o.value;for(const u of r)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[z]=!0;function s(e){return new q(e)}class fe{constructor(t,n){this.x=t,this.coll=n}*[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 n of f(t[0]))yield e(n)});default:return s(function*(){const n=t.map(r=>I(f(r)));for(;;){let r=[];for(const o of n){const u=o.next();if(u.done)return;r.push(u.value)}yield e(...r)}})}}function C(e,t){return e=c(e),s(function*(){for(const n of f(t))g(e(n))&&(yield n)})}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 n=[],r=0;for(const o of f(t))n.push(e(r,o)),r++;return n}function wt(e,t){e=c(e);let n=[],r=0;for(const o of f(t)){let u=e(r,o);g(u)&&n.push(u),r++}return n}function gt(...e){return e.join("")}function se(e){return!e}function mt(e){return e==null}const bt={};function At(e){return e===null?"null":JSON.stringify(e,(t,n)=>{switch(p(n)){case w:case S:return[...n];case x:return Object.fromEntries(n);default:return n}})}function le(...e){return e.map(At).join(" ")}function vt(...e){ne(le(...e))}function ae(e){this.val=e,this._watches={},this._deref=()=>this.val,this._hasWatches=!1,this._reset_BANG_=t=>{let n=this.val;if(this.val=t,this._hasWatches)for(let r of Object.entries(this._watches)){let o=r[0],u=r[1];u(o,this,n,t)}return t},this._add_watch=(t,n)=>{this._watches[t]=n,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,...n){t=c(t);const r=t(pe(e),...n);return xe(e,r),r}function Rt(e,t,n){return s(function*(){let r=e,o=t,u=n;t===void 0&&(r=0,o=e);let i=r||0;for(u=n||1;o===void 0||i<o;)yield i,i+=u})}function Kt(e,t){let n=e.exec(t);if(n&&t===n[0])return n.length===1?n[0]:n}function Qt(e,t,n){return e.slice(t,n)}function $(...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 n=t.slice(0,t.length-1),r=t[t.length-1];return e(...n,...r)}function he(e){return e%2==0}function It(e){return!he(e)}function de(e){return e=c(e),(...t)=>se(e(...t))}function Ot(e){return(...t)=>e}class O extends Array{constructor(...t){super(),this.push(...t)}}function kt(e){return p(e)===A}function Tt(...e){return new O(...e)}function ye(e){return e instanceof Array}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(n=>I(f(n)));for(;;){let n=[];for(const r of t){const o=r.next();if(o.done)return;n.push(o.value)}yield*n}})}function Bt(e,t){return T(1,me(F(e),t))}function Lt(e,t){const n=p(e),r=j(n)||{};for(const o of t){const u=h(e,o);u!=null&&b(r,o,u)}return r}function Pt(e,...t){let n=e,r=t[0];return t.length===2&&([n,r]=t),be(e,n,[],r,!0)}function zt(e,...t){let n=e,r=[],o=t[0];return t.length===2?[n,o]=t:t.length>2&&([n,r,o]=t),be(e,n,r,o,!1)}function be(e,t,n,r,o){return s(function*(){let u=[],i=0;for(let l of f(r))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:n.length&&(u.push(...n.slice(0,e-u.length)),yield u))})}function Yt(e,t){return e=c(e),s(function*(){let n=I(t),r=n.next();r.done&&(yield*null);let o=r.value,u=e(o),i=[o],l=[];for(;;){let a=n.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 Ae(e){const t=p(e);if(t!=null)return j(t);throw new Error(`Can't create empty of ${typeof e}`)}function qt(...e){const t=e[0];let n;return t==null?n={}:n=Ee(Ae(t),t),P(n,...e.slice(1))}function ve(e){return e[0]}function Me(e){return e[1]}function Ct(e,...t){e=c(e);var n=!1;for(const r of t)if(r!=null){n=!0;break}if(n){let r=(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 B((u,i)=>B(r,u||{},Y(i)),t)}else return null}function $t(){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 F(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[z]:!0,[ue]:e.length==1?function*(){let t=e[0];for(;;)yield t}:function*(){let[t,n]=e;for(var r=0;r<t;r++)yield n}}}function k(e,t){return s(function*(){let n=e-1;for(const r of f(t))if(n-->=0&&(yield r),n<0)return})}function Re(e,t){return e=c(e),s(function*(){for(const n of f(t))if(g(e(n)))yield n;else return})}function Vt(e,t){return e<=0?F(R(t)):s(function*(){let n=0;for(let r of f(t))n%e===0&&(yield r),n++})}function Wt(e,...t){return e=c(e),function(...n){return e(...t,...n)}}function Jt(e){return s(function*(){for(;;)yield*e})}function T(e,t){return s(function*(){let n=N(f(t));for(let r=0;r<e;r++)n.next();yield*n})}function Ke(e,t){return e=c(e),s(function*(){let n=N(f(t));for(;;){let r=n.next();if(r.done)break;let o=r.value;if(!g(e(o))){yield o;break}}yield*n})}function Dt(e){return s(function*(){let t=new Set;for(const n of f(e))t.has(n)||(yield n),t.add(n)})}function Ut(e,t,n,...r){return n=c(n),v(e,t,n(h(e,t),...r))}function Qe(e,t,n){let r=e;for(const o of t)r=h(r,o);return r===void 0?n:r}function Xt(e,t,n,...r){return n=c(n),X(e,t,n(Qe(e,t),...r))}function V(e,t,...n){return e=c(e),function(r,...o){return r?e(r,...n,...o):e(t,...n,...o)}}function Se(e,t){e=c(e);for(let n of f(t))if(!e(n))return!1;return!0}function Zt(e,t){return!Se(e,t)}function Ht(e,t){return e=c(e),s(function*(){for(const n of f(t)){const r=e(n);g(r)&&(yield r)}})}function en(e){return e instanceof Array?e.reverse():[...e].reverse()}function je(e,t){return t===void 0&&(t=e,e=void 0),e=c(e),[...t].sort(e)}function tn(e){return e===J?e:(t,n)=>{let r=e(t,n);return Le(r)?r:r?-1:e(n,t)?1:0}}function nn(e,t,n){return n===void 0&&(n=t,t=J),e=c(e),t=c(t),je((r,o)=>{let u=tn(t),i=e(r),l=e(o);return u(i,l)},n)}function rn(e){return[...e].sort(function(t,n){return Math.random()-.5})}function Ne(e,t){e=c(e);for(const n of f(t)){const r=e(n);if(g(r))return r}}function on(e,t){return e=c(e),!Ne(e,t)}function un(e,t){return(t instanceof Array?_e:M)(r=>{const o=e[r];return o!==void 0?o:r},t)}function fn(e){return!Y(e)}function Ie(e){return Math.floor(Math.random()*e)}function cn(e){let t=Ie(Q(e));return re(e,t)}function sn(e){return s(function*(){for(;;)yield e()})}function ln(e,t){t===void 0&&(t=e,e=void 0);const n=sn(t);return e?k(e,n):n}function W(e,t,n,...r){const o=h(e,t);return b(e,t,n(o,...r))}function an(e,t){const n={};for(const r of f(t)){const o=e(r);W(n,o,V(P,[]),r)}return n}function pn(e){const t={},n=V(te,0);for(const r of f(e))W(t,r,n);return t}class xn{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 _n(e){let t=[...f(e)];return t.pop(),t.length>0?t:null}function hn(...e){let[t,n]=e.length>1?e:[1,e[0]];return M((r,o)=>r,n,T(t,n))}function dn(e,t){return[k(e,t),T(e,t)]}function yn(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 n=0;for(const r of f(e))n++;return n}function wn(e){return e===!0}function gn(e){return e===!1}function mn(e){return e!=null}function bn(e){return!!e}function An(e){return e===0}function vn(e){return e<0}function Mn(e){return e>0}function En(...e){var t=0;let n={};for(;!(t>=e.length);)n[e[t]]=e[t+1],t=t+2;return n}function Rn(e){return e.length}function Kn(e,t,n,...r){if(r.length==0)return e[t]=n,n;{let o=[t,n,...r],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,n}}function Qn(e){for(const t of f(e));return null}function Sn(e){return E(e)}function jn(e){return[...e]}function Nn(e,t,n){return e._add_watch(t,n)}function In(e,t){return e._remove_watch(t)}function On(e,t,n){if(!n)return t;var r=t;for(let o of Object.entries(n))r=e(r,o[0],o[1]);return r}function Oe(e,t,...n){return t==null?e:Math.max(e,t,...n)}function kn(e,t,...n){return t==null?e:Math.min(e,t,...n)}function Tn(e){return e instanceof Object}function Gn(...e){return(...t)=>{for(let n of e)for(let r of t)if(!n(r))return!1;return!0}}function Bn(...e){return(...t)=>{for(let n of e)for(let r of t){let o=n(r);if(o)return o}}}function ke(e,t){return E(t||e)}function Ln(e,t){var n=t;return s(function*(){for(;;)yield n,n=e(n)})}function Pn(...e){return e=e.map(c),(...t)=>{let n=[];for(let r of e)n.push(r(...t));return n}}function Te(e){if(e instanceof Array){let t=e.slice(1);return t.length>0?t:null}else return Te(E(e))}function J(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 zn(e){return ke(e)}function g(e){return e!=null&&e!==!1}function Ge(e,t,n){return e.substring(t,n)}function Yn(e){return typeof e=="function"}function*Be(e,t){let n=e.exec(t);if(n){let r=n[0],o=n.length===1?r:E(n);yield*ce(o,s(function*(){let u=n.index+Oe(1,r.length);u<=t.length&&(yield*Be(e,Ge(t,u)))}))}}function qn(e){return Number.isNaN(e)}function Le(e){return typeof e=="number"}function Pe(e){return e?Object.keys(e):null}function Cn(e){return Pe(e)}function $n(e){return e?Object.values(e):null}function ze(e){return typeof e=="string"}function Fn(e){return p(e)!=null}function Vn(e){return e instanceof RegExp}class D extends Error{constructor(t,n,r){super(t),this._data=n,this._cause=r}}function Wn(e){return e instanceof D?e._data:null}function Jn(e){return e instanceof Error?e.message:null}function Dn(e){return e instanceof D?e._cause:null}function Un(e,t,n){return new D(e,t,n)}function Ye(e){return Number.isInteger(e)}const Xn=Ye,qe=Symbol("meta");function Zn(e){return e instanceof Object?e[qe]:null}function Hn(e,t){let n=U(e);return n[qe]=t,n}function er(e){return e===!0||e===!1}function Ce(e){switch(p(e)){case w:return!0}return!1}function tr(e,t){return Ce(t)?Q(t):Q(k(e,t))}function nr(e,t){let n=h(e,t);if(n!==void 0)return[t,n]}function rr(e,t){return(e%t+t)%t}function or(e,t,...n){if(n.length==0)return t;var r=e(t),o=t;return n.forEach(u=>{var i=e(u);i<=r&&(r=i,o=u)}),o}function ur(e,t,...n){if(n.length==0)return t;var r=e(t),o=t;return n.forEach(u=>{var i=e(u);i>=r&&(r=i,o=u)}),o}function ir(e){throw new Error(`Expected string, got: ${typeof e}`)}function fr(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 ir(e)}return De(cr);})();
|
|
1
|
+
var squint;(squint||={}).core=(()=>{var G=Object.defineProperty;var Ce=Object.getOwnPropertyDescriptor;var Fe=Object.getOwnPropertyNames;var Ve=Object.prototype.hasOwnProperty;var We=(e,t)=>{for(var r in t)G(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&&G(e,o,{get:()=>t[o],enumerable:!(n=Ce(t,o))||n.enumerable});return e};var De=e=>Je(G({},"__esModule",{value:!0}),e);var cn={};We(cn,{Atom:()=>ae,Cons:()=>fe,IIterable:()=>z,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:()=>J,complement:()=>de,concat:()=>we,conj:()=>Z,conj_BANG_:()=>P,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:()=>q,filterv:()=>ht,find:()=>tn,first:()=>R,fn_QMARK_:()=>zr,fnil:()=>V,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:()=>B,reduce_kv:()=>Or,reduced:()=>pt,reduced_QMARK_:()=>xt,regexp_QMARK_:()=>Fr,remove:()=>dt,remove_watch:()=>Nr,repeat:()=>F,repeatedly:()=>sr,replace:()=>ur,reset_BANG_:()=>xe,rest:()=>lt,reverse:()=>er,satisfies_QMARK_:()=>He,second:()=>ct,select_keys:()=>Lt,seq:()=>Y,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_:()=>W,update_in:()=>Xt,val:()=>Me,vals:()=>qr,vec:()=>E,vector:()=>C,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 L(e){return e.constructor===Object}function et(e){return e!=null&&L(e)}function p(e){if(e!=null){if(L(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 $)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 P(...e){if(e.length===0)return C();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 C();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(L(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 z=Symbol("Iterable"),ue=Symbol.iterator;function N(e){return e[Symbol.iterator]()}const O=N;function Y(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 B(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 ${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()}}$.prototype[z]=!0;function s(e){return new $(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 q(e,t){return e=c(e),s(function*(){for(const r of f(t))g(e(r))&&(yield r)})}function ht(e,t){return[...q(e,t)]}function dt(e,t){return q(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 C(...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(F(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),P(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 B((u,i)=>B(n,u||{},Y(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 F(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[z]:!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?F(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 V(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)}function tr(e){return e===J?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=J),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!Y(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 W(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);W(r,o,V(P,[]),n)}return r}function ar(e){const t={},r=V(te,0);for(const n of f(e))W(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 J(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);})();
|
package/package.json
CHANGED
package/src/squint/core.js
CHANGED
|
@@ -43,7 +43,6 @@ export function assoc_BANG_(m, k, v, ...kvs) {
|
|
|
43
43
|
if (kvs.length % 2 !== 0) {
|
|
44
44
|
throw new Error('Illegal argument: assoc expects an odd number of arguments.');
|
|
45
45
|
}
|
|
46
|
-
|
|
47
46
|
switch (typeConst(m)) {
|
|
48
47
|
case MAP_TYPE:
|
|
49
48
|
m.set(k, v);
|
|
@@ -62,7 +61,7 @@ export function assoc_BANG_(m, k, v, ...kvs) {
|
|
|
62
61
|
break;
|
|
63
62
|
default:
|
|
64
63
|
throw new Error(
|
|
65
|
-
|
|
64
|
+
`Illegal argument: assoc! expects a Map, Array, or Object as the first argument, but got ${typeof m}.`
|
|
66
65
|
);
|
|
67
66
|
}
|
|
68
67
|
|
|
@@ -137,9 +136,9 @@ function typeConst(obj) {
|
|
|
137
136
|
if (obj instanceof Map) return MAP_TYPE;
|
|
138
137
|
if (obj instanceof Set) return SET_TYPE;
|
|
139
138
|
if (obj instanceof List) return LIST_TYPE;
|
|
140
|
-
if (obj
|
|
139
|
+
if (Array.isArray(obj)) return ARRAY_TYPE;
|
|
141
140
|
if (obj instanceof LazyIterable) return LAZY_ITERABLE_TYPE;
|
|
142
|
-
|
|
141
|
+
if (obj instanceof Object) return OBJECT_TYPE;
|
|
143
142
|
return undefined;
|
|
144
143
|
}
|
|
145
144
|
|
|
@@ -235,7 +234,7 @@ export function conj_BANG_(...xs) {
|
|
|
235
234
|
break;
|
|
236
235
|
case MAP_TYPE:
|
|
237
236
|
for (const x of rest) {
|
|
238
|
-
if (!(x
|
|
237
|
+
if (!(Array.isArray(x)))
|
|
239
238
|
iterable(x).forEach((kv) => {
|
|
240
239
|
o.set(kv[0], kv[1]);
|
|
241
240
|
});
|
|
@@ -244,7 +243,7 @@ export function conj_BANG_(...xs) {
|
|
|
244
243
|
break;
|
|
245
244
|
case OBJECT_TYPE:
|
|
246
245
|
for (const x of rest) {
|
|
247
|
-
if (!(x
|
|
246
|
+
if (!(Array.isArray(x))) Object.assign(o, x);
|
|
248
247
|
else o[x[0]] = x[1];
|
|
249
248
|
}
|
|
250
249
|
break;
|
|
@@ -279,7 +278,7 @@ export function conj(...xs) {
|
|
|
279
278
|
const m = new Map(o);
|
|
280
279
|
|
|
281
280
|
for (const x of rest) {
|
|
282
|
-
if (!(x
|
|
281
|
+
if (!(Array.isArray(x)))
|
|
283
282
|
iterable(x).forEach((kv) => {
|
|
284
283
|
m.set(kv[0], kv[1]);
|
|
285
284
|
});
|
|
@@ -296,7 +295,7 @@ export function conj(...xs) {
|
|
|
296
295
|
const o2 = { ...o };
|
|
297
296
|
|
|
298
297
|
for (const x of rest) {
|
|
299
|
-
if (!(x
|
|
298
|
+
if (!(Array.isArray(x))) Object.assign(o2, x);
|
|
300
299
|
else o2[x[0]] = x[1];
|
|
301
300
|
}
|
|
302
301
|
|
|
@@ -365,7 +364,7 @@ export function println(...args) {
|
|
|
365
364
|
export function nth(coll, idx, orElse) {
|
|
366
365
|
if (coll) {
|
|
367
366
|
var elt = undefined;
|
|
368
|
-
if (coll
|
|
367
|
+
if (Array.isArray(coll)) {
|
|
369
368
|
elt = coll[idx];
|
|
370
369
|
} else {
|
|
371
370
|
let iter = iterable(coll);
|
|
@@ -412,8 +411,10 @@ export function get(coll, key, otherwise = undefined) {
|
|
|
412
411
|
// we choose .get as the default implementation, e.g. fetch Headers are not Maps, but do implement a .get method
|
|
413
412
|
let g = coll['get'];
|
|
414
413
|
if (g instanceof Function) {
|
|
414
|
+
try {
|
|
415
415
|
v = coll.get(key);
|
|
416
|
-
|
|
416
|
+
break;
|
|
417
|
+
} catch (e) {}
|
|
417
418
|
}
|
|
418
419
|
v = coll[key];
|
|
419
420
|
break;
|
|
@@ -851,7 +852,7 @@ export function list(...args) {
|
|
|
851
852
|
}
|
|
852
853
|
|
|
853
854
|
export function array_QMARK_(x) {
|
|
854
|
-
return x
|
|
855
|
+
return Array.isArray(x);
|
|
855
856
|
}
|
|
856
857
|
|
|
857
858
|
export function concat(...colls) {
|
|
@@ -1231,7 +1232,7 @@ export function keep(pred, coll) {
|
|
|
1231
1232
|
}
|
|
1232
1233
|
|
|
1233
1234
|
export function reverse(coll) {
|
|
1234
|
-
if (coll
|
|
1235
|
+
if (Array.isArray(coll)) {
|
|
1235
1236
|
// performance: we don't need to copy to another array first
|
|
1236
1237
|
return coll.reverse();
|
|
1237
1238
|
} else return [...coll].reverse();
|
|
@@ -1302,7 +1303,7 @@ export function not_any_QMARK_(pred, coll) {
|
|
|
1302
1303
|
}
|
|
1303
1304
|
|
|
1304
1305
|
export function replace(smap, coll) {
|
|
1305
|
-
let mapf = coll
|
|
1306
|
+
let mapf = (Array.isArray(coll)) ? mapv : map;
|
|
1306
1307
|
return mapf((x) => {
|
|
1307
1308
|
const repl = smap[x];
|
|
1308
1309
|
if (repl !== undefined) {
|
|
@@ -1586,7 +1587,7 @@ export function juxt(...fs) {
|
|
|
1586
1587
|
}
|
|
1587
1588
|
|
|
1588
1589
|
export function next(x) {
|
|
1589
|
-
if (x
|
|
1590
|
+
if (Array.isArray(x)) {
|
|
1590
1591
|
let ret = x.slice(1);
|
|
1591
1592
|
if (ret.length > 0) {
|
|
1592
1593
|
return ret;
|