squint-cljs 0.3.34 → 0.3.36

package/lib/squint.core.umd.js

@@ -1 +1 @@
-var squint;(squint||={}).core=(()=>{var S=Object.defineProperty;var Ee=Object.getOwnPropertyDescriptor;var Ke=Object.getOwnPropertyNames;var Qe=Object.prototype.hasOwnProperty;var Se=(e,t)=>{for(var n in t)S(e,n,{get:t[n],enumerable:!0})},je=(e,t,n,r)=>{if(t&&typeof t=="object"||typeof t=="function")for(let o of Ke(t))!Qe.call(e,o)&&o!==n&&S(e,o,{get:()=>t[o],enumerable:!(r=Ee(t,o))||r.enumerable});return e};var Ie=e=>je(S({},"__esModule",{value:!0}),e);var An={};Se(An,{Atom:()=>re,IIterable:()=>N,IIterable__iterator:()=>H,LazySeq:()=>Vt,PROTOCOL_SENTINEL:()=>tt,_:()=>Te,_PLUS_:()=>Oe,_iterator:()=>E,aclone:()=>cn,add_watch:()=>sn,alength:()=>rn,apply:()=>at,array_QMARK_:()=>_t,aset:()=>on,assoc:()=>I,assoc_BANG_:()=>x,assoc_in:()=>W,assoc_in_BANG_:()=>Be,atom:()=>ot,boolean$:()=>Ht,butlast:()=>Wt,comp:()=>Le,compare:()=>yn,complement:()=>ce,concat:()=>se,conj:()=>$,conj_BANG_:()=>T,cons:()=>ee,constantly:()=>xt,contains_QMARK_:()=>Ge,count:()=>be,cycle:()=>Kt,dec:()=>qe,deref:()=>oe,disj:()=>ke,disj_BANG_:()=>J,dissoc:()=>Ye,dissoc_BANG_:()=>Pe,distinct:()=>Qt,doall:()=>fn,dorun:()=>un,drop:()=>Q,drop_last:()=>$t,drop_while:()=>_e,empty:()=>xe,empty_QMARK_:()=>Gt,es6_iterator:()=>B,even_QMARK_:()=>fe,every_QMARK_:()=>we,every_pred:()=>xn,false_QMARK_:()=>Dt,ffirst:()=>Ce,filter:()=>k,filterv:()=>Ze,first:()=>g,fn_QMARK_:()=>mn,fnil:()=>q,frequencies:()=>Ct,get:()=>m,get_in:()=>ye,group_by:()=>zt,identical_QMARK_:()=>vt,identity:()=>le,inc:()=>U,interleave:()=>ae,interpose:()=>wt,into:()=>de,into_array:()=>ge,iterable:()=>i,iterate:()=>hn,js_obj:()=>nn,juxt:()=>_n,keep:()=>Ot,keep_indexed:()=>He,last:()=>We,lazy:()=>f,list:()=>ht,list_QMARK_:()=>dt,map:()=>A,map_QMARK_:()=>pn,map_indexed:()=>Fe,mapcat:()=>yt,mapv:()=>ie,max:()=>v,merge:()=>gt,min:()=>j,neg_QMARK_:()=>en,next:()=>Me,nil_QMARK_:()=>et,not:()=>te,not_any_QMARK_:()=>Lt,not_every_QMARK_:()=>It,nth:()=>D,odd_QMARK_:()=>pt,partial:()=>Et,partition:()=>bt,partition_all:()=>At,pos_QMARK_:()=>tn,pr_str:()=>ne,println:()=>Z,prn:()=>rt,rand_int:()=>Ae,rand_nth:()=>Pt,range:()=>it,re_matches:()=>ft,re_seq:()=>Re,reduce:()=>Ue,reduce_kv:()=>an,reduced:()=>$e,reduced_QMARK_:()=>Je,remove:()=>De,remove_watch:()=>ln,repeat:()=>P,repeatedly:()=>qt,replace:()=>kt,reset_BANG_:()=>ue,rest:()=>Ve,reverse:()=>Tt,satisfies_QMARK_:()=>Ne,second:()=>ze,select_keys:()=>mt,seq:()=>X,seqable_QMARK_:()=>F,set:()=>lt,shuffle:()=>Bt,some:()=>me,some_QMARK_:()=>Ft,some_fn:()=>dn,sort:()=>Nt,split_at:()=>Jt,split_with:()=>Ut,str:()=>Xe,subs:()=>ve,subvec:()=>ct,swap_BANG_:()=>ut,system_time:()=>Mt,take:()=>Y,take_nth:()=>Rt,take_while:()=>he,to_array:()=>wn,true_QMARK_:()=>Zt,update:()=>St,update_BANG_:()=>z,update_in:()=>jt,vec:()=>b,vector:()=>G,vector_QMARK_:()=>st,zero_QMARK_:()=>Xt});function Oe(...e){return e.reduce((t,n)=>t+n,0)}function Te(...e){return e.reduce((t,n)=>t-n)}function Ne(e,t){return t[e]}function x(e,t,n,...r){if(r.length%2!==0)throw new Error("Illegal argument: assoc expects an odd number of arguments.");switch(s(e)){case a:e.set(t,n);for(let o=0;o<r.length;o+=2)e.set(r[o],r[o+1]);break;case p:case d: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 I(e,t,n,...r){switch(e||(e={}),s(e)){case a:return x(new Map(e.entries()),t,n,...r);case p:return x([...e],t,n,...r);case d:return x({...e},t,n,...r);default:throw new Error("Illegal argument: assoc expects a Map, Array, or Object as the first argument.")}}const a=1,p=2,d=3,w=4,h=5,R=6;function O(e){switch(e){case a:return new Map;case p:return[];case d:return{};case w:return new K;case h:return new Set;case R:return f(function*(){})}}function s(e){if(e instanceof Map)return a;if(e instanceof Set)return h;if(e instanceof K)return w;if(e instanceof Array)return p;if(e instanceof L)return R;if(e instanceof Object)return d}function V(e,t,n,r,o){let u=s(n);if(u!==a&&u!==p&&u!==d)throw new Error(`Illegal argument: ${t} expects the first argument to be a Map, Array, or Object.`);const c=[n];let _=n;for(let l=0;l<r.length-1;l+=1){let C=r[l],y;_ instanceof Map?y=_.get(C):y=_[C],y||(y=O(u)),c.push(y),_=y}c.push(o);for(let l=c.length-2;l>=0;l-=1)c[l]=e(c[l],r[l],c[l+1]);return c[0]}function W(e,t,n){return V(I,"assoc-in",e,t,n)}function Be(e,t,n){return V(x,"assoc-in!",e,t,n)}function Le(...e){if(e.length===0)return le;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 T(...e){if(e.length===0)return G();let[t,...n]=e;switch(t==null&&(t=[]),s(t)){case h:for(const r of n)t.add(r);break;case w:t.unshift(...n.reverse());break;case p:t.push(...n);break;case a:for(const r of n)r instanceof Array?t.set(r[0],r[1]):i(r).forEach(o=>{t.set(o[0],o[1])});break;case d: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 $(...e){if(e.length===0)return G();let[t,...n]=e;switch(t==null&&(t=[]),s(t)){case h:return new Set([...t,...n]);case w:return new K(...n.reverse(),...t);case p:return[...t,...n];case a:const r=new Map(t);for(const u of n)u instanceof Array?r.set(u[0],u[1]):i(u).forEach(c=>{r.set(c[0],c[1])});return r;case R:return f(function*(){yield*n,yield*t});case d: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 J(e,...t){for(const n of t)e.delete(n);return e}function ke(e,...t){let n=new Set([...e]);return J(n,...t)}function Ge(e,t){switch(s(e)){case h:case a:return e.has(t);case void 0:return!1;default:return t in e}}function Pe(e,...t){for(const n of t)delete e[n];return e}function Ye(e,...t){let n={...e};for(const r of t)delete n[r];return n}function U(e){return e+1}function qe(e){return e-1}function Z(...e){console.log(...e)}function D(e,t,n){if(e){var r=void 0;if(e instanceof Array)r=e[t];else{let o=i(e),u=0;for(let c of o)if(u++==t){r=c;break}}if(r!==void 0)return r}return n}function m(e,t,n=void 0){let r;switch(s(e)){case h:e.has(t)&&(r=t);break;case a:r=e.get(t);break;case void 0:break;default:r=e[t];break}return r!==void 0?r:n}function F(e){return typeof e=="string"||e===null||e===void 0||Symbol.iterator in e}function i(e){return e==null?[]:F(e)?e:Object.entries(e)}const N=Symbol("Iterable"),H=Symbol.iterator;function E(e){return e[Symbol.iterator]()}const B=E;function X(e){let t=i(e);return t.length===0||t.size===0?null:t}function g(e){let[t]=i(e);return t}function ze(e){let[t,n]=i(e);return n}function Ce(e){return g(g(e))}function Ve(e){return f(function*(){let t=!0;for(const n of i(e))t?t=!1:yield n})}class M{value;constructor(t){this.value=t}_deref(){return this.value}}function We(e){switch(e=i(e),s(e)){case p:return e[e.length-1];default:let t;for(const n of e)t=n;return t}}function $e(e){return new M(e)}function Je(e){return e instanceof M}function Ue(e,t,n){let r,o;if(n===void 0){let u=i(t)[Symbol.iterator]();o=u.next().value,r=u}else o=t,r=i(n);if(o instanceof M)return o.value;for(const u of r)if(o=e(o,u),o instanceof M){o=o.value;break}return o}class L{constructor(t){this.gen=t}[Symbol.iterator](){return this.gen()}}L.prototype[N]=!0;function f(e){return new L(e)}function ee(e,t){return f(function*(){yield e,yield*i(t)})}function A(e,...t){switch(t.length){case 0:throw new Error("map with 2 arguments is not supported yet");case 1:return f(function*(){for(const n of i(t[0]))yield e(n)});default:return f(function*(){const n=t.map(r=>B(i(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 k(e,t){return f(function*(){for(const n of i(t))e(n)&&(yield n)})}function Ze(e,t){return[...k(e,t)]}function De(e,t){return k(ce(e),t)}function Fe(e,t){let n=[],r=0;for(const o of i(t))n.push(e(r,o)),r++;return n}function He(e,t){let n=[],r=0;for(const o of i(t)){let u=e(r,o);u&&n.push(u),r++}return n}function Xe(...e){return e.join("")}function te(e){return!e}function et(e){return e==null}const tt={};function nt(e){return JSON.stringify(e,(t,n)=>{switch(s(n)){case h:case R:return[...n];case a:return Object.fromEntries(n);default:return n}})}function ne(...e){return e.map(nt).join(" ")}function rt(...e){Z(ne(...e))}function re(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 ot(e){return new re(e)}function oe(e){return e._deref()}function ue(e,t){e._reset_BANG_(t)}function ut(e,t,...n){const r=t(oe(e),...n);return ue(e,r),r}function it(e,t,n){return f(function*(){let r=e,o=t,u=n;t===void 0&&(r=0,o=e);let c=r||0;for(u=n||1;o===void 0||c<o;)yield c,c+=u})}function ft(e,t){let n=e.exec(t);if(n&&t===n[0])return n.length===1?n[0]:n}function ct(e,t,n){return e.slice(t,n)}function G(...e){return e}function st(e){return s(e)===p}function ie(...e){return[...A(...e)]}function b(e){return[...i(e)]}function lt(e){return new Set(i(e))}function at(e,...t){const n=t.slice(0,t.length-1),r=t[t.length-1];return e(...n,...r)}function fe(e){return e%2==0}function pt(e){return!fe(e)}function ce(e){return(...t)=>te(e(...t))}function xt(e){return(...t)=>e}class K extends Array{constructor(...t){super(),this.push(...t)}}function dt(e){return s(e)===w}function ht(...e){return new K(...e)}function _t(e){return e instanceof Array}function se(...e){return f(function*(){for(const t of e)yield*i(t)})}function yt(e,...t){return se(...A(e,...t))}function le(e){return e}function ae(...e){return f(function*(){const t=e.map(n=>B(i(n)));for(;;){let n=[];for(const r of t){const o=r.next();if(o.done)return;n.push(o.value)}yield*n}})}function wt(e,t){return Q(1,ae(P(e),t))}function mt(e,t){const n=s(e),r=O(n);for(const o of t){const u=m(e,o);u!=null&&x(r,o,u)}return r}function At(e,...t){let n=e,r=t[0];return t.length===2&&([n,r]=t),pe(e,n,[],r,!0)}function bt(e,...t){let n=e,r=[],o=t[0];return t.length===2?[n,o]=t:t.length>2&&([n,r,o]=t),pe(e,n,r,o,!1)}function pe(e,t,n,r,o){return f(function*(){let u=[],c=0;for(let _ of i(r))c<e&&(u.push(_),u.length===e&&(yield u,u=t<e?u.slice(t):[])),c++,c===t&&(c=0);u.length>0&&(u.length===e||o?yield u:n.length&&(u.push(...n.slice(0,e-u.length)),yield u))})}function xe(e){const t=s(e);return O(t)}function gt(...e){const t=e[0];let n;return t==null?n={}:n=de(xe(t),t),T(n,...e.slice(1))}function Mt(){return performance.now()}function de(...e){switch(e.length){case 0:return[];case 1:return e[0];default:return $(e[0]??[],...i(e[1]))}}function vt(e,t){return e===t}function P(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[N]:!0,[H]: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 Y(e,t){return f(function*(){let n=e-1;for(const r of i(t))if(n-->=0&&(yield r),n<0)return})}function he(e,t){return f(function*(){for(const n of i(t))if(e(n))yield n;else return})}function Rt(e,t){return e<=0?P(g(t)):f(function*(){let n=0;for(let r of i(t))n%e===0&&(yield r),n++})}function Et(e,...t){return function(...n){return e(...t,...n)}}function Kt(e){return f(function*(){for(;;)yield*e})}function Q(e,t){return f(function*(){let n=E(i(t));for(let r=0;r<e;r++)n.next();yield*n})}function _e(e,t){return f(function*(){let n=E(i(t));for(;;){let r=n.next();if(r.done)break;let o=r.value;if(!e(o)){yield o;break}}yield*n})}function Qt(e){return f(function*(){let t=new Set;for(const n of i(e))t.has(n)||(yield n),t.add(n)})}function St(e,t,n,...r){return I(e,t,n(m(e,t),...r))}function ye(e,t,n){let r=e;for(const o of t)r=m(r,o);return r===void 0?n:r}function jt(e,t,n,...r){return W(e,t,n(ye(e,t),...r))}function q(e,t,...n){return function(r,...o){return r?e(r,...n,...o):e(t,...n,...o)}}function we(e,t){for(let n of i(t))if(!e(n))return!1;return!0}function It(e,t){return!we(e,t)}function Ot(e,t){return f(function*(){for(const n of i(t)){const r=e(n);r&&(yield r)}})}function Tt(e){return e instanceof Array?e.reverse():[...e].reverse()}function Nt(e,t){return t===void 0&&(t=e,e=void 0),[...t].sort(e)}function Bt(e){return[...e].sort(function(t,n){return Math.random()-.5})}function me(e,t){for(const n of i(t)){const r=e(n);if(r)return r}}function Lt(e,t){return!me(e,t)}function kt(e,t){return(t instanceof Array?ie:A)(r=>{const o=e[r];return o!==void 0?o:r},t)}function Gt(e){return!X(e)}function Ae(e){return Math.floor(Math.random()*e)}function Pt(e){let t=Ae(be(e));return D(e,t)}function Yt(e){return f(function*(){for(;;)yield e()})}function qt(e,t){t===void 0&&(t=e,e=void 0);const n=Yt(t);return e?Y(e,n):n}function z(e,t,n,...r){const o=m(e,t);return x(e,t,n(o,...r))}function zt(e,t){const n={};for(const r of i(t)){const o=e(r);z(n,o,q(T,[]),r)}return n}function Ct(e){const t={},n=q(U,0);for(const r of i(e))z(t,r,n);return t}class Vt{constructor(t){this.f=t}*[Symbol.iterator](){yield*i(this.f())}}function Wt(e){let t=[...i(e)];return t.pop(),t.length>0?t:null}function $t(...e){let[t,n]=e.length>1?e:[1,e[0]];return A((r,o)=>r,n,Q(t,n))}function Jt(e,t){return[Y(e,t),Q(e,t)]}function Ut(e,t){return[he(e,t),_e(e,t)]}function be(e){if(!e)return 0;const t=e.length||e.size;if(typeof t=="number")return t;let n=0;for(const r of i(e))n++;return n}function Zt(e){return e===!0}function Dt(e){return e===!1}function Ft(e){return e!=null}function Ht(e){return!!e}function Xt(e){return e===0}function en(e){return e<0}function tn(e){return e>0}function nn(...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 on(e,t,n){return e[t]=n,n}function un(e){for(const t of i(e));return null}function fn(e){return b(e)}function cn(e){return[...e]}function sn(e,t,n){return e._add_watch(t,n)}function ln(e,t){return e._remove_watch(t)}function an(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 v(e,t,...n){return t==null?e:n.length==0?e>t?e:t:v(v(e,t),...n)}function j(e,t,...n){return t==null?e:n.length==0?e<t?e:t:j(j(e,t),...n)}function pn(e){return e instanceof Object}function xn(...e){return(...t)=>{for(let n of e)for(let r of t)if(!n(r))return!1;return!0}}function dn(...e){return(...t)=>{for(let n of e)for(let r of t){let o=n(r);if(o)return o}}}function ge(e,t){return b(t||e)}function hn(e,t){var n=t;return f(function*(){for(;;)yield n,n=e(n)})}function _n(...e){return(...t)=>{let n=[];for(let r of e)n.push(r(...t));return n}}function Me(e){if(e instanceof Array){let t=e.slice(1);return t.length>0?t:null}else return Me(b(e))}function yn(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 wn(e){return ge(e)}function ve(e,t,n){return e.substring(t,n)}function mn(e){return typeof e=="function"}function*Re(e,t){let n=e.exec(t);if(n){let r=n[0],o=n.length===1?r:b(n);yield*ee(o,f(function*(){let u=n.index+v(1,r.length);u<=t.length&&(yield*Re(e,ve(t,u)))}))}}return Ie(An);})();
+var squint;(squint||={}).core=(()=>{var S=Object.defineProperty;var Qe=Object.getOwnPropertyDescriptor;var Ee=Object.getOwnPropertyNames;var Se=Object.prototype.hasOwnProperty;var je=(e,t)=>{for(var n in t)S(e,n,{get:t[n],enumerable:!0})},Oe=(e,t,n,r)=>{if(t&&typeof t=="object"||typeof t=="function")for(let o of Ee(t))!Se.call(e,o)&&o!==n&&S(e,o,{get:()=>t[o],enumerable:!(r=Qe(t,o))||r.enumerable});return e};var Ie=e=>Oe(S({},"__esModule",{value:!0}),e);var Qn={};je(Qn,{Atom:()=>re,IIterable:()=>T,IIterable__iterator:()=>H,LazySeq:()=>Wt,NaN_QMARK_:()=>bn,PROTOCOL_SENTINEL:()=>nt,_:()=>Te,_PLUS_:()=>Ne,_iterator:()=>K,aclone:()=>sn,add_watch:()=>ln,alength:()=>on,apply:()=>pt,array_QMARK_:()=>yt,aset:()=>un,assoc:()=>O,assoc_BANG_:()=>x,assoc_in:()=>W,assoc_in_BANG_:()=>Be,atom:()=>ut,boolean$:()=>Xt,butlast:()=>$t,coll_QMARK_:()=>Kn,comp:()=>Le,compare:()=>wn,complement:()=>ce,concat:()=>se,conj:()=>$,conj_BANG_:()=>N,cons:()=>ee,constantly:()=>dt,contains_QMARK_:()=>Pe,count:()=>be,cycle:()=>Et,dec:()=>ze,deref:()=>oe,disj:()=>Ge,disj_BANG_:()=>J,dissoc:()=>qe,dissoc_BANG_:()=>Ye,distinct:()=>St,doall:()=>cn,dorun:()=>fn,drop:()=>E,drop_last:()=>Jt,drop_while:()=>_e,empty:()=>xe,empty_QMARK_:()=>Pt,es6_iterator:()=>k,even_QMARK_:()=>fe,every_QMARK_:()=>we,every_pred:()=>dn,false_QMARK_:()=>Ft,ffirst:()=>Ve,filter:()=>L,filterv:()=>De,first:()=>g,fn_QMARK_:()=>An,fnil:()=>q,frequencies:()=>Vt,get:()=>m,get_in:()=>ye,group_by:()=>Ct,identical_QMARK_:()=>Rt,identity:()=>le,inc:()=>U,interleave:()=>ae,interpose:()=>mt,into:()=>de,into_array:()=>ge,iterable:()=>i,iterate:()=>_n,js_keys:()=>Mn,js_obj:()=>rn,juxt:()=>yn,keep:()=>Nt,keep_indexed:()=>Xe,keys:()=>Ke,last:()=>$e,lazy:()=>f,list:()=>_t,list_QMARK_:()=>ht,map:()=>A,map_QMARK_:()=>xn,map_indexed:()=>He,mapcat:()=>wt,mapv:()=>ie,max:()=>v,merge:()=>Mt,min:()=>j,neg_QMARK_:()=>tn,next:()=>Me,nil_QMARK_:()=>tt,not:()=>te,not_any_QMARK_:()=>Lt,not_every_QMARK_:()=>It,nth:()=>D,number_QMARK_:()=>gn,odd_QMARK_:()=>xt,partial:()=>Qt,partition:()=>gt,partition_all:()=>bt,pos_QMARK_:()=>nn,pr_str:()=>ne,println:()=>Z,prn:()=>ot,rand_int:()=>Ae,rand_nth:()=>Yt,range:()=>ft,re_matches:()=>ct,re_seq:()=>Re,reduce:()=>Ze,reduce_kv:()=>pn,reduced:()=>Je,reduced_QMARK_:()=>Ue,remove:()=>Fe,remove_watch:()=>an,repeat:()=>P,repeatedly:()=>zt,replace:()=>Gt,reset_BANG_:()=>ue,rest:()=>We,reverse:()=>Tt,satisfies_QMARK_:()=>ke,second:()=>Ce,select_keys:()=>At,seq:()=>X,seqable_QMARK_:()=>F,set:()=>at,shuffle:()=>Bt,some:()=>me,some_QMARK_:()=>Ht,some_fn:()=>hn,sort:()=>kt,split_at:()=>Ut,split_with:()=>Zt,str:()=>et,string_QMARK_:()=>Rn,subs:()=>ve,subvec:()=>st,swap_BANG_:()=>it,system_time:()=>vt,take:()=>Y,take_nth:()=>Kt,take_while:()=>he,to_array:()=>mn,true_QMARK_:()=>Dt,update:()=>jt,update_BANG_:()=>z,update_in:()=>Ot,vals:()=>vn,vec:()=>b,vector:()=>G,vector_QMARK_:()=>lt,zero_QMARK_:()=>en});function Ne(...e){return e.reduce((t,n)=>t+n,0)}function Te(...e){return e.reduce((t,n)=>t-n)}function ke(e,t){return t[e]}function x(e,t,n,...r){if(r.length%2!==0)throw new Error("Illegal argument: assoc expects an odd number of arguments.");switch(s(e)){case a:e.set(t,n);for(let o=0;o<r.length;o+=2)e.set(r[o],r[o+1]);break;case p:case d: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 O(e,t,n,...r){switch(e||(e={}),s(e)){case a:return x(new Map(e.entries()),t,n,...r);case p:return x([...e],t,n,...r);case d:return x({...e},t,n,...r);default:throw new Error("Illegal argument: assoc expects a Map, Array, or Object as the first argument.")}}const a=1,p=2,d=3,w=4,h=5,R=6;function I(e){switch(e){case a:return new Map;case p:return[];case d:return{};case w:return new Q;case h:return new Set;case R:return f(function*(){})}}function s(e){if(e instanceof Map)return a;if(e instanceof Set)return h;if(e instanceof Q)return w;if(e instanceof Array)return p;if(e instanceof B)return R;if(e instanceof Object)return d}function V(e,t,n,r,o){let u=s(n);if(u!==a&&u!==p&&u!==d)throw new Error(`Illegal argument: ${t} expects the first argument to be a Map, Array, or Object.`);const c=[n];let _=n;for(let l=0;l<r.length-1;l+=1){let C=r[l],y;_ instanceof Map?y=_.get(C):y=_[C],y||(y=I(u)),c.push(y),_=y}c.push(o);for(let l=c.length-2;l>=0;l-=1)c[l]=e(c[l],r[l],c[l+1]);return c[0]}function W(e,t,n){return V(O,"assoc-in",e,t,n)}function Be(e,t,n){return V(x,"assoc-in!",e,t,n)}function Le(...e){if(e.length===0)return le;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 N(...e){if(e.length===0)return G();let[t,...n]=e;switch(t==null&&(t=[]),s(t)){case h:for(const r of n)t.add(r);break;case w:t.unshift(...n.reverse());break;case p:t.push(...n);break;case a:for(const r of n)r instanceof Array?t.set(r[0],r[1]):i(r).forEach(o=>{t.set(o[0],o[1])});break;case d: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 $(...e){if(e.length===0)return G();let[t,...n]=e;switch(t==null&&(t=[]),s(t)){case h:return new Set([...t,...n]);case w:return new Q(...n.reverse(),...t);case p:return[...t,...n];case a:const r=new Map(t);for(const u of n)u instanceof Array?r.set(u[0],u[1]):i(u).forEach(c=>{r.set(c[0],c[1])});return r;case R:return f(function*(){yield*n,yield*t});case d: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 J(e,...t){for(const n of t)e.delete(n);return e}function Ge(e,...t){let n=new Set([...e]);return J(n,...t)}function Pe(e,t){switch(s(e)){case h:case a:return e.has(t);case void 0:return!1;default:return t in e}}function Ye(e,...t){for(const n of t)delete e[n];return e}function qe(e,...t){let n={...e};for(const r of t)delete n[r];return n}function U(e){return e+1}function ze(e){return e-1}function Z(...e){console.log(...e)}function D(e,t,n){if(e){var r=void 0;if(e instanceof Array)r=e[t];else{let o=i(e),u=0;for(let c of o)if(u++==t){r=c;break}}if(r!==void 0)return r}return n}function m(e,t,n=void 0){let r;switch(s(e)){case h:e.has(t)&&(r=t);break;case a:r=e.get(t);break;case void 0:break;default:r=e[t];break}return r!==void 0?r:n}function F(e){return typeof e=="string"||e===null||e===void 0||Symbol.iterator in e}function i(e){return e==null?[]:F(e)?e:Object.entries(e)}const T=Symbol("Iterable"),H=Symbol.iterator;function K(e){return e[Symbol.iterator]()}const k=K;function X(e){let t=i(e);return t.length===0||t.size===0?null:t}function g(e){let[t]=i(e);return t}function Ce(e){let[t,n]=i(e);return n}function Ve(e){return g(g(e))}function We(e){return f(function*(){let t=!0;for(const n of i(e))t?t=!1:yield n})}class M{value;constructor(t){this.value=t}_deref(){return this.value}}function $e(e){switch(e=i(e),s(e)){case p:return e[e.length-1];default:let t;for(const n of e)t=n;return t}}function Je(e){return new M(e)}function Ue(e){return e instanceof M}function Ze(e,t,n){let r,o;if(n===void 0){let u=i(t)[Symbol.iterator]();o=u.next().value,r=u}else o=t,r=i(n);if(o instanceof M)return o.value;for(const u of r)if(o=e(o,u),o instanceof M){o=o.value;break}return o}class B{constructor(t){this.gen=t}[Symbol.iterator](){return this.gen()}}B.prototype[T]=!0;function f(e){return new B(e)}function ee(e,t){return f(function*(){yield e,yield*i(t)})}function A(e,...t){switch(t.length){case 0:throw new Error("map with 2 arguments is not supported yet");case 1:return f(function*(){for(const n of i(t[0]))yield e(n)});default:return f(function*(){const n=t.map(r=>k(i(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 L(e,t){return f(function*(){for(const n of i(t))e(n)&&(yield n)})}function De(e,t){return[...L(e,t)]}function Fe(e,t){return L(ce(e),t)}function He(e,t){let n=[],r=0;for(const o of i(t))n.push(e(r,o)),r++;return n}function Xe(e,t){let n=[],r=0;for(const o of i(t)){let u=e(r,o);u&&n.push(u),r++}return n}function et(...e){return e.join("")}function te(e){return!e}function tt(e){return e==null}const nt={};function rt(e){return JSON.stringify(e,(t,n)=>{switch(s(n)){case h:case R:return[...n];case a:return Object.fromEntries(n);default:return n}})}function ne(...e){return e.map(rt).join(" ")}function ot(...e){Z(ne(...e))}function re(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 ut(e){return new re(e)}function oe(e){return e._deref()}function ue(e,t){e._reset_BANG_(t)}function it(e,t,...n){const r=t(oe(e),...n);return ue(e,r),r}function ft(e,t,n){return f(function*(){let r=e,o=t,u=n;t===void 0&&(r=0,o=e);let c=r||0;for(u=n||1;o===void 0||c<o;)yield c,c+=u})}function ct(e,t){let n=e.exec(t);if(n&&t===n[0])return n.length===1?n[0]:n}function st(e,t,n){return e.slice(t,n)}function G(...e){return e}function lt(e){return s(e)===p}function ie(...e){return[...A(...e)]}function b(e){return[...i(e)]}function at(e){return new Set(i(e))}function pt(e,...t){const n=t.slice(0,t.length-1),r=t[t.length-1];return e(...n,...r)}function fe(e){return e%2==0}function xt(e){return!fe(e)}function ce(e){return(...t)=>te(e(...t))}function dt(e){return(...t)=>e}class Q extends Array{constructor(...t){super(),this.push(...t)}}function ht(e){return s(e)===w}function _t(...e){return new Q(...e)}function yt(e){return e instanceof Array}function se(...e){return f(function*(){for(const t of e)yield*i(t)})}function wt(e,...t){return se(...A(e,...t))}function le(e){return e}function ae(...e){return f(function*(){const t=e.map(n=>k(i(n)));for(;;){let n=[];for(const r of t){const o=r.next();if(o.done)return;n.push(o.value)}yield*n}})}function mt(e,t){return E(1,ae(P(e),t))}function At(e,t){const n=s(e),r=I(n);for(const o of t){const u=m(e,o);u!=null&&x(r,o,u)}return r}function bt(e,...t){let n=e,r=t[0];return t.length===2&&([n,r]=t),pe(e,n,[],r,!0)}function gt(e,...t){let n=e,r=[],o=t[0];return t.length===2?[n,o]=t:t.length>2&&([n,r,o]=t),pe(e,n,r,o,!1)}function pe(e,t,n,r,o){return f(function*(){let u=[],c=0;for(let _ of i(r))c<e&&(u.push(_),u.length===e&&(yield u,u=t<e?u.slice(t):[])),c++,c===t&&(c=0);u.length>0&&(u.length===e||o?yield u:n.length&&(u.push(...n.slice(0,e-u.length)),yield u))})}function xe(e){const t=s(e);return I(t)}function Mt(...e){const t=e[0];let n;return t==null?n={}:n=de(xe(t),t),N(n,...e.slice(1))}function vt(){return performance.now()}function de(...e){switch(e.length){case 0:return[];case 1:return e[0];default:return $(e[0]??[],...i(e[1]))}}function Rt(e,t){return e===t}function P(...e){if(e.length==0||e.length>2)throw new Error(`Invalid arity: ${e.length}`);return{[T]:!0,[H]: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 Y(e,t){return f(function*(){let n=e-1;for(const r of i(t))if(n-->=0&&(yield r),n<0)return})}function he(e,t){return f(function*(){for(const n of i(t))if(e(n))yield n;else return})}function Kt(e,t){return e<=0?P(g(t)):f(function*(){let n=0;for(let r of i(t))n%e===0&&(yield r),n++})}function Qt(e,...t){return function(...n){return e(...t,...n)}}function Et(e){return f(function*(){for(;;)yield*e})}function E(e,t){return f(function*(){let n=K(i(t));for(let r=0;r<e;r++)n.next();yield*n})}function _e(e,t){return f(function*(){let n=K(i(t));for(;;){let r=n.next();if(r.done)break;let o=r.value;if(!e(o)){yield o;break}}yield*n})}function St(e){return f(function*(){let t=new Set;for(const n of i(e))t.has(n)||(yield n),t.add(n)})}function jt(e,t,n,...r){return O(e,t,n(m(e,t),...r))}function ye(e,t,n){let r=e;for(const o of t)r=m(r,o);return r===void 0?n:r}function Ot(e,t,n,...r){return W(e,t,n(ye(e,t),...r))}function q(e,t,...n){return function(r,...o){return r?e(r,...n,...o):e(t,...n,...o)}}function we(e,t){for(let n of i(t))if(!e(n))return!1;return!0}function It(e,t){return!we(e,t)}function Nt(e,t){return f(function*(){for(const n of i(t)){const r=e(n);r&&(yield r)}})}function Tt(e){return e instanceof Array?e.reverse():[...e].reverse()}function kt(e,t){return t===void 0&&(t=e,e=void 0),[...t].sort(e)}function Bt(e){return[...e].sort(function(t,n){return Math.random()-.5})}function me(e,t){for(const n of i(t)){const r=e(n);if(r)return r}}function Lt(e,t){return!me(e,t)}function Gt(e,t){return(t instanceof Array?ie:A)(r=>{const o=e[r];return o!==void 0?o:r},t)}function Pt(e){return!X(e)}function Ae(e){return Math.floor(Math.random()*e)}function Yt(e){let t=Ae(be(e));return D(e,t)}function qt(e){return f(function*(){for(;;)yield e()})}function zt(e,t){t===void 0&&(t=e,e=void 0);const n=qt(t);return e?Y(e,n):n}function z(e,t,n,...r){const o=m(e,t);return x(e,t,n(o,...r))}function Ct(e,t){const n={};for(const r of i(t)){const o=e(r);z(n,o,q(N,[]),r)}return n}function Vt(e){const t={},n=q(U,0);for(const r of i(e))z(t,r,n);return t}class Wt{constructor(t){this.f=t}*[Symbol.iterator](){yield*i(this.f())}}function $t(e){let t=[...i(e)];return t.pop(),t.length>0?t:null}function Jt(...e){let[t,n]=e.length>1?e:[1,e[0]];return A((r,o)=>r,n,E(t,n))}function Ut(e,t){return[Y(e,t),E(e,t)]}function Zt(e,t){return[he(e,t),_e(e,t)]}function be(e){if(!e)return 0;const t=e.length||e.size;if(typeof t=="number")return t;let n=0;for(const r of i(e))n++;return n}function Dt(e){return e===!0}function Ft(e){return e===!1}function Ht(e){return e!=null}function Xt(e){return!!e}function en(e){return e===0}function tn(e){return e<0}function nn(e){return e>0}function rn(...e){var t=0;let n={};for(;!(t>=e.length);)n[e[t]]=e[t+1],t=t+2;return n}function on(e){return e.length}function un(e,t,n){return e[t]=n,n}function fn(e){for(const t of i(e));return null}function cn(e){return b(e)}function sn(e){return[...e]}function ln(e,t,n){return e._add_watch(t,n)}function an(e,t){return e._remove_watch(t)}function pn(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 v(e,t,...n){return t==null?e:n.length==0?e>t?e:t:v(v(e,t),...n)}function j(e,t,...n){return t==null?e:n.length==0?e<t?e:t:j(j(e,t),...n)}function xn(e){return e instanceof Object}function dn(...e){return(...t)=>{for(let n of e)for(let r of t)if(!n(r))return!1;return!0}}function hn(...e){return(...t)=>{for(let n of e)for(let r of t){let o=n(r);if(o)return o}}}function ge(e,t){return b(t||e)}function _n(e,t){var n=t;return f(function*(){for(;;)yield n,n=e(n)})}function yn(...e){return(...t)=>{let n=[];for(let r of e)n.push(r(...t));return n}}function Me(e){if(e instanceof Array){let t=e.slice(1);return t.length>0?t:null}else return Me(b(e))}function wn(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 mn(e){return ge(e)}function ve(e,t,n){return e.substring(t,n)}function An(e){return typeof e=="function"}function*Re(e,t){let n=e.exec(t);if(n){let r=n[0],o=n.length===1?r:b(n);yield*ee(o,f(function*(){let u=n.index+v(1,r.length);u<=t.length&&(yield*Re(e,ve(t,u)))}))}}function bn(e){return Number.isNaN(e)}function gn(e){return typeof e=="number"}function Ke(e){return e?Object.keys(e):null}function Mn(e){return Ke(e)}function vn(e){return e?Object.values(e):null}function Rn(e){return typeof e=="string"}function Kn(e){return s(e)!=null}return Ie(Qn);})();

package/package.json

@@ -2,7 +2,7 @@
   "name": "squint-cljs",
   "type": "module",
   "sideEffects": false,
-  "version": "0.3.34",
+  "version": "0.3.36",
   "files": [
     "core.js",
     "src/squint/core.js",

package/src/squint/core.js

@@ -1395,3 +1395,40 @@ export function* re_seq(re, s) {
     }));
   }
 }
+
+export function NaN_QMARK_(x) {
+  return Number.isNaN(x);
+}
+
+export function number_QMARK_(x) {
+  return typeof x == 'number';
+}
+
+export function keys(obj) {
+  if (obj) {
+    return Object.keys(obj);
+  }
+  else {
+    return null;
+  }
+}
+
+export function js_keys(obj) {
+  return keys(obj);
+}
+
+export function vals(obj) {
+  if (obj) {
+    return Object.values(obj);
+  } else {
+    return null;
+  }
+}
+
+export function string_QMARK_(s) {
+  return typeof(s) === 'string';
+}
+
+export function coll_QMARK_(coll) {
+  return typeConst(coll) != undefined;
+}