@naanlang/naan 1.7.0 → 1.7.2

package/lib/core/naanlib.js

@@ -1,7 +1,7 @@
 /*
  * naan.min.js
  *
- * Naan for NPM version 1.7.0+1 is released under the MIT License:
+ * Naan for NPM version 1.7.2+2 is released under the MIT License:
  * 
  * Copyright (c) 2017-2026 Zulch Laboratories, Inc.
  * 
@@ -31,16 +31,16 @@
 !function(n){n.LeemonBigIntegerLib=function(){for(var s=0,c=0,v=c+1,g="0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz_=!@#$%^&*()[]{}|;:,.<>/?`~ \\'\"+-",s=0;1<<s<1<<s+1;s++);v=(c=(1<<(s>>=1))-1)+1;var l=rn(1,1,1),a=new Array(0),e=a,i=a,u=a,r=a,f=a,h=a,d=a,M=a,w=a,o=a,y=a,A=a,b=a,m=a,I=a,k=a,p=a,x=a,E=a,P=a,S=a,B=a,L=a,N=a,R=a,T=a,_=a,q=a,O=a,U=a,z=a,C=a,D=a;function G(n){for(var t,r,e=new Array(n),f=0;f<n;f++)e[f]=0;for(e[0]=2,t=0;e[t]<n;){for(f=e[t]*e[t];f<n;f+=e[t])e[f]=1;for(e[++t]=e[t-1]+1;e[t]<n&&e[e[t]];e[t]++);}for(r=new Array(t),f=0;f<t;f++)r[f]=e[f];return r}function Y(n,t){return o.length!=n.length&&(o=on(n),y=on(n),A=on(n)),gn(A,t),Z(n,A)}function Z(n,t){var r,e,f,h;for(o.length!=n.length&&(o=on(n),y=on(n),A=on(n)),ln(A,t),ln(y,n),ln(o,n),un(y,-1),un(o,-1),r=f=0;r<y.length;r++)for(e=1;e<c;e<<=1)n[r]&e?(h=f<y.length+s?f:0,r=y.length,e=c):f++;if(h&&an(y,h),Pn(A,y,n),!en(A,1)&&!fn(A,o)){for(e=1;e<=h-1&&!fn(A,o);){if(pn(A,n),en(A,1))return 0;e++}if(!fn(A,o))return 0}return 1}function j(n){for(var t,r,e=n.length-1;0==n[e]&&0<e;e--);for(t=0,r=n[e];r;r>>=1,t++);return t+=s*e}function F(n,t){t=rn(0,(n.length>t?n.length:t)*s,0);return ln(t,n),t}function t(n,t){var r,e,f=rn(0,n,0);for(0==E.length&&(E=G(3e4)),D.length!=f.length&&(D=on(f));;){for(J(f,n,0),f[0]|=1,r=e=0;r<E.length&&E[r]<=3e4;r++)if(0==tn(f,E[r])&&!en(f,E[r])){e=1;break}for(r=0;r<t&&!e;r++){for(J(D,n,0);!X(f,D);)J(D,n,0);Z(f,D)||(e=1)}if(!e)return f}}function H(n){if(V(n)){for(r=n.length;0<r&&n[r-1]==c;r--);++r}else for(r=n.length;0<r&&!n[r-1];r--);for(var t=F(n,r),r=t.length;0<=--r;)t[r]=~t[r]&c;return An(t,l),t=xn(t,1)}function J(n,t,r){for(var e,f=0;f<n.length;f++)n[f]=0;for(e=Math.floor((t-1)/s)+1,f=0;f<e;f++)n[f]=Math.floor(Math.random()*(1<<s-1));n[e-1]&=(2<<(t-1)%s)-1,1==r&&(n[e-1]|=1<<(t-1)%s)}function K(n,t){var r,e,f,h,o,l,i,g,u;for(M.length!=n.length&&(M=on(n)),u=1;u;){for(u=0,r=1;r<t.length;r++)if(t[r]){u=1;break}if(!u)break;for(r=n.length;!n[r]&&0<=r;r--);for(e=n[r],f=t[r],l=o=0,i=h=1;f+l&&f+i&&(g=Math.floor((e+h)/(f+l)))==Math.floor((e+o)/(f+i));)a=h-g*l,h=l,l=a,a=o-g*i,o=i,i=a,a=e-g*f,e=f,f=a;o?(ln(M,n),Mn(n,t,h,o),Mn(t,M,i,l)):(In(n,t),ln(M,n),ln(n,t),ln(t,M))}if(0!=t[0])for(a=tn(n,t[0]),gn(n,t[0]),t[0]=a;t[0];)n[0]%=t[0],a=n[0],n[0]=t[0],t[0]=a}function Q(n,t){for(var r=1,e=0;;){if(1==n)return r;if(0==n)return 0;if(e-=r*Math.floor(t/n),1==(t%=n))return e;if(0==t)return 0;r-=e*Math.floor(n/t),n%=t}}function V(n){return n[n.length-1]==c}function W(n,t,r){for(var e=n.length,f=t.length,h=e+r<f?e+r:f,o=f-1-r;o<e&&0<=o;o++)if(0<n[o])return 1;for(o=e-1+r;o<f;o++)if(0<t[o])return 0;for(o=h-1;r<=o;o--){if(n[o-r]>t[o])return 1;if(n[o-r]<t[o])return 0}return 0}function X(n,t){for(var r=(n.length<t.length?n:t).length,e=n.length;e<t.length;e++)if(t[e])return 0;for(e=t.length;e<n.length;e++)if(n[e])return 1;for(e=r-1;0<=e;e--){if(n[e]>t[e])return 1;if(n[e]<t[e])return 0}return 0}function $(n,t,r,e){var f,h,o,l,i,g,u,a;for(ln(e,n),h=t.length;0==t[h-1];h--);for(a=t[h-1],u=0;a;u++)a>>=1;for(sn(t,u=s-u),sn(e,u),f=e.length;0==e[f-1]&&h<f;f--);for(gn(r,0);!W(t,e,f-h);)!function(n,t,r){var e,f,h,o;for(h=n.length<r+t.length?n.length:r+t.length,o=n.length,f=0,e=r;e<h;e++)f+=n[e]-t[e-r],n[e]=f&c,f>>=s;for(e=h;f&&e<o;e++)f+=n[e],n[e]=f&c,f>>=s}(e,t,f-h),r[f-h]++;for(o=f-1;h<=o;o--){for(e[o]==t[h-1]?r[o-h]=c:r[o-h]=Math.floor((e[o]*v+e[o-1])/t[h-1]);g=(i=(1<h?t[h-2]:0)*r[o-h])>>s,i&=c,g=(l=g+r[o-h]*t[h-1])>>s,l&=c,g==e[o]?l==e[o-1]?i>(1<o?e[o-2]:0):l>e[o-1]:g>e[o];)r[o-h]--;wn(e,t,-r[o-h],o-h),V(e)&&(function(n,t,r){var e,f,h,o;for(h=n.length<r+t.length?n.length:r+t.length,o=n.length,f=0,e=r;e<h;e++)f+=n[e]+t[e-r],n[e]=f&c,f>>=s;for(e=h;f&&e<o;e++)f+=n[e],n[e]=f&c,f>>=s}(e,t,o-h),r[o-h]--)}an(t,u),an(e,u)}function nn(n){for(var t,r=n.length,e=0,f=0;f<r;f++)(e+=n[f])<(t=0)&&(e+=(t=-(e>>s))*v),n[f]=e&c,e=(e>>s)-t}function tn(n,t){for(var r=0,e=n.length-1;0<=e;e--)r=(r*v+n[e])%t;return r}function rn(n,t,r){t=Math.ceil(t/s)+1;t=t<r?r:t;t=new Array(t);return gn(t,n),t}function en(n,t){var r;if(n[0]!=t)return 0;for(r=1;r<n.length;r++)if(n[r])return 0;return 1}function fn(n,t){for(var r=(n.length<t.length?n:t).length,e=0;e<r;e++)if(n[e]!=t[e])return 0;if(n.length>t.length){for(;e<n.length;e++)if(n[e])return 0}else for(;e<t.length;e++)if(t[e])return 0;return 1}function hn(n){for(var t=0;t<n.length;t++)if(n[t])return 0;return 1}function on(n){var t=new Array(n.length);return ln(t,n),t}function ln(n,t){for(var r=(n.length<t.length?n:t).length,e=0;e<r;e++)n[e]=t[e];if(t[t.length-1]==c)for(e=r;e<n.length;e++)n[e]=c;else for(e=r;e<n.length;e++)n[e]=0}function gn(n,t){for(var r=t,e=0;e<n.length;e++)n[e]=r&c,2147483647<r?r/=c+1:r>>=s}function un(n,t){var r,e,f,h;for(n[0]+=t,e=n.length,r=f=0;r<e;r++)if((f+=n[r])<(h=0)&&(f+=(h=-(f>>s))*v),n[r]=f&c,!(f=(f>>s)-h))return}function an(n,t){var r,e=Math.floor(t/s);if(e){for(r=0;r<n.length-e;r++)n[r]=n[r+e];for(;r<n.length;r++)n[r]=0;t%=s}for(r=0;r<n.length-1;r++)n[r]=c&(n[r+1]<<s-t|n[r]>>t);n[r]>>=t}function cn(n){for(var t=0;t<n.length-1;t++)n[t]=c&(n[t+1]<<s-1|n[t]>>1);n[t]=n[t]>>1|n[t]&v>>1}function sn(n,t){var r,e=Math.floor(t/s);if(e){for(r=n.length;e<=r;r--)n[r]=n[r-e];for(;0<=r;r--)n[r]=0;t%=s}if(t){for(r=n.length-1;0<r;r--)n[r]=c&(n[r]<<t|n[r-1]>>s-t);n[r]=c&n[r]<<t}}function vn(n,t){var r,e,f,h;if(t)for(e=n.length,r=f=0;r<e;r++)(f+=n[r]*t)<(h=0)&&(f+=(h=-(f>>s))*v),n[r]=f&c,f=(f>>s)-h}function dn(n,t){for(var r,e=0,f=n.length-1;0<=f;f--)r=e*v+n[f],n[f]=Math.floor(r/t),e=r%t;return e}function Mn(n,t,r,e){for(var f=(n.length<t.length?n:t).length,h=n.length,o=0,l=0;l<f;l++)o+=r*n[l]+e*t[l],n[l]=o&c,o>>=s;for(l=f;l<h;l++)o+=r*n[l],n[l]=o&c,o>>=s}function wn(n,t,r,e){for(var f=n.length<e+t.length?n.length:e+t.length,h=n.length,o=0,l=e;l<f;l++)o+=n[l]+r*t[l-e],n[l]=o&c,o>>=s;for(l=f;o&&l<h;l++)o+=n[l],n[l]=o&c,o>>=s}function yn(n,t){for(var r=(n.length<t.length?n:t).length,e=0,f=0;f<r;f++)e+=n[f]-t[f],n[f]=e&c,e>>=s;for(t[t.length-1]==c&&(e=e<0?0:1),f=r;e&&f<n.length;f++)e+=n[f],n[f]=e&c,e>>=s}function An(n,t){for(var r=(n.length<t.length?n:t).length,e=0,f=0;f<r;f++)e+=n[f]+t[f],n[f]=e&c,e>>=s;for(t[t.length-1]==c&&(e=0<e?0:-1),f=r;e&&f<n.length;f++)e+=n[f],n[f]=e&c,e>>=s}function bn(n){for(var t=n.length,r=0;r<t;r++)n[r]^=c}function mn(n,t){var r;for(e.length!=2*n.length&&(e=new Array(2*n.length)),gn(e,0),r=0;r<t.length;r++)t[r]&&wn(e,n,t[r],r);ln(n,e)}function In(n,t){r.length!=n.length?r=on(n):ln(r,n),f.length!=n.length&&(f=on(n)),$(r,t,f,n)}function kn(n,t,r){var e;for(i.length!=2*n.length&&(i=new Array(2*n.length)),gn(i,0),e=0;e<t.length;e++)t[e]&&wn(i,n,t[e],e);In(i,r),ln(n,i)}function pn(n,t){for(var r,e,f,h,o=n.length;0<o&&!n[o-1];o--);for(h=o>t.length?2*o:2*t.length,i.length!=h&&(i=new Array(h)),gn(i,0),r=0;r<o;r++){for(f=i[2*r]+n[r]*n[r],i[2*r]=f&c,f>>=s,e=r+1;e<o;e++)f=i[r+e]+2*n[r]*n[e]+f,i[r+e]=f&c,f>>=s;i[r+o]=f}In(i,t),ln(n,i)}function xn(n,t){var r;if(n[n.length-1]==c)for(r=n.length;0<r&&n[r-1]==c;r--);else for(r=n.length;0<r&&!n[r-1];r--);return ln(t=new Array(r+t),n),t}function En(n){return ans=on(n),bn(ans),xn(ans,1)}function Pn(n,t,r){var e,f,h,o;if(d.length!=r.length&&(d=on(r)),0!=(1&r[0])){for(gn(d,0),h=r.length;0<h&&!r[h-1];h--);for(o=v-Q(tn(r,v),v),d[h]=1,kn(n,d,r),u.length!=n.length?u=on(n):ln(u,n),e=t.length-1;0<e&!t[e];e--);if(0!=t[e]){for(f=1<<s-1;f&&!(t[e]&f);f>>=1);for(;;){if(!(f>>=1)){if(--e<0)return void Sn(n,l,r,o);f=1<<s-1}Sn(n,n,r,o),f&t[e]&&Sn(n,u,r,o)}}else gn(n,1)}else for(ln(d,n),gn(n,1);!en(t,0);)1&t[0]&&kn(n,d,r),dn(t,2),pn(d,r)}function Sn(n,t,r,e){var f,h,o,l,i,g,u=r.length,a=t.length;for(w.length!=u&&(w=new Array(u)),gn(w,0);0<u&&0==r[u-1];u--);for(;0<a&&0==t[a-1];a--);for(g=w.length-1,f=0;f<u;f++){for(o=(i=w[0]+n[f]*t[0])+(l=(i&c)*e&c)*r[0]>>s,i=n[f],h=1;h<a-4;)o+=w[h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,h++;for(;h<a;)o+=w[h]+l*r[h]+i*t[h],w[h-1]=o&c,o>>=s,h++;for(;h<u-4;)o+=w[h]+l*r[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h],w[h-1]=o&c,o>>=s,o+=w[++h]+l*r[h],w[h-1]=o&c,o>>=s,h++;for(;h<u;)o+=w[h]+l*r[h],w[h-1]=o&c,o>>=s,h++;for(;h<g;)o+=w[h],w[h-1]=o&c,o>>=s,h++;w[h-1]=o&c}X(r,w)||yn(w,r),ln(n,w)}this.add=function(n,t){return An(n=F(n,n.length>t.length?n.length+1:t.length+1),t),xn(n,1)},this.addInt=function(n,t){return un(n=F(n,n.length+1),t),xn(n,1)},this.bigInt2str=function(n,t){var r,e,f="";if(h.length!=n.length?h=on(n):ln(h,n),-1==t){for(r=n.length-1;0<r;r--)f+=n[r]+",";f+=n[0]}else for(;!hn(h);)e=dn(h,t),f=g.substring(e,e+1)+f;return 0==f.length&&(f="0"),f},this.bitSize=j,this.divide_=$,this.dup=on,this.equals=fn,this.equalsInt=en,this.expand=F,this.findPrimes=G,this.GCD=function(n,t){return K(n=on(n),on(t)),n},this.greater=X,this.greaterShift=W,this.int2bigInt=rn,this.inverseMod=function(n,t){return function(n,t){var r=1+2*Math.max(n.length,t.length);if(!(1&n[0]||1&t[0]))return gn(n,0),0;m.length!=r&&(m=new Array(r),b=new Array(r),I=new Array(r),k=new Array(r),p=new Array(r),x=new Array(r));for(ln(m,n),ln(b,t),gn(I,1),gn(k,0),gn(p,0),gn(x,1);;){for(;!(1&m[0]);)cn(m),1&I[0]||1&k[0]?(An(I,t),cn(I),yn(k,n)):cn(I),cn(k);for(;!(1&b[0]);)cn(b),1&p[0]||1&x[0]?(An(p,t),cn(p),yn(x,n)):cn(p),cn(x);if(X(b,m)?(yn(b,m),yn(p,I),yn(x,k)):(yn(m,b),yn(I,p),yn(k,x)),en(m,0)){for(;V(p);)An(p,t);return ln(n,p),en(b,1)?1:(gn(n,0),0)}}}(n=F(n,t.length),t)?xn(n,1):null},this.inverseModInt=Q,this.isZero=hn,this.millerRabin=Z,this.millerRabinInt=Y,this.mod=function(n,t){return In(n=on(n),t),xn(n,1)},this.modInt=tn,this.mult=function(n,t){return mn(n=F(n,n.length+t.length),t),xn(n,1)},this.multMod=function(n,t,r){return kn(n=F(n,r.length),t,r),xn(n,1)},this.negative=V,this.powMod=function(n,t,r){return Pn(n=F(n,r.length),xn(t,2),xn(r,2)),xn(n,1)},this.randBigInt=function(n,t){var r=rn(0,0,Math.floor((n-1)/s)+2);return J(r,n,t),r},this.randTruePrime=function(n){var t=rn(0,n,0);return function n(t,r){var e,f,h,o,l,i,g,u,a,c;0==E.length&&(E=G(3e4));if(0==P.length)for(P=new Array(512),h=0;h<512;h++)P[h]=Math.pow(2,h/511-1);0;0;B.length!=t.length&&(B=on(t),L=on(t),T=on(t),q=on(t),z=on(t),on(t),on(t),U=on(t),O=on(t),S=on(t),N=on(t),R=on(t),_=on(t),C=on(t));if(r<=20){for(e=(1<<(r+2>>1))-1,gn(t,0),f=1;f;)for(t[f=0]=1|1<<r-1|Math.floor(Math.random()*(1<<r)),h=1;h<E.length&&(E[h]&e)==E[h];h++)if(0==t[0]%E[h]){f=1;break}return void nn(t)}l=.1*r*r;if(40<r)for(o=1;r-r*o<=20;)o=P[Math.floor(512*Math.random())];else o=.5;c=Math.floor(o*r)+1;n(R,c);gn(B,0);B[Math.floor((r-2)/s)]|=1<<(r-2)%s;$(B,R,S,N);u=j(S);for(;;){for(;J(L,u,0),!X(S,L););for(un(L,1),An(L,S),ln(O,R),mn(O,L),vn(O,2),un(O,1),ln(q,L),vn(q,2),h=i=0;h<E.length&&E[h]<l;h++)if(0==tn(O,E[h])&&!en(O,E[h])){i=1;break}if(i||Y(O,2)||(i=1),!i){for(un(O,-3),h=O.length-1;0==O[h]&&0<h;h--);for(a=0,g=O[h];g;g>>=1,a++);for(a+=s*h;J(_,a,0),!X(O,_););if(un(O,3),un(_,2),ln(U,_),ln(T,O),un(T,-1),Pn(U,T,O),un(U,-1),hn(U)&&(ln(U,_),Pn(U,q,O),un(U,-1),ln(C,O),ln(z,U),K(z,O),en(z,1)))return void ln(t,C)}}}(t,n),xn(t,1)},this.randProbPrime=function(n){return t(n,600<=n?2:550<=n?4:500<=n?5:400<=n?6:350<=n?7:300<=n?9:250<=n?12:200<=n?15:150<=n?18:100<=n?27:40)},this.str2bigInt=function(n,t,r){var e,f,h,o,l,i=n.length;if(-1==t){for(h=new Array(0);;){for(o=new Array(h.length+1),f=0;f<h.length;f++)o[f+1]=h[f];if(o[0]=parseInt(n,10),h=o,(e=n.indexOf(",",0))<1)break;if(0==(n=n.substring(e+1)).length)break}return h.length<r?(ln(o=new Array(r),h),o):h}for(h=rn(0,t*i,0),f=0;f<i&&(e=g.indexOf(n.substring(f,f+1),0),t<=36&&36<=e&&(e-=26),!(t<=e||e<0));f++)vn(h,t),un(h,e);for(i=h.length;0<i&&!h[i-1];i--);for(i=i+1<r?r:i+1,o=new Array(i),l=i<h.length?i:h.length,f=0;f<l;f++)o[f]=h[f];for(;f<i;f++)o[f]=0;return o},this.negate=H,this.sub=function(n,t){return yn(n=F(n,n.length>t.length?n.length+1:t.length+1),t),xn(n,1)},this.trim=xn,this.uint82bigInt=function(n){for(var t=n.length,r=8*n.BYTES_PER_ELEMENT,e=t*r,e=Math.trunc((e+s-1)/s),f=new Array(e+1),h=0,o=0,l=0,i=0,h=t-1;0<=h;--h)for(l|=n[h]<<i,i+=r;s<=i;)f[o++]=l&c,l>>=s,i-=s;for(;o<f.length;){if(0==(f[o++]=l)){f.length=o;break}l=0}return f},this.bigInt2uint8=function(n){var t;for(n[n.length-1]==c&&(n=H(n)),t=n.length;0<t&&!n[t-1];t--);for(var r=t*s,r=Math.trunc((8+r-1)/8),e=new Uint8Array(r),f=0,h=r,o=0,l=0,f=0;f<t;++f)for(o|=n[f]<<l,l+=s;8<=l;)e[--h]=o,o>>=8,l-=8;return 0<h&&(0==o?e=new Uint8Array(e.slice(h)):e[--h]=o),e},this.rightShift=function(n,t){var r=!1,e=V(n)?(r=!0,En(n)):on(n);if(t>e.length*s)e=[0];else{for(;s<=t;)an(e,s-1),t-=s-1;0<t&&an(e,t)}return r&&bn(e),xn(e,1)},this.leftShift=function(n,t){for(var r=F(n,n.length+Math.trunc((t+s)/s));s<=t;)sn(r,s-1),t-=s-1;return 0<t&&sn(r,t),xn(r,1)},this.and=function(n,t){return n=1==n.length&&n[0]==c?[c,c]:on(n),1==t.length&&t[0]==c&&(t=[c,c]),function(n,t){for(var r=(n.length<t.length?n:t).length,e=0;e<r;e++)n[e]&=t[e];for(e=r;e<n.length;e++)n[e]=0}(n,t),xn(n,1)},this.or=function(n,t){var r;return n.length<t.length&&(r=n,n=t,t=r),n=1==n.length&&n[0]==c?[c,c]:on(n),1==t.length&&t[0]==c&&(t=[c,c]),function(n,t){for(var r=(n.length<t.length?n:t).length,e=0;e<r;e++)n[e]|=t[e]}(n,t),xn(n,1)},this.xor=function(n,t){var r;return n.length<t.length&&(r=n,n=t,t=r),n=1==n.length&&n[0]==c?[c,c]:on(n),1==t.length&&t[0]==c&&(t=[c,c]),function(n,t){for(var r=(n.length<t.length?n:t).length,e=0;e<r;e++)n[e]^=t[e]&c}(n,t),xn(n,1)},this.not=En}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
 
 /* Copyright (c) 2017-2026 by Zulch Laboratories, Inc. */
-!function(qo){qo.NaanInterpreter=function(){"use strict";var D,L=new(qo.LeemonBigIntegerLib?qo:require("./bigint.js")).LeemonBigIntegerLib,b=qo.NaanChannel?qo:require("./naan_io.js"),s={Number:Number,String:String,Date:Date,RegExp:RegExp,Array:Array,Math:Math,Promise:Promise},m={Number:Number,String:String,Date:Date,RegExp:RegExp};function K(e){return e instanceof Array||"[object Array]"===Object.prototype.toString.apply(e)}var k=Math.log2(Number.MAX_SAFE_INTEGER),i=Math.log2(Number.MAX_VALUE),n=131072,p="\b\f\n\0\r\t\v ~`@#$%^&*()_+-={}|[]\\:\";'<>?,./",a={ignoreWriteParamOnFalse:!0},y=this,ee=1,re=2,ne=3,te=4,ie=5,ae=6,S=7,ue=8,oe=9,w=10,g=0,O=1,N=2,fe=2,ce=3,se=4,le=5,x=2,pe=3,ge=3,ve=3,de=3,he=3,j=2,be=3,ye=4,l=N+1,P=le+1,t=pe+1,u=ge+1,o=ve+1,f=N+1,c=he+1,U=ye+1,A={},me=null;function ke(e){return e&&e!==me&&e!==qe&&e!==Fe}function we(e){return e===Ue||e===Be||e===De||e===Le||e===Xe||e===ze}function T(e){return e?Re:me}function v(e){return e===D?qe:null===e?Fe:e}function xe(e){for(var r=me,n=e.length-1;0<=n;--n)r=We(e[n],r);return r}function Se(e){for(var r=[];e[g]===ee;)r.push(e[O]),e=e[N];return r}function d(e,r){for(var n=Object.getOwnPropertyNames(r),t=0;t<n.length;++t){var i=n[t];e[i]=r[i]}}function h(e,r){return e===me?me:(r&&r!==me||(r=fa()),Lu(e)!==me&&d(r[he],e[he]),r)}function E(e){for(var r=0;e[0]===re;){if(++r>It)return me;if(e[ce]!==me)e=e[ce];else{if(e[1]===e)break;e=e[1]}}return e}var X,z,G,J,Oe=[],Z=[],M=1e5;function V(){Oe=[],Z=[],X=Q(Me("NaanRoot")),z=Q(Me("NaanCore")),G=Q(Me("NaanConst")),Oe.pop(),Z.push(z),J=X}function Q(e,r){return e===D?me:(r===D&&(r=new Array(U)),r[0]=w,(r[1]=r)[2]=e,r[3]=[],r[4]={},Oe.push(r),r)}function Ne(e){e=e&&e[0]===w?oo(e[j]):"nowhere";return e}function I(e,r){for(var n=[],t=xe(Z);e[g]===ee;){var i=e[O];i===me&&(i=X),i[0]===w&&n.indexOf(i)<0&&n.push(i),e=e[N]}if(0<n.length){if(!r&&n[0]!==Z[0]&&J!=n[0]&&J!==X)return xi(_e(["internal","$"+oo(J)+": no privileges to activate "+Ne(n[0])])),me;Z=n}return t}function W(l){var e,r,n,p=new WeakMap,g={};function v(e){e=function e(r){var n;if("object"!=typeof r)return r;if(p.get(r))return p.get(r);switch(p.set(r,r),r[0]){case ee:for(var t=r;;){var i=t[1],a=t[2];if(t[1]=v(i),a===me)break;if(a[0]!==ee){t[2]=v(a);break}if(t=a,p.get(t))break;p.set(t,t)}return r;case oe:if(r[se]===l)p.set(r,me),r=me;else if(ua(r[he])){var u=r[he];if(K(r[he]))for(var o=0;o<u.length;++o)(n=e(u[o]))===g?u.splice(o,1):u[o]=n;else for(var f,c=Object.getOwnPropertyNames(u),s=0;s<c.length;++s)(n=e(u[f=c[s]]))===g?delete u[f]:u[f]=n}return r;case re:return r[se]===l?((r[1]=r)[2]=me,r[3]=me,r[4]=me):(r[1]=v(r[1]),r[2]=v(r[2]),r[3]=v(r[3])),r}return r}(e);return e===g?me:e}for(p.set(g,g),p.set(l,g),e=0;e<Oe.length;++e)if(Oe[e]!==l)for(n=Oe[e][be],r=0;r<n.length;++r)v(n[r]);for(var t=1;t<=dt;++t)vt[t-1]=v(vt[t-1]);var i=Z.indexOf(l);0<=i&&Z.splice(i,1),0<=(i=Oe.indexOf(l))&&Oe.splice(i,1)}function $(e){for(var r=0;r<Z.length;++r){var n=Z[r];if(n[ye].hasOwnProperty(e)){var t=n[ye][e];return n[be][t]}}return!1}function _(e,r){return!!r[ye].hasOwnProperty(e)&&r[be][r[ye][e]]}var H={};function q(e){var r=new Array(P);return me||(me=r,V()),r[0]=re,(r[1]=r)[2]=me,r[3]=me,r[4]=me,r[5]=e,r}function F(e){var r,n,t=$(e);return t||(t=q(e),r=t,n=Z[0],e=r[le],t=n[ye][e],n[be][t]===r||((r[se]=n)[ye][e]=n[be].length,n[be].push(r)),r)}function R(e){e=$(e);return e||me}function C(e,r){var n,t;for(n in r)if(t=_(e,r[n]))return t;return me}function B(e,r){return C(r,[e[se],X,z])}function Y(e){if(e[se][0]!==w)return-1;var r=Oe.indexOf(e[se]);if(r<0)return Zi(Di,"can't find namespace for symbol \""+e[le]+'"'),0;var n=r*M,r=Oe[r][ye][e[le]];return"number"!=typeof r?(Zi(Di,"can't find interned symbol \""+e[le]+'"'),0):n+r}function je(e,r){e=F(e);return e===me&&Zi(Di,"can't set that: "+r),e===me?me:(r===D?r=e:"string"==typeof r?r=F(r):"number"==typeof r&&(r=qa(r)),e[1]=r,e)}function Pe(e,r,n,t){var i=(t?q:F)(e);i===me&&Zi(Di,"can't add builtin \""+i+'"');var a=new Array(f);return a[0]=n,(a[1]=a)[2]=i,a[3]=r,i[ce]=a,t||(H[e]=r),i}function Ae(e){for(var r=Object.getOwnPropertyNames(H),n=0;n<r.length;++n)if(H[r[n]]===e)return r[n];return D}function Te(e,r){e=F(e);return ke(e)||Zi(Di,"can't add that: "+r),e[ce]=r,e}function Ee(e){return e[0]===re?e[le]:e[0]===ne?e[pe]:e[0]===te?Ba(e[ge]).toString():e[0]===ie?e[ve].toString():""}function Me(e){var r=new Array(t);return r[0]=ne,(r[1]=r)[2]=me,r[3]=e,r}function Ie(e){var r=new Array(c);return r[0]=oe,(r[1]=r)[2]=me,r[3]=e,r[4]=me,r}function We(e,r){var n=new Array(l);return n[0]=ee,n[1]=e,n[2]=r,n}function $e(e){if("string"==typeof e)return 1<e.length&&"."==e.substring(0,1)?Fa(parseFloat(e.substring(1))):"$"==e.substring(0,1)?Me(e.substring(1)):("\\"==e.substring(0,1)&&(e=e.substring(1)),Ar(e));if("number"==typeof e)return qa(e);if("object"==typeof e){if(K(e)){for(var r=me,n=r,t=0;t<e.length;++t){var i=new Array(l);i[0]=ee,i[1]=$e(e[t]),n!==(i[2]=me)?n[2]=i:r=i,n=i}return r}if(e.hasOwnProperty("dictionary")){var a=new oa,u=e.dictionary,o=Object.getOwnPropertyNames(u);for(t=0;t<o.length;++t){var f=o[t];"$"!=f.substring(0,1)&&"\\"!=f.substring(0,1)||(f=f.substring(1)),a[f]=$e(u[o[t]])}var c=Ie(a);return e.tag!==D&&(c[2]=$e(e.tag)),c}if(e.hasOwnProperty("array")){var s=[];for(u=e.array,s[na]=ta,t=0;t<u.length;++t)s[t]=$e(u[t]);return Ie(s)}if(e.hasOwnProperty("xobject"))return Ie(e.xobject)}return Zi(Ui,"naanParseJsValue warning: can't parse "+typeof e),me}function _e(e){var r=Z;(Z=Z.slice()).push(X);e=$e(e);return Z=r,e}F("false");var qe=F("undefined"),Fe=F("null"),Re=F("true"),Ce=F("lambda"),Be=F("function"),De=F("function&"),Le=F("macro"),Ue=F("closure"),Xe=F("let"),ze=F("let&"),Ge=(F("var"),F("exception")),Je=F("escape"),Ze=F("this"),Ve=F("self"),Qe=F("`"),He=(F("deref"),F(".")),Ye=F("body"),Ke=F("loop"),er=F("catch"),rr=F("interrupt"),nr=(F("list"),F("Naan")),tr=F("builtin"),ir=F("tuple"),ar=F("symbol"),ur=F("integer"),or=F("float"),fr=F("numeric"),cr=F("string"),sr=F("array"),lr=F("dictionary"),pr=F("object"),gr=F("xobject"),vr=F("namespace"),dr=F("nonce"),hr=F("weakmap"),br=F("textstream"),yr=F("sprint"),mr=F("$");F("driver"),F("App"),F("identity"),F("js"),function(){for(var e in s)s.hasOwnProperty(e)&&F(e)}();var kr=je("cr","\n"),wr=F("space");wr[1]=Me(" "),je("doublequote",'"'),je("rpar",")"),je("lpar","("),je("comma",","),je("quote","`"),je("period","."),je("sprint",me),Z=[X,z];var xr=Me(".closure"),Sr=Me(".tostring"),Or=F("throw"),Nr=(F("call"),F("arraycall")),jr=(F("xget"),F("xset"),F("xcall"));F("xapply");function Pr(e){if(nr[1][0]!==oe)return me;for(var r=Object.getOwnPropertyNames(nr[1][he]),n=0;n<r.length;++n){var t=nr[1][he][r[n]][he];if(t.hasOwnProperty(e)){if(t[e][0]===re)return t[e];break}}return me}function Ar(e){var r=$(e);if(r)return r;if(r=F(e),nr[1][0]!==oe)return r;var n=Pr(e);return"future"!==e&&(n=n[ce])===me||(r[ce]=n),r}function Tr(e,r){if((e[0]===re||r&&e[0]===oe)&&ke(e)){if(e[se]===me)return 1;if(J==e[se])return 1;if(Z[0]===e[se])return 1;if(J===X)return 1;r=Ne(e[se])+vo.NSinfix;e[0]===re?r+=e[le]:r+=oo(e),xi(_e(["internal","$can't modify "+r+" from "+Ne(J)]),me)}else xi(_e(["internal","$attempt to modify constant "+oo(e)]),me)}function Er(e,r){try{return function(e,b){var u,o,r,n={};function y(e,r,n){if(r[0]!==re||((a=r)===me||a===qe||a===Fe||a===Ce||we(a)))for(;r[0]===ee;)y(e,r[1],n),r=r[2];else{var t=r[le];if(n===De||n===ze){if(r[se]===b||b===me)return;u!==Ue&&u!==Le&&Zi(Ui,"warning: using "+vo.NSinfix+t+" for parameter "+Ne(r[se])+vo.NSinfix+t+" in "+Ne(b)+vo.NSinfix+o[le])}var i=q(t);i[se]=b===me?r[se]:b;a=e[t];a&&(i[ce]=a[ce]),e[t]=i}var a}function m(e,r){for(;r[0]===ee;){if(r[1][0]===ee&&r[1][1]!==Qe)if(we(r[1][1])){var n=r[1][2][1];if(n!==me&&n[le]!==Ce[le]){var t=n[le],i=q(t);if(i[se]=b===me?n[se]:b,i[ce]=r[1],e.hasOwnProperty(t))throw"duplicate procedure name "+t+" in "+o[le];e[t]=i}}else m(e,r[1]);r=r[2]}}function k(e,r,n,t){if(e[0]!==ee){if(e[0]===oe&&ua(e[3])){var i=e[he];if(K(i)){for(var a=aa(sr,me),u=0;u<i.length;++u)a[he][u]=k(i[u],r,n,t);return a}var o,f=Object.getOwnPropertyNames(i),c=(e[3]instanceof ca?sa:fa)();for(c[2]=e[2],o=0;o<f.length;++o)c[he][f[o]]=k(i[f[o]],r,n,t);return c}return e[0]!==re?e:r.hasOwnProperty(e[le])?r[e[le]]:e}if(!n&&we(e[1])){var s=k(e[2][1],r,!1,t);s[le]===Ce[le]&&((s=q(s[le]))[O]=Ce,s[se]=b!==me?b:s[se]);var l=e[2][2][1],p=e[2][2][2],g={};m(g,p),y(g=Object.assign({},r,g),l,e[1]);p=We(k(l,g,!1,t),k(p,g,!1,s)),g=We(e[1],We(s,p));return s[ce]=g,t&&(s[2]===me&&(s[2]=aa(lr,me)),(s[2][3][".parent"]=t)[2]===me&&(t[2]=aa(lr,me)),p=(p=t[2][3][".children"])||me,t[2][3][".children"]=We(s,p)),g}e[1]===Qe&&(n=!0);for(var v=me,d=null;e[0]===ee;){var h=We(k(e[1],r,n,t),me);e.breakpoint&&(h.breakpoint=e.breakpoint),d?d[2]=h:v=h,d=h,e=e[2]}return e!==me&&d&&(d[2]=e),v}if(e[0]!==ee)return me;if(u=e[1],(o=e[2][1])[0]!==re)return me;var t=b!==me?b:o[se];o[se]!==t||(u!==Be&&u!==De||o[ce]!==e)&&o[ce]!==me?((r=q(o[le]))[O]=o,r[se]=t,r[fe]=h(o[fe]),u!==Ue&&u!==Le||r[fe][".base"]||(r[2]===me&&(r[2]=aa(lr,me)),r[2][3][".base"]=o)):r=o;r[2]!=me&&delete r[2][3][".children"];y(n,Ze),n[Ze[le]][1]=r,m(n,e[2][2][2]),y(n,e[2][2][1],u),t=k(e[2][2][1],n,!1),n=k(e[2][2][2],n,!1,r);n=We(u,We(r,We(t,n)));return r[ce]=n}(e,r)}catch(e){return e}}var Mr,Ir,Wr,$r,_r,qr=0,Fr=1,r=2,e=3,Rr=4,Cr=5,Br=6,Dr=7,Lr=8,Ur=9,Xr=10,zr=11,Gr=12,Jr=13,Zr=14,Vr=15,Qr=16,Hr=17,Yr=18,Kr=19,en=20,rn=21,nn=22,tn=23,an=24,un=25,on=26,fn=27,cn=28,sn=29,ln=30,pn=31,gn=32,vn=33,dn=34,hn=35,bn=36,yn=37,mn=38,kn=39,wn=40,xn=41,Sn=42,On=43,Nn=44,jn=45,Pn=46,An=47,Tn=48,En=49,Mn=50,In=51,Wn=52,$n=53,_n=54,qn=55,Fn=56,Rn=90,Cn=91,Bn=92,Dn=93,Ln=94,Un=0,Xn=1,zn=2,Gn=3,Jn=4,Zn=5,Vn=6,Qn=57,Hn=58,Yn=59,Kn=95,et=96,rt=[];rt[qr]=function(){},rt[vn]=function(){var e=Mr,r=0;if(e[0]!==ee){if(e[0]===oe&&ua(e[3])){if(K((Mr=e)[3]))return void(_r=Yr);if(e[3]instanceof oa)return void(_r=wn)}return Mr=e[1],void(_r=pt[--gt])}var n=e[1];for(;n[0]===re;){if(++r>It)return _r=pt[--gt],void(Mr=me);if(n[3]!==me)n=n[3];else{if(n[1]===n)break;if((n=n[1])[0]===oe)return _r=gn,$r=n,Wr=Re,Ir=e[2],void(Mr=n)}}if(n[0]===ee&&we(n[1])||n[0]===ae||n[0]===S||n[0]===ue)return _r=gn,$r=e[1],Wr=Re,Ir=e[2],void(Mr=n);if(we(n))return void(_r=pt[--gt]);_r=un},rt[yn]=function(){Mr[0]===re&&(Mr=E(Mr[ce]));$r=Mr[0]===ee?Mr:Ce;Wr=me,_r=gn},rt[gn]=Kt,rt[Qn]=Kt,rt[Lr]=function(){for(var e=vt[--dt],r=vt[dt-1-e],n=vt[dt-2-e],t=vt[dt-3-e],i=Mr;;){if(r[0]===ee)vt[dt++]=i,++e,r=r[2];else if(n[0]!==ee){!function(e){var r=ri();if(r){var n=dt,t=vt[n-4-e],i=ni(r,t);if(i){for(bt=vt[r-1],vt[i+0]=vt[n-5-e],vt[i+1]=t,vt[i+2]=vt[n-3-e],vt[i+3]=vt[n-2-e],vt[i+4]=vt[n-1-e],n-=e,i+=5;0<=--e;)vt[i++]=vt[n++];dt=i}}}(e);var a=vt[dt-4-e],u=a[2][1][se];r=a[2][2][1];for(var o=dt-e,f=!1;r[0]===ee;){if(i=r[1][1],r[1]===me)f=!0;else{if(r[1][0]!==re)return void Si(_e(["internal","$parameter is not a symbol"]));if(r[1][se]!==u)return void Si(_e(["internal","$parameters in foreign namespace: "+Ne(r[1][se])+vo.NSinfix+r[1][le]+" from: "+Ne(u)]));r[1][1]=f?me:vt[o]}vt[o++]=i,r=r[2]}return vt[dt++]=e,Wr=me,Ir=a[2][2][2],Mr=me,vt[dt++]=bt,vt[bt=dt++]=Ln,pt[gt++]=zr,vt[dt++]=gt,vt[dt++]=!1,_r=cn,"number"==typeof(i=vt[dt-11-e])&&(a=Ve[1],Ve[1]=vt[i],vt[dt-11-e]=a),void(J=u)}if(n[0]!==ee?i=me:(i=n[1],n=n[2]),t!==me){if(i[0]===ee||i[0]===oe)break;i=i[O]}}vt[dt-2-e]=n,vt[dt-1-e]=r,vt[dt++]=e,Mr=i,pt[gt++]=Lr,_r=vn},rt[Vr]=function(){var e=vt[dt-1];vt[dt-1]=Mr,_r=(Mr=e)===me?Qr:(pt[gt++]=Qr,vn)},rt[Qr]=function(){var e=vt[dt-2];vt[dt-2]=Mr,_r=(Mr=e)===me?Hr:(pt[gt++]=Hr,vn)},rt[Hr]=function(){var e=vt[--dt],r=vt[--dt],n=Mr,t=vt[--dt];if((Mr=t[3](e,r,n,t))===At)return void Vt(t,e,r,n);if(Mr===Tt)return Mr=ot,Ir=We(e,We(r,We(n,me))),void(_r=yn);if(Mr===Et)return void pi(ft,ct,We(e,We(r,We(n,me))));_r=pt[--gt]},rt[qn]=function(){var e;!function(){var e,r,n,t=ri();t&&(r=vt[(e=dt)-1],(n=ni(t,r))&&(bt=vt[t-1],vt[n+0]=vt[e-2],vt[n+1]=r,dt=n+2))}();var r=vt[dt-1],n=r[2][2][1];vt[dt++]=n[1],ke(n)&&(n[1]=Mr);Wr=me,Ir=r[2][2][2],Mr=me,vt[dt++]=bt,vt[bt=dt++]=Dn,pt[gt++]=Fn,vt[dt++]=gt,vt[dt++]=!1,_r=cn,"number"==typeof(e=vt[dt-8])&&(n=Ve[1],Ve[1]=vt[e],vt[dt-8]=n);J=r[2][1][se]},rt[Fn]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==Dn&&Zi(Di,"nadiCallNoSpread2: lost frame sync");(bt=vt[--dt])<Nt&&Wa();var r=vt[dt-2],e=r[2][2][1];e!==me&&r[1]!==Ue&&(e[1]=vt[dt-1]);dt-=3,Ve[1]=vt[--dt],J=vt[--dt],_r=pt[--gt]},rt[zr]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==Ln&&Zi(Di,"nadiCallComplete: lost frame sync");(bt=vt[--dt])<Nt&&Wa();var r=vt[--dt],e=vt[dt-4-r];if(e[1]!==Ue)for(var n=e[2][2][1],t=dt-r,i=r;0<=--i&&n[0]===ee;)n[1]!==me&&(n[1][1]=vt[t]),++t,n=n[2];dt-=r+5,Ve[1]=vt[--dt],J=vt[--dt],_r=pt[--gt]},rt[an]=function(){Wr=Re,Ir=Mr,it=Mr=me,_r=cn},rt[cn]=function(){vt[dt++]=bt,vt[bt=dt++]=Cn,vt[dt++]=gt,vt[dt++]=!1,vt[dt++]=Wr,vt[dt++]=Ir,vt[dt++]=Ir,_r=sn},rt[sn]=ai,rt[ln]=ai,rt[pn]=ai,rt[Yn]=function(){dt-=5,vt[--dt]!==Cn&&Zi(Di,"nadiBody4: lost frame sync");return bt=vt[--dt],void(_r=pt[--gt])},rt[un]=function(){vt[dt++]=me,vt[dt++]=me,vt[dt++]=Mr,_r=on},rt[on]=function(){var e=vt[dt-1];return e[0]===ee?(Mr=e[1],pt[gt++]=fn,void(_r=vn)):(Mr=vt[dt-2],dt-=3,void(_r=pt[--gt]))},rt[fn]=function(){var e=vt[dt-1],r=vt[dt-3],n=We(Mr,me);r!==me?r[2]=n:vt[dt-2]=n;vt[dt-3]=n,vt[dt-1]=e[2],_r=on},rt[Ur]=function(){vt[dt++]=Mr,_r=Xr,Mr=Re},rt[Xr]=function(){var e=vt[dt-1];return ke(Mr)&&e[0]===ee?(Mr=e[1],vt[dt-1]=e[2],pt[gt++]=Xr,void(_r=vn)):(--dt,void(_r=pt[--gt]))},rt[Mn]=function(){vt[dt++]=Mr,_r=In,Mr=me},rt[In]=function(){var e=vt[dt-1];if(ke(Mr)||e[0]!==ee)return--dt,void(_r=pt[--gt]);return Mr=e[1],vt[dt-1]=e[2],pt[gt++]=In,void(_r=vn)},rt[nn]=function(){return vt[dt++]=Mr,Ir=Mr[2][1],Mr=Ir,pt[gt++]=tn,void(_r=vn)},rt[tn]=function(){return Qu(vt[--dt][1],Mr),void(_r=pt[--gt])},rt[Sn]=function(){vt[dt++]=0,vt[dt++]=Mr,_r=On},rt[On]=function(){var e=vt[dt-1];return e[0]===ee?(Mr=e[1][1],pt[gt++]=Nn,void(_r=vn)):(dt-=2,Mr=me,void(_r=pt[--gt]))},rt[Nn]=function(){var e=vt[dt-1];_r=ke(Mr)?(0!==vt[dt-2]&&(vt[vt[dt-2]]=zn),dt-=2,Ir=e[1][2],Wr=me,cn):(vt[dt-1]=e[2],On);return},rt[en]=function(){return Mr=(vt[dt++]=Mr)[1],pt[gt++]=rn,void(_r=vn)},rt[rn]=function(){var e=vt[--dt];return Mr=e[2][1][1]=We(Mr,e[2][1][1]),void(_r=pt[--gt])},rt[An]=ui,rt[Tn]=function(){return vt[dt-1]=Mr,Mr=vt[dt-2],pt[gt++]=En,void(_r=vn)},rt[En]=oi,rt[Rr]=function(){return ui(),void(pt[gt-1]=Cr)},rt[Cr]=oi,rt[Br]=function(){var e=me;if(Ir=Mr,Mr=vt[--dt],Wr=vt[--dt],!ke(Mr))return Mr=me,void(_r=pt[--gt]);var r=Re;switch(Mr[0]){case ee:if(Ir===me)e=Mr;else if(Ir[0]===te||Ir[0]===ie){var n=Da(Ir,65535);if(null!==n){for(e=Mr,n=Math.abs(n);e[0]===ee&&0<=--n;)e=e[2];L.negative(Ir[3])||(e=e[1])}}else if(si(ir))return;break;case re:if(si(ar))return;if(Wr===me)return ci();e=me;break;case w:if(si(vr))return;if(Wr===me)return ci();e=me;break;case ne:if(Ir[0]!==te)return si(cr)?void 0:Wr===me?ci():void li("String");var t=Da(Ir,Number.MAX_SAFE_INTEGER);e=Me(t<0?Mr[3].charAt(Mr[3].length+t):Mr[3].charAt(t));break;case te:return fi()?void 0:si(ur)?void 0:Wr===me?ci():void li("Number");case ie:return fi()?void 0:si(or)?void 0:Wr===me?ci():void li("Number");case oe:if(ua(Mr[3])){if(e=me,t=Ir[0]===re?Ir[le]:Ir[0]===ne?Ir[pe]:(Ir[0]===te||Ir[0]===ie)&&Da(Ir,Number.MAX_SAFE_INTEGER),K(Mr[3]))if("length"==t)e=qa(Mr[3].length);else{if(si(sr))return;if(Ir[0]===te)(e=Mr[3][t])===D&&(e=me);else if(Wr!==me)return Ir=We(Mr,We($r=Ir,Wr[1])),Wr=sr,Mr=Nr[3],void(_r=gn)}else if(!1!==t)if(Mr[3].hasOwnProperty(t))e=Mr[3][t];else if(Mr[3]instanceof ca)Wr!==me?(Wr[1][0]===re&&Wr[1]!==me&&(r=me,Wr=Wr[1]),(e=ha(Mr,t))===me&&(e=ha(Mr,".undefined",!0))!==me&&(t=r!==me?We(Qe,We(Ir,me)):Ir,Wr=We(We(t,Wr[1]),me))):(e=ha(Mr,".."+t,!0))!==me?Wr=We(me,me):(e=ha(Mr,"..undefined",!0))!==me&&(Wr=We(We(We(Qe,We(Ir,me)),Wr[1]),me));else if(si(lr))return}else if(e=Pa(Mr,Ir),Wr!==me)return Ir=We(Mr,We($r=Ir,Wr[1])),Wr=He,Mr=jr[3],void(_r=gn);break;default:return ci()}if(Wr===me)return Mr=e,void(_r=pt[--gt]);$r=Ir,vt[dt++]=Mr,pt[gt++]=Dr,Ir=Wr[1],Wr=r,e[0]===re&&(e=E(e[ce]));return Mr=e,void(_r=Qn)},rt[Dr]=function(){return--dt,void(_r=pt[--gt])},rt[Gr]=gi,rt[Fr]=gi,rt[kn]=function(){var e,r=$r,n=Wr,t=Ir,i=Mr;e=r[0]>=ae&&r[0]<=ue?r[3](i,t,n,r):me;e===At?Vt(r,i,t,n):(Mr=e,_r=pt[--gt]);return},rt[Zr]=function(){return function(e){--Wi<0&&(Wi=0);0<Ri.length?(Zi(Ci,Ri+"==> "+oo(e,{quote:Re})),Ri=""):Zi(Xi,Vi()+"==> "+oo(e,{quote:Re}))}(Mr),void(_r=pt[--gt])},rt[Wn]=function(){return vt[dt++]=me,vt[dt++]=Un,vt[dt++]=me,vt[dt++]=Mr,vt[dt++]=bt,vt[bt=dt++]=Bn,vt[dt++]=gt,vt[dt++]=!1,Wr=me,Ir=Mr[1],Mr=me,pt[gt++]=$n,void(_r=cn)},rt[$n]=function(){vt[dt-6]=Mr,vt[dt-3]=et,bt<Nt&&Wa();vt[dt-7]===zn&&(Ge[1]=Ge);return Mr=vt[dt-5],Wr=me,Ir=Mr[2][2][1],Mr=me,pt[gt++]=_n,void(_r=cn)},rt[_n]=function(){Mr=vt[dt-6],Ir=vt[dt-7],Wr=vt[dt-8],bt=vt[dt-4];var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==et&&Zi(Di,"nadiCatch2: lost frame sync");dt-=5,_r=(Ir===zn||Ir===Un||(Ir===Jn?(Oi(Mr),vt[bt]==Bn&&(Ge[1]=Ge)):Ir===Zn?Ni(Wr):Ir===Vn?ji(Wr):xi(Ge[1],Re)),pt[--gt]);return},rt[jn]=function(){var e,r=vt[dt-3],n=dt-3-r,t=vt[dt-2],i=vt[dt-1];function a(e){return e<0||r<=e?me:vt[n+e]}if(t<r)return Mr=vt[n+t],_r=Wr===He&&1==t||Wr===sr&&(0===t||1===t)?Pn:(pt[gt++]=Pn,vn),void(vt[dt++]=Wr);vt[dt++]=bt,vt[bt=dt++]=Kn,pt[gt++]=Hn,vt[dt++]=gt,vt[dt++]=!1,Mr=i[0]===oe?function(e){return e.prototype&&e.prototype.constructor.name}(i[he])?Ma(i,r,0,a):Ta(null,i,r,0,a):i[3]!==me?i[3](r,a,i,vt[n-1]):me;if(Mr===At)return ei(),pt[gt-1]=jn,_r=qr,void(jt=1);if(Mr===Tt){for(Mr=ot,Ir=me,e=r;0<=--e;)Ir=We(vt[n+e],Ir);return void(_r=yn)}if(Mr===Et){for(Ir=me,e=r;0<=--e;)Ir=We(vt[n+e],Ir);return void pi(ft,ct,Ir)}_r=pt[--gt]},rt[Pn]=function(){Wr=vt[--dt];var e=vt[dt-3],r=vt[dt-2];vt[dt-3-e+r]=Mr,vt[dt-2]=r+1,_r=jn},rt[Hn]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);ei();e=vt[dt-3];dt=dt-4-e,_r=pt[--gt]},rt[r]=function(){vt[dt++]=Wr,vt[dt++]=Ir,pt[gt++]=e,_r=vn},rt[e]=function(){Mr[0]===re&&(Mr=E(Mr[ce]));$r=Mr[0]===ee?Mr[2][1]:Ce;Ir=vt[--dt],Wr=vt[--dt],_r=gn},rt[Yr]=function(){if(Wr=aa(sr,me),0===Mr[3].length)return Mr=Wr,void(_r=pt[--gt]);vt[dt++]=Mr,vt[dt++]=Wr,vt[dt++]=0,pt[gt++]=Kr,(Mr=Mr[3][0])===D&&(Mr=qe);_r=vn},rt[Kr]=function(){if(Ir=vt[dt-1]++,Wr=vt[dt-2],$r=vt[dt-3],Wr[3][Ir++]=Mr,Ir<$r[3].length)return pt[gt++]=Kr,Mr=$r[3][Ir],void(_r=vn);dt-=3,Mr=Wr,_r=pt[--gt]},rt[wn]=function(){if(Wr=fa(),0===(Ir=ma(Object.getOwnPropertyNames(Mr[3]).reverse()))[3].length)return Mr=Wr,void(_r=pt[--gt]);vt[dt++]=Mr,vt[dt++]=Wr,vt[dt++]=Ir,pt[gt++]=xn,(Mr=Mr[3][Ir[3][Ir[3].length-1]])===D&&(Mr=qe);_r=vn},rt[xn]=function(){Ir=vt[dt-1],Wr=vt[dt-2],$r=vt[dt-3],Mr===qe?Ir[3].pop():Wr[3][Ir[3].pop()]=Mr;if(0<Ir[3].length)return pt[gt++]=xn,Mr=$r[3][Ir[3][Ir[3].length-1]],void(_r=vn);dt-=3,Mr=Wr,_r=pt[--gt]},rt[mn]=Yt,rt[Jr]=Yt,rt[dn]=function(){vt[dt-4]=Mr,Mr=vt[dt-2],pt[gt++]=hn,_r=vn},rt[hn]=function(){vt[dt-2]=Mr,Mr=vt[dt-1],pt[gt++]=bn,_r=vn},rt[bn]=function(){var e,r,n,t,i;i=vt[dt-5],t=Mr,n=vt[dt-2],r=vt[dt-3],e=vt[dt-4],r[0]===ee&&r[1][ce][de]===wi&&(e=We(e,r[2][2]));dt-=5,Mr=function(e,r,n,t){function i(e){if(e[0]===re&&(e=E(e[ce])),e[0]===ae)return e[de];if(e[0]===S){if((e=e[de])===Xa)return Ua;if(e===Ga)return za;if(e===Za)return Ja;if(e===Qa)return Va;if(e===Ya)return Ha;if(e===uu)return au;if(e===fu)return ou;if(e===eu)return Ka;if(e===iu)return tu;if(e===nu)return ru}return function(){return me}}function a(e){return e[0]===oe&&e[3]instanceof ca&&(pi(e,t!==me?".preadjust":".postadjust",We(e,We(r,We(n,me)))),pt[gt++]=_r,1)}var u,o;if(e[0]===ee){var f=e[1],c=e[2][1];if(a(o=Pa(f,c)))return Mr;u=i(r),c=Aa(f,c,u(o,n))}else{if(e[0]!==re)return xi(_e(["internal","$invalid adjust target"]),me);if(a(o=e[1]))return Mr;u=i(r),c=Hu(e,u(o,n))}return t!==me?c:o}(e,n,t,i),_r=pt[--gt]};var nt,tt,it,at,ut,ot,ft,ct,st,lt,pt=[],gt=0,vt=[],dt=0,ht=-1,bt=0,yt=!1,mt=!1,kt=6e3,wt=1e3,xt=0,St=0,Ot=0,Nt=0,jt=0,Pt=[],At=[],Tt=[],Et=[],Mt=0,It=100,Wt=3e4,$t=1e4,_t=2e5,qt=Wt;function Ft(){return bt=dt=gt=0,_r=qr,Mr=Ir=Wr=$r=Ve[1]=me,Ge[1]=Ge,Ii=Li,Ri="",Ci=Wi=0,1}function Rt(e){return pt[gt++]=qr,_r=vn,Mr=e}function Ct(e,r,n){return $a(),vt[dt++]=St,St=0,vt[dt++]=mt,vt[dt++]=yt,vt[dt++]=e,vt[dt++]=r,vt[dt++]=J,vt[dt++]=Ve[1],vt[dt++]=$r,vt[dt++]=Wr,vt[dt++]=Ir,vt[dt++]=Mr,vt[dt++]=bt,vt[bt=dt++]=Rn,vt[dt++]=gt+2,vt[dt++]=!1,pt[gt++]=_r,pt[gt++]=n?Fr:Gr,_r=vn,at=me,mt=yt=!1,Mr=e}function Bt(){return jt<=0&&(_r!==qr||0<gt)}function Dt(e){if(!(0<jt)){var r=tt;for(st=(new Date).getTime(),vt.length=dt;_r===qr&&0<gt;)_r=pt[--gt];St=kt,tt=e=e||tt,yr[1]=T(e);try{!function(){var e=st;xt=0,nt=D;do{if(Ji!==Gi[1])return Si(We(Me("symtrace"),We(We(Qe,We(Gi,me)),We(We(Qe,We(Ji,me)),We(We(Qe,We(Gi[1],me)),me))))),Ji=Gi[1];if(qt<dt&&(Si(_e(["internal","$maximum stack depth exceeded"])),qt=dt+$t,_t<dt))return Zi(Di,"intractable recursion"),Ft(),$a(),0;if(++xt>=wt){if(xt=0,vt.length=dt,0<St&&!tt&&0==Nt&&(nt?(St-=nt,nt=D):St-=wt,St<=0)){St=kt,_r!==qr&&(pt[gt++]=_r,_r=qr);break}var r=(new Date).getTime();if(1e3<=r-e&&(st=r),1e4<(e=r)-st)return Si(_e(["internal","$unresponsive"])),0}}while(rt[_r](),_r!=qr)}()}catch(e){if(e!==Pt){debugger;Zi(Di,"caught: "+e.toString()),Si(_e(["unknown","$"+e.toString()]))}$a()}finally{tt=r,vt.length=dt,Wt<qt&&dt<qt-$t/2&&(qt-=$t/2)<Wt&&(qt=Wt),e=(new Date).getTime(),r=e-st,lt===D&&(Lt[lt=0]=st,Xt[0]=0,zt[0]=0,Gt[0]=0,Jt[0]=0),++Xt[lt],zt[lt]+=r,Gt[lt]<r&&(Gt[lt]=r),++Jt[lt],e>=Lt[lt]+200&&(Ut[lt]=e-Lt[lt],50<++lt&&(lt=0),Lt[lt]=e,Xt[lt]=0,zt[lt]=0,Gt[lt]=0,Jt[lt]=0)}0<uo.TextAvail()&&A.hasOwnProperty("console-out")&&A["console-out"](y,uo.TakeText())}}var Lt=[],Ut=[],Xt=[],zt=[],Gt=[],Jt=[];function Zt(e,r){e=e||4,r=r||1e3;for(var n=[],t=[],i=Lt.length-1,a=lt-1,u=e*r;0<=--i&&(n.push({start:Lt[a],width:Ut[a],runtime:zt[a],peak:Gt[a],runcount:Xt[a],counter:Jt[a]}),--a<0&&(a=Lt.length-1),!((u-=Ut[a])<0)););if(0===n.length)return[];var o=n[0];(new Date).getTime()-o.start>3*r&&t.push({start:o.start+r,width:r,cpu:0,peak:0,average:0,samples:0});for(var f=o.start+o.width-r,c=1;t.length<e;)if(f>=o.start){var s=o.peak;r<s&&(s=r);var l=Number((o.runtime/o.width).toFixed(3)),p=Math.round(o.runtime/o.runcount);s==r&&(l=1,p=1e3),t.push({start:f,width:r,cpu:l,peak:s,average:p,samples:o.counter}),f-=r}else{if(c>=n.length)break;o=n[c++]}return t}function Vt(e,r,n,t){Mr=r,Ir=n,Wr=t,$r=e,pt[gt++]=kn,_r=qr,jt=1}function Qt(e){if(e[ce]!==me)ut=e[ce];else{if(e[1]===e)return me;ut=e[1]}return ot=e,Tt}function Ht(e,r){return ft=e,ct=r,Et}function Yt(){if(vt[dt++]=_r===mn?Re:me,vt[dt++]=me,vt[dt++]=Mr[1],vt[dt++]=Mr[2][1],vt[dt++]=Mr[2][2][1],(Mr=Mr[1])[0]===ee){var e=Mr[1][ce][de];if(e===ki&&Mr[2][2][2]===me)Mr=Mr[2],_r=un;else{if(e!==wi)return dt-=5,Mr=me,void(_r=pt[--gt]);Mr=Mr[2][1],_r=vn}pt[gt++]=dn}else _r=dn}function Kt(){var r,n,e,t,i=Mr,a=Ir,u=Wr!==me;if(i[0]===re&&(i=E(i[ce])),i[0]===ae)return e=a[2][2][1],n=a[2][1],r=a[1],zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr),u?r[0]!==ee&&n[0]!==ee&&e[0]!==ee&&r[0]!==oe&&n[0]!==oe&&e[0]!==oe?(Mr=i[3](r[1],n[1],e[1],i))===At?void Vt(i,r[1],n[1],e[1]):Mr===Tt?($r=ot,Wr=Re,void(Mr=ut)):Mr===Et?void pi(ft,ct,a,!0):void(_r=pt[--gt]):(vt[dt++]=i,vt[dt++]=e,vt[dt++]=n,Mr=r,pt[gt++]=Vr,void(_r=vn)):(Mr=i[3](r,n,e,i))===At?void Vt(i,r,n,e):Mr===Tt?($r=ot,void(Mr=ut)):Mr===Et?void pi(ft,ct,a):void(_r=pt[--gt]);if(i[0]===S||i[0]===oe)if(zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr),i[0]===S&&_r!==Qn&&u&&(Mr=!1,a[0]===ee?(r=a[1])[0]!==ee&&r[0]!==oe&&(a[2][0]===ee?(n=a[2][1])[0]!==ee&&n[0]!==oe&&a[2][2][0]!==ee&&(Mr=i[3](2,function(e){return 0<=e&&e<2?[r[1],n[1]][e]:me},i,me)):Mr=i[3](1,function(e){return 0===e?r[1]:me},i,me)):Mr=i[3](0,function(e){return me},i,me),Mr&&Mr!==At&&Mr!==Tt&&Mr!==Et||pt[gt-1]===Gr))_r=pt[--gt];else{_r===Qn?(vt[dt]=vt[dt-1],++dt):vt[dt++]=me,zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr);for(var o=0;a[0]===ee;)vt[dt++]=a[1],++o,a=a[2];vt[dt++]=o,vt[dt++]=u?0:o,vt[dt++]=i,_r=jn}else if(i[0]===ue){if(zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,!1),pt[gt++]=Zr),(Mr=i[3](a,i))!==At)return Mr===Tt?($r=ot,Wr=me,void(Mr=ut)):void(Mr!==Et?_r=pt[--gt]:pi(ft,ct,a));Vt(i,a)}else i[0]!==ee||i[1]!==Le&&i[1]!==Be&&i[1]!==De&&i[1]!==Ue&&i[1]!==Xe&&i[1]!==ze?(Mr=me,_r=pt[--gt]):(t=i[2][1],Xi<=Ii&&(Qi(Xi,oo($r),a,u),pt[gt++]=Zr),vt[dt++]=J,_r===Qn?(vt[dt]=dt-2,++dt):vt[dt++]=Ve[1],t!==Ce&&t[0]===re&&t[se]!==me?t[ce]===i?(i[1]===Le?(u=!1,Wr=me,t[se]!==X&&(i=Er(i,J))):i[1]===Ue&&(i=Er(i,t[se])),"string"!=typeof i?(t=i[2][1],e=i[2][2][1],t=t[se],e[0]!==ee?e[0]===re?e[1]!==Xe?e===me||e[se]===t?(vt[dt++]=$r,vt[dt++]=i,Mr=a,_r=u?(pt[gt++]=qn,un):qn):Si(_e(["internal","$parameter in foreign namespace: "+Ne(e[se])+vo.NSinfix+e[le]+" from: "+Ne(t)])):Si(_e(["internal","$let parameter must be tuple"])):Si(_e(["internal","$parameter is not a symbol"])):(a[0]!==ee?r=me:(r=a[1],a=a[2]),vt[dt++]=$r,vt[dt++]=i,vt[dt++]=Wr,vt[dt++]=a,vt[dt++]=e,vt[dt++]=0,Mr=r,_r=u?r[0]===ee||r[0]===oe?(pt[gt++]=Lr,vn):(Mr=r[O],Lr):Lr)):Si(_e(["internal",i]))):Si(_e(["internal","$privilege violation in "+oo($r)])):Si(_e(["internal","$namespace invalid in "+oo($r)])))}function ei(){dt-=2,vt[--dt]!==Kn&&Zi(Di,"naanUnlinkArbFrame: lost frame sync"),(bt=vt[--dt])<Nt&&Wa()}function ri(){var e=bt;if(vt[e]!==Cn)return!1;for(var r=gt;;){var n=pt[--r];if(n!==ln){if(n===zr||n===Fn)break;return!1}}for(;vt[e]===Cn;){if(vt[e+3]!==me||vt[e+5][2][0]===ee)return!1;e=vt[e-1]}return e}function ni(e,r){if(r[1]!==Be&&r[1]!==Ue)return!1;var n,t;if(vt[e]===Dn)n=vt[e-3],t=ti;else{if(vt[e]!==Ln)return!1;n=vt[e-vt[e-2]-6],t=ii}if(vt[e+2])return!1;if(n[1]===Be||n[1]===Xe){var i=n[2][1],r=r[2][1];if(i[se]!==r[se])return!1;for(var a=r;a=a[2][3][".parent"];)if(a===i)return!1}else if(n[1]!==Ue)return!1;return t(e)}function ti(e){var r=vt[e-3],n=r[2][2][1];return n!==me&&r[1]!==Ue&&(n[1]=vt[e-2]),gt=vt[e+1]-1,e-4}function ii(e){var r=vt[e-2],n=vt[e-6-r];if(n[1]!==Ue)for(var t=n[2][2][1],i=e-2-r,a=r;0<=--a&&t[0]===ee;)t[1]!==me&&(t[1][1]=vt[i]),++i,t=t[2];return gt=vt[e+1]-1,e-7-r}function ai(){for(var e=vt[dt-1],r=vt[dt-3];;){if(it=Mr,_r===ln?(_r=sn,e=e[2],vt[dt-1]=e):_r===pn&&(_r=sn,ke(it)?(r=me,e=e[1][2],vt[dt-3]=r):e=e[2],vt[dt-1]=e),e[0]!==ee){if(r!==me)return e=vt[dt-2],void(vt[dt-1]=e);_r=pt[--gt]}else{if(yt&&0==--yt)return void function(e){var r=mt;mt=yt=!1;var n=fa();d(n[he],e),Ct(We(mi,We(r,We(n,me))),"steptrap")}({state:Me("task"),body:vt[dt-2],task:e,loop:r,value:it});if(e[1].breakpoint&&function(e){if(ra[1]!==ra)return!1;if(e[1].breakpoint[0]===oe){var r=e[1].breakpoint[he];if(ua(r)&&ke(r.enable))return ra[1]=e,Ct(We(mi,We(r.proc,We(e[1].breakpoint,We(it,me)))),"breakpoint"),!0}return!1}(e))return;if(e[1][0]!==ee){if((Mr=e[1])[0]===oe)return pt[gt++]=ln,void(_r=vn);Mr=Mr[1],_r=ln;continue}if(e[1][1][0]===ee){if(e[1][1][1][0]!==ee)return Mr=e[1][1],pt[gt++]=pn,void(_r=vn);r===me&&e[2][0]!==ee?(e=e[1],r=me,vt[dt-1]=e,vt[dt-2]=e,vt[dt-3]=r):(yt&&++yt,vt[dt-1]=e[2],e=e[1],r=me,vt[dt++]=bt,vt[bt=dt++]=Cn,vt[dt++]=gt,vt[dt++]=!1,vt[dt++]=r,vt[dt++]=e,vt[dt++]=e,pt[gt++]=sn),vt[dt-6]!==Cn&&Zi(Di,"nadiBody1: lost frame sync");continue}if(Mr=e[1],_r=Mr[1][ce]!==me?($r=Mr[1],Wr=Re,Ir=Mr[2],Mr=$r[ce],gn):vn,!(Ii<=Bi&&r===me&&e[2][0]!==ee))return void(pt[gt++]=ln)}var n=vt[dt-4];return n&&n[he].trap?(pt[gt++]=_r,_r=Yn,void Yi(n,Mr)):(dt-=5,vt[--dt]!==Cn&&Zi(Di,"nadiBody4: lost frame sync"),void(bt=vt[--dt]))}}function ui(){vt[dt++]=Mr[2][2],vt[dt++]=Mr[2][1],Mr=Mr[1],vt[dt++]=Mr,pt[gt++]=Tn,_r=vn}function oi(){_r===En?vt[dt-2]=Mr:vt[dt-1]=Mr,Ir=vt[--dt],Mr=vt[--dt],Wr=vt[--dt],_r===Cr&&Mr[0]===ee&&(Mr[2][0]!==ee?Mr=Mr[1]:(vt[dt++]=Wr,vt[dt++]=Mr[2],vt[dt++]=Ir,pt[gt++]=Cr,Mr=Mr[1],Wr=me)),_r=Br,vt[dt++]=Wr,vt[dt++]=Ir}function fi(){return(Ir[0]===te||Ir[0]===ie)&&(_r=pt[--gt],Si(_e(["internal","numeric scalar dereference"])),1)}function ci(){Mr=Wr===me&&Mr[0]===ne&&(Ir[0]===ne&&"length"==Ir[pe]||Ir[0]===re&&"length"==Ir[le])?qa(Mr[pe].length):Mr[0]===re?We(He,We(Mr,We(Ir,Wr))):me,_r=pt[--gt]}function si(e){e=Yu(e,Ir);if(!ke(e)){if(Mr[0]===ee)return;if(!ke(e=Yu(Mr,Ir)))return}return $r=Ir,Ir=We(We(Qe,We(Mr,me)),Wr[1]),Wr=Re,e[0]===re&&(e=E(e[ce])),Mr=e,_r=gn,1}function li(e){e=C(e,[X,z]);Ir=We(e,We($r=Ir,We(Mr,Wr[1]))),Wr=He,Mr=jr[3],_r=gn}function pi(e,r,n,t){var i=ha(e,r);i===me&&(i=ha(e,".undefined",!0))!==me&&(n=We(We(Me(r),n),me)),vt[dt++]=e,pt[gt++]=Dr,Ir=n,Wr=t?Re:me,i[0]===re&&(i=E(i[ce])),Mr=i,_r=Qn}function gi(){at=Mr;var e=_r===Fr,r=vt[dt-1];if(r&&r[he].trap)return Yi(r,Mr),vt[dt-13]=yt,void(vt[dt-14]=mt);dt-=2,vt[--dt]!==Rn&&Zi(Di,"nadiInterruptRestore: lost frame sync"),(bt=vt[--dt])<Nt&&Wa(),Mr=vt[--dt],Ir=vt[--dt],Wr=vt[--dt],$r=vt[--dt],Ve[1]=vt[--dt],J=vt[--dt],dt-=2,mt?dt-=2:(yt=vt[--dt],mt=vt[--dt]),e&&(Mr=at),St=vt[--dt],_r=tt?pt[--gt]:qr}function vi(){return me}function di(e,r){return pt[gt++]=yn,Ir=r,e}Pe("undefined",vi,ae);var hi,bi,yi,mi=(hi=function(e){return pt[gt++]=r,Wr=me,Ir=e[2],e[1]},bi=ue,(yi=new Array(f))[0]=bi,(yi[1]=yi)[2]=me,yi[3]=hi,yi);function ki(e){return pt[gt++]=An,e}function wi(e){return pt[gt++]=Rr,e}function xi(e,r){var n,t,i,a=bt;if(!function(){if(void 0===Mr||void 0===Ir||void 0===Wr||void 0===$r)debugger;var e,r,n,t,i=bt;if(dt<bt||bt+50<dt)debugger;for(t=0;t<dt;++t)if(void 0===vt[t])debugger;for(;0<i;){switch(vt[i]){case Dn:if(!we((r=vt[i-3])[1]))debugger;if(vt[i-6][0]!=w)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;if(pt[n-1]!=Fn)debugger;break;case Ln:if((e=vt[i-2])<0||1e3<e)debugger;if(!we((r=vt[i-6-e])[1]))debugger;if(vt[i-9-e][0]!=w)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;if(pt[n-1]!=zr)debugger;break;case Kn:if((e=vt[i-4])<0||1e3<e)debugger;if((r=vt[i-2])[0]!=S&&r[0]!=oe)debugger;if(n=vt[i+1],pt[n-1]!=Hn)debugger;break;case Cn:if((n=vt[i+1])<0||gt+1<n)debugger;break;case Bn:if(vt[i-4]<0||vt[i-4]>Vn)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;break;case et:break;case Rn:if(vt[i-7][0]!=w)debugger;break;default:debugger}if(vt[i-1]<0||vt[i-1]>=i)debugger;i=vt[i-1]}}(),e[0]===ee&&e[1][0]===re&&"internal"==e[1][le]&&e[2][1]===Je&&Je[ce]!==me)return Ct(We(Je,me),"escape"),pt[gt++]=_r,Mr;if(Ge[ce]!==me&&r===me)return Ge[1]===Ge&&(Ge[1]=e),_r=pt[--gt],Ct(We(Or,We(Ge[1],We(Re,me))),"exception-rethrow"),Ct(We(Ge,We(e,me)),"exception-hook"),pt[gt++]=_r,Mr;for(Mr=me;0<a;){var u=vt[a];switch(u){case Dn:Xi<=Ii&&Hi(e),t=vt[a-2],(i=vt[a-3][2][2][1])!==me&&(i[1]=t),Ve[1]=vt[a-5],J=vt[a-6];break;case Ln:for(Xi<=Ii&&Hi(e),t=vt[a-2],i=vt[a-6-t][2][2][1],n=t-1;0<=n;--n)i[1][1]=vt[a-3-n],i=i[2];Ve[1]=vt[a-8-t],J=vt[a-9-t];break;case Kn:Xi<=Ii&&Hi(e);break;case Cn:break;case Bn:return vt[(bt=a)-4]!==Un?(vt[a-4]===zn&&(Ge[1]=e),vt[a-4]=Gn,dt=a+3,gt=vt[a+1],pt[gt++]=$n):(Ge[1]=e,bt<Nt&&Wa(),vt[a-4]=Xn,dt=a+3,gt=vt[a+1],Mr=vt[a-2],vt[dt++]=a-4,vt[dt++]=Mr[2][1],pt[gt++]=$n,pt[gt++]=On),Ge;case et:break;case Rn:if(Ve[1]=vt[a-6],J=vt[a-7],"future"==vt[a-8])vt[a-9][2][2][1][he][".exception"]=e;else{if("debugger"==oo(Ge[1]))break;if(!/fiberwake|escape|xcallback/.test(vt[a-8]))break}return Ge[1]=Ge,dt=a+3,gt=vt[a+1],me;default:Zi(Di,"nfuncThrow: unknown frame type on stack: "+u)}a=vt[a-1]}return Ge[1]!==Ge&&(e=Ge[1]),e[0]===ee&&e[1][0]===re&&"internal"==e[1][le]?e[2][1]!==Je&&Zi(Di,oo(e[2][1])):"debugger"!=oo(e)&&Zi(Di,"uncaught exception: "+oo(e)),Ft(),Rt(_e(["driver",101])),pt[gt++]=_r,Mr}function Si(e){xi(e,me),_r=pt[--gt]}function Oi(e,r){for(var n,t,i,a,u=bt;0<u;){var o=vt[u];switch(o){case Ln:if(t=vt[u-2],(a=vt[u-6-t])[1]!==Xe)return gt=vt[u+1],(bt=u)<Nt&&Wa(),dt=u+3,e;for(i=a[2][2][1],n=t-1;0<=n;--n)i[1][1]=vt[u-3-n],i=i[2];Ve[1]=vt[u-8-t],J=vt[u-9-t];break;case Dn:if((a=vt[u-3])[1]!==Xe)return gt=vt[u+1],(bt=u)<Nt&&Wa(),dt=u+3,e;t=vt[u-2],(i=a[2][2][1])!==me&&(i[1]=t),Ve[1]=vt[u-5],J=vt[u-6];break;case Kn:case Cn:break;case Bn:if(r)break;return vt[(bt=u)-4]=Jn,vt[u-3]=e,dt=u+3,gt=vt[u+1],pt[gt++]=$n,e;case et:case Rn:break;default:Zi(Di,"naanReturn: unknown frame type on stack: "+o)}u=vt[u-1]}return xi(_e(["internal","$orphaned return"]),me)}function Ni(e){for(var r,n,t,i,a=bt;0<a;){var u=vt[a];switch(u){case Ln:if(r=vt[a-2],(i=vt[a-6-r])[1]===Xe){for(t=i[2][2][1],n=r-1;0<=n;--n)t[1][1]=vt[a-3-n],t=t[2];Ve[1]=vt[a-8-r],J=vt[a-9-r];break}case Dn:a=-1;continue;case Kn:break;case Cn:if(vt[a+3]!==Re)break;if(e!==me&&Xu(e,vt[a+4][O])===me)break;return gt=vt[a+1],dt=(bt=a)+6,vt[a+3]=me,vt[a+5]=me,pt[gt++]=sn,it;case Bn:return vt[(bt=a)-5]=e,vt[a-4]=Zn,dt=a+3,gt=vt[a+1],pt[gt++]=$n,it;case et:case Rn:break;default:Zi(Di,"nfuncBreak: unknown frame type on stack: "+u)}a=vt[a-1]}return xi(_e(["internal",'$break tag "'+oo(e)+'" not found']),me)}function ji(e){for(var r,n,t,i,a=bt;0<a;){var u=vt[a];switch(u){case Ln:if(r=vt[a-2],(i=vt[a-6-r])[1]===Xe){for(t=i[2][2][1],n=r-1;0<=n;--n)t[1][1]=vt[a-3-n],t=t[2];Ve[1]=vt[a-8-r],J=vt[a-9-r];break}case Dn:a=-1;continue;case Kn:break;case Cn:if(vt[a+3]!==Re)break;if(e!==me&&Xu(e,vt[a+4][O])===me)break;return gt=vt[a+1],dt=(bt=a)+6,vt[a+5]=vt[a+4],pt[gt++]=sn,me;case Bn:return vt[(bt=a)-5]=e,vt[a-4]=Vn,dt=a+3,gt=vt[a+1],pt[gt++]=$n,it;case et:case Rn:break;default:Zi(Di,"nfuncContinue: unknown frame type on stack: "+u)}a=vt[a-1]}return xi(_e(["internal",'$continue tag "'+oo(e)+'" not found']),me)}function Pi(e,r){var n=[],t=[];function i(e){var r=Bu(e)!==me?e[se]:e,e=n.indexOf(r);return e<0&&(e=n.push(r)-1,t[e]={}),t[e]}function a(e,r){i(e)[e[le]]=r}function u(e){return i(e)[e[le]]}var o=me;e:for(;0<e;){var f,c,s,l,p,g,v,d,h,b,y,m=vt[e];switch(m){case Dn:g=vt[e-2],v=vt[e-3],d=vt[e-4],vt[e-5],y=vt[e-6],h=v[1],(f=u(b=v[2][2][1]))===D&&(f=b[1]),a(b,g),p=b===me?me:We(b,We(b[1],We(g,me))),l=We(h,We(d,We(p,We(v,We(y,me)))));break;case Ln:for(c=vt[e-2],v=vt[e-6-c],d=vt[e-7-c],vt[e-8-c],y=vt[e-9-c],h=v[1],b=v[2][2][1],p=me,s=c-1;0<=s;--s)(f=u(b[1]))===D&&(f=b[1][1]),p=We(We(b[1],We(f,We(vt[e-3-s],me))),p),b=b[2];for(b=v[2][2][1],s=c-1;0<=s;--s)a(b[1],vt[e-3-s]),b=b[2];l=We(h,We(d,We(p=xu(p,me),We(v,We(y,me)))));break;case Kn:for(c=vt[e-4],h=(v=vt[e-2])[0]===S?tr:gr,p=me,s=c-1;0<=s;--s)p=We(vt[e-4-c+s],p);l=We(h,We(p,We(v,me)));break;case Cn:l=We(h=vt[e+3]===me?Ye:Ke,We(vt[e+4],We(vt[e+5],me)));break;case Bn:l=We(h=er,We(vt[e-2],me));break;case et:break;case Rn:l=We(h=rr,We(vt[e-7],We(Me(vt[e-8]),We(vt[e-9],me))));break;default:return Zi(Di,"nfuncStacktrace: unknown frame type on stack: "+m),me}if(l[1]===me&&Zi(Di,"nfuncStacktrace: bad frameid"),o=We(l,o),e=vt[e-1],"number"==typeof r&&e<=r)break e}return xu(o,me)}function Ai(e,r){for(var n=bt;0<n;){var t=vt[n];switch(t){case Dn:case Ln:case Kn:case Cn:case Bn:case et:case Rn:if(0<e--){n=vt[n-1];continue}var i=vt[n+2];return i=i||(r?vt[n+2]=fa():me);default:return Zi(Di,"naanFrameHook: unknown frame type on stack: "+t),me}}return me}function Ti(e){for(var r,n=bt;0<n;){var t=vt[n];switch(t){case Dn:return vt[n-3];case Ln:return r=vt[n-2],vt[n-6-r];case Kn:case Cn:case Bn:case et:case Rn:break;default:return Zi(Di,"nfuncCaller: unknown frame type on stack: "+t),me}n=vt[n-1]}return me}function Ei(e,r){var n,t,i,a,u,o,f,c,s;function l(e){switch(e){case Ln:case Dn:case Kn:case Bn:case et:case Rn:return 3;case Cn:return 6}}(s=[]).saveSelf=Ve[1],s.saveExecNS=J,s.stephook=mt,s.stepping=yt,s.stack1=Mr,s.stack2=Ir,s.stack3=Wr,s.stack4=$r,s.runLimit=St,a=bt,u=dt,f=gt;e:for(;0<a;){switch(n={},0!==Nt&&Nt<a&&(n.sprint=!0),n.ftype=vt[a],o=a+l(n.ftype),n.runargs=vt.slice(o,u),n.ftype){case Ln:for(n.argcount=vt[a-2],u=a-9-n.argcount,n.execNS=vt[a-9-n.argcount],n.saveSelf=vt[a-8-n.argcount],n.fname=vt[a-7-n.argcount],n.fbind=vt[a-6-n.argcount],n.feval=vt[a-5-n.argcount],n.inarg=vt[a-4-n.argcount],n.inparm=vt[a-3-n.argcount],n.arglist=[],i=n.fbind[2][2][1],t=n.argcount-1;0<=t;--t)n.arglist.push(i[1][1]),i=i[2];if(c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r){if(n.fbind[1]===De||n.fbind[1]===ze)for(i=n.fbind[2][2][1],t=n.argcount-1;0<=t;--t)i[1]!==me&&(i[1][1]=vt[a-3-t]),i=i[2];Ve[1]=n.saveSelf,J=n.execNS}if(!0===e&&n.fbind[1]!==Xe)break e;break;case Dn:if(u=a-6,n.execNS=vt[a-6],n.saveSelf=vt[a-5],n.fname=vt[a-4],n.fbind=vt[a-3],i=n.fbind[2][2][1],n.arg=i[1],c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r&&(n.fbind[1]!==De&&n.fbind[1]!==ze||i===me||(i[1]=vt[a-2]),Ve[1]=n.saveSelf,J=n.execNS),!0===e)break e;break;case Kn:for(n.argcount=vt[a-4],u=a-6-n.argcount,n.targetThis=vt[a-6-n.argcount],n.arglist=[],t=n.argcount-1;0<=t;--t)n.arglist.push(vt[a-5-t]);n.inarg=vt[a-3],n.fbind=vt[a-2],c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r&&(Ve[1]=n.saveSelf,J=n.execNS);break;case Cn:u=a-1,n.loop=vt[a+3],n.body=vt[a+4],n.task=vt[a+5],c=vt[a+1],n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n);break;case Bn:case et:u=a-5,n.tag=vt[a-5],n.status=vt[a-4],n.result=vt[a-3],n.catchargs=vt[a-2],c=vt[a+1],n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n);break;case Rn:break e;default:Zi(Di,"naanSaveProcState: unknown frame type on stack: "+n.ftype)}if(a=vt[a-1],f=c,"number"==typeof e&&a<=e)break e}return r&&((bt=a)<Nt&&Wa(),dt=0===bt?0:a+l(vt[bt]),gt=c),s}function Mi(e){var r,n,t,i,a;for(St=e.runLimit,r=e.length-1;0<=r;--r){switch((n=e[r]).ftype){case Ln:for(vt[dt++]=n.execNS,vt[dt++]=n.saveSelf,vt[dt++]=n.fname,vt[dt++]=n.fbind,vt[dt++]=n.feval,vt[dt++]=n.inarg,vt[dt++]=n.inparm,i=n.fbind[2][2][1],t=0;t<n.argcount;++t)vt[dt++]=i[1][1],n.fbind[1]!==De&&n.fbind[1]!==ze||i[1]===me||(i[1][1]=n.arglist[t]),i=i[2];vt[dt++]=n.argcount,vt[dt++]=bt,bt=dt,vt[dt++]=Ln,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Dn:vt[dt++]=n.execNS,vt[dt++]=n.saveSelf,vt[dt++]=n.fname,vt[dt++]=n.fbind,i=n.fbind[2][2][1],vt[dt++]=i[1],n.fbind[1]!==De&&n.fbind[1]!==ze||i===me||(i[1][1]=n.arg),vt[dt++]=bt,bt=dt,vt[dt++]=Dn,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Kn:for(vt[dt++]=n.targetThis,t=0;t<n.argcount;++t)vt[dt++]=n.arglist[t];vt[dt++]=n.argcount,vt[dt++]=n.inarg,vt[dt++]=n.fbind,vt[dt++]=bt,bt=dt,vt[dt++]=Kn,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Cn:vt[dt++]=bt,bt=dt,vt[dt++]=Cn,vt[dt++]=gt,vt[dt++]=n.hook,vt[dt++]=n.loop,vt[dt++]=n.body,vt[dt++]=n.task;break;case Bn:case et:vt[dt++]=n.tag,vt[dt++]=n.status,vt[dt++]=n.result,vt[dt++]=n.catchargs,vt[dt++]=bt,bt=dt,vt[dt++]=n.ftype,vt[dt++]=gt,vt[dt++]=n.hook;break;case Rn:default:Zi(Di,"naanRunProcState: unknown frame type on stack: "+n.ftype)}for(a=0;a<n.runstates.length;++a)pt[gt++]=n.runstates[a];for(t=0;t<n.runargs.length;++t)vt[dt++]=n.runargs[t];n.sprint&&(0===Nt?Ia():bt<Nt&&(Nt=bt))}Mr=e.stack1,Ir=e.stack2,Wr=e.stack3,$r=e.stack4,mt=e.stephook,yt=e.stepping,Ve[1]=e.saveSelf,J=e.saveExecNS}var Ii=Di,Wi=0,$i=0,_i=30,qi=0,Fi=3*_i,Ri="",Ci=0,Bi=0,Di=1,Li=2,Ui=3,Xi=4,zi=5,Gi=me,Ji=Gi[1];function Zi(e,r){if(e<=Ii&&A.hasOwnProperty("debug-write"))try{A["debug-write"](r,e)}catch(e){}}function Vi(){var e="",r=0;for((Fi<=Wi||Wi<qi)&&($i=Math.floor(Wi/_i)*_i-2*_i,qi=$i+_i,Fi=$i+3*_i,0<$i&&(e="*")),0<$i&&(e+=Wi.toString(),e="     ".substring(e.length)+e+"   ",r=$i);r++<Wi;)e+=r%2==0?"|   ":"    ";return e}function Qi(e,r,n,t){0<Ri.length&&Zi(Ci,Ri);for(var i=n,a="";i[g]===ee;)0<a.length&&(a+=" "),t&&i[1][0]===re?a+=oo(i[1][1],{quote:Re}):a+=oo(i[1],{quote:Re}),i=i[N];Ri=Vi()+r+"("+a+")",Ci=e,++Wi}function Hi(e){--Wi<0&&(Wi=0),0<Ri.length?(Zi(Ci,Ri+"==> unknown"),Ri=""):Zi(Xi,Vi()+"==> unknown"),Zi(Xi,"==> proc terminated by throw: ",oo(e))}function Yi(e,r){var n;e[he].steps?(0<=(n=Da(e[he].steps,65535))&&(yt=n+1,mt=e[he].trap),delete e[he].steps):Ct(We(mi,We(e[he].trap,We(r,me))),"frametrap"),delete e[he].trap}function Ki(e,r){for(var n="",t=0;t<e;++t)n+=oo(r(t)),t<e-1&&(n+=" ");return""!==n&&Zi(J===X||J===z?Ui:Li,n),Re}function ea(e,r){function i(e,r){if(e[0]===oe){var n,t=e[he];if(!K(t)||!ua(t))return;for(n=0;n<t.length;++n)i(t[n],r)}else{if(e[0]!==ee)return;r===qe?delete e[1].breakpoint:e[1].breakpoint=r}return 1}if(0===e)return T(ra[1]===ra);var n=r(0);if(n[0]===re)return 1<e?me:(n===Re?ra[1]=ra:n===me&&(ra[1]=me),T(ra[1]===ra));if(2<e)return me;var t=r(1);if(t!==me){if(t!==qe){e=fa(),r=e[he];return r.enable=Re,r.proc=t,i(n,e)?e:me}i(n,t)}else if(n[1].breakpoint)return n[1].breakpoint;return me}var ra=Pe("breakpoint",ea,S);var na="*饢* Rcz *饢*",ta=function(){};function ia(e){var p=new WeakMap;return function e(r){var n,t;if(p.get(r))return p.get(r);if(K(t=r[he])){n=aa(sr,me),p.set(r,n);for(var i,a=n[he],u=0;u<t.length;++u)(i=t[u])[0]===oe&&ua(i[he])?a[u]=e(i):a[u]=i}else{n=(r[3]instanceof ca?sa:fa)(),p.set(r,n),n[2]=r[2];for(var o,f=n[he],c=Object.getOwnPropertyNames(t),s=0;s<c.length;++s){var l=t[o=c[s]];l[0]===oe&&ua(l[he])?f[o]=e(l):f[o]=l}}return n}(e)}function aa(e,r,n){if(e===me)return me;if(e===lr)return r[0]!==oe||K(r[he])?function(e){for(var r=fa();e[g]===ee;){var n=e[O];n[g]===ee&&Aa(r,n[O],n[N]),e=e[N]}return r}(r):(ua(r[he])?fa:wa)(r[he]);if(e===pr){var t=sa();return r[0]===re&&r[3][1]===Ue&&(Ku(t,xr,r),Ku(t,Sr,Ou(_e(["function","lambda","false",["strcat","${object ",r[3][2][1][le],"$}"]]),me))),t}if(e===sr){if(r[0]===oe&&K(r[he])){if(!ua(r[he]))return ka(r[he],new WeakMap);a=r[he].slice()}else a=Se(r);return a[na]=ta,Ie(a)}if(e[0]===oe)return ua(e[he])?ia(e):ka(e[he],new WeakMap);if(e!==vr)return e===dr?(i=Ie(!1),a=new da(i),i[x]=me,i[he]=a,i):e===hr?((i=Ie(new WeakMap))[x]=me,i):e===br?function(e,r){if(e!==me&&e[0]!==ne||r!==me&&r!==cr&&r[0]!==ee)return me;{var n,t;e[0]===ne&&r[0]===ee&&(n=Da(r[1],Number.MAX_SAFE_INTEGER),t=Da(r[2][1],Number.MAX_SAFE_INTEGER),r=me,t={Line:n,Column:t})}return lo(e,r,t)}(r,n):me;if(r[0]!==ne&&r[0]!==te)return me;var i,a,r=Q(r);return Z.splice(0,0,r),r}function ua(e){return K(e)?e[na]===ta:e instanceof ta}function oa(){}function fa(e){var r=Ie(me),n=new oa;return e&&Object.assign(n,e),r[he]=n,r}function ca(){}function sa(){var e=Ie(me),r=new ca;return e[he]=r,e}function la(r,n){this.stacktrace=Pe("stacktrace",function(){_r=pt[--gt],Ct(We(Qe,We(r,me)),"fiberwake",!0);var e=bt;return Mi(n),e=Pi(bt,e),Ei(!1,!0),e},ae,!0)[ce]}(oa.prototype=Object.create(ta.prototype)).constructor=oa,(ca.prototype=Object.create(ta.prototype)).constructor=ca,(la.prototype=Object.create(ta.prototype)).constructor=la;var pa=0,ga={};function va(e){return null===(e=Da(e,Number.MAX_SAFE_INTEGER))||e<0?e=D:2147483647<e&&(e=2147483647),e}function da(i,n,r){var t,a,u,o=[],f=0,c=++pa;function s(e,r){return r&&0<r?(l(),ga[c].delay=r,setTimeout(e,r)):(Promise.resolve().then(e),-1)}function l(e){var r=ga[c];(r=r||{nonce:i,start:(new Date).getTime(),waiting:[],contins:[]}).count=f,n&&(r.execute=n),e&&r.waiting.push(e),ga[c]=r}function p(){a&&clearTimeout(a),a=D}function g(){u&&clearTimeout(u),u=D}function v(e){var r=i[he];if(r.hasOwnProperty(".exception")){var n=r[".exception"];return delete r[".exception"],e?xi(n,me):Si(n)}return e}function d(e){if(e===D)return me;if(t!==D)return me;g();var r=Re;for(a&&(!0===a?r=me:p()),t=e;0<o.length;)!function(n,t){var e;ga[c].contins.shift(),(e=ga[c])&&e.waiting.pop(),s(function(){var e,r;e=n,r=t,Ct(We(Qe,We(i,me)),"fiberwake"),Mi(e),Mr=r,v(),Dt(tt)})}(o.shift(),t);return $a(),delete ga[c],r}function h(e){var r=J,n=Ve[1];return function(){!0!==a&&(++f,a=!0,Ct(We(mi,We(e,We(i,me))),"future"),Ve[1]=n,J=r,Dt(!0),d(at),A.hasOwnProperty("interrupted")&&A.interrupted(y))}}n&&0<=r&&(a=s(h(n),r)),this.wait=Pe("wait",function(e,r){return t!==D?v(t):(0<(n=va(e))&&(u=setTimeout(function(){d(r)},n)),l(Ti()),e=Ei(!1,!0),o.push(e),ga[c].contins.push((n=e,e=Ie(!1),n=new la(e,n),e[x]=me,e[he]=n,e)),++Mt,Re);var n},ae,!0)[ce],this.signal=Pe("signal",d,ae,!0)[ce],this.reset=Pe("reset",function(e){return!0===a&&t===D?xi(_e(["internal","$can't reschedule future within itself"]),me):(t=D,g(),n&&(p(),e=va(e),r=0<=e?e:r||0,a=s(h(n),r)),i)},ae,!0)[ce]}function ha(e,r,n){for(var t,i=e;i[0]===oe;){var a,u=i[3];if(i[2][0]===oe&&i[2][3]instanceof oa)a=i[2][3],n&&(u=a);else if(n)break;if(u.hasOwnProperty(r))return u[r];if(!t&&a&&a.hasOwnProperty(".class"))t=i=a[".class"];else{if(!a||!a.hasOwnProperty(".parent"))break;i=a[".parent"]}}return me}function ba(e,r,n){var t=Ee(r);if(e[0]!==oe)return e===me&&a.ignoreWriteParamOnFalse?me:xi(_e(["internal","$attempted "+function(r){var e=me;if(r!==me&&(e=Cu(1,function(e){return 0===e?r:me}))===me)return"unknown";return e[le]}(e)+"['"+t+"'] = value"]),me);if(e[3]instanceof ca){var i,t=ha(e,".="+t,!0);if(t!==me?i=We(n,me):(t=ha(e,".=undefined",!0))!==me&&(i=We(r,We(n,me))),t!==me)return Tr(e,!0)?($r=r,vt[dt++]=e,pt[gt++]=Dr,Ir=i,Wr=Re,t[0]===re&&(t=E(t[ce])),pt[gt++]=Qn,t):Mr}return Aa(e,r,n)}function ya(e,r){for(var n=me,t=n,i=0;i<e.length;++i){var a=new Array(l),u=(r?ma:v)(u=e[i]);a[0]=ee,a[1]=u,t!==(a[2]=me)?t[2]=a:n=a,t=a}return n}function ma(e){return"string"==typeof e?Me(e):"number"==typeof e?(isFinite(e)&&Math.floor(e)==e?qa:Fa)(e):"boolean"==typeof e?T(e):e===D?qe:null===e?Fe:"object"==typeof e&&ua(e)?e:Ie(e)}function ka(e,r){if(e===D)return qe;if(null===e)return Fe;if("object"!=typeof e||ua(e))return ma(e);if(r.get(e))return r.get(e);var n=Ie(e);if(r.set(e,n),K(e)){for(var t=e.length,i=[],a=0;a<t;++a)i.push(ka(e[a],r));i[na]=ta}else{var u,o=Object.getOwnPropertyNames(e);if(0===o.length&&e.constructor!==Object)i=e;else if("0"===o[0]&&o[o.length-1]===(o.length-1).toString()&&"function"==typeof e.keys)i=e;else for(i=new oa,u=0;u<o.length;++u)try{i[o[u]]=ka(e[o[u]],r)}catch(e){}}return n[he]=i,n}function wa(e){if(e===D)return qe;if(null===e)return Fe;if("object"!=typeof e||ua(e))return ma(e);for(var r=Object.getOwnPropertyNames(e),n=new oa,t=0;t<r.length;++t)try{n[r[t]]=ma(e[r[t]])}catch(e){}return Ie(n)}function xa(r,e,n){if(r[0]===ee){if(we(r[1])){var t,i=J,a=Ve[1];return function(){t=ya(arguments,!n||n.convert),Ct(We(mi,We(r,t)),"xcallback",n&&n.retresult),Ve[1]=a,J=i;var e=Mt;return Dt(!null),e==Mt||(e=r[2][1][2][3])&&e.hasOwnProperty(".suspend")&&(at=e[".suspend"]),A.hasOwnProperty("interrupted")&&A.interrupted(y),n&&!n.convert||(at=xa(at)),at}}for(c=[];r[0]===ee;)c.push(xa(r[1],e)),r=r[2];return c}if(r[0]===re)return r===Re||r!==me&&(r===qe?D:r===Fe?null:r[le]);if(r[0]===ne)return r[pe];if(r[0]===te)return Ba(r[3]);if(r[0]===ie)return r[ve];if(r[0]===oe){var u=r[he];if(!ua(u))return u;if(e){if(e.get(u))return e.get(u)}else e=new WeakMap;if(K(u)){var o,f=u.length,c=[];for(e.set(u,c),o=0;o<f;++o)c.push(xa(u[o],e))}else{var s,l=Object.getOwnPropertyNames(u);for(c={},e.set(u,c),s=0;s<l.length;++s)c[l[s]]=xa(u[l[s]],e)}}return c}function Sa(e){if(e[0]===ee)return e;if(e[0]!==oe)return me;var r=e[he],n=ua(r);if(K(r))return ya(r,!n);for(var t=Object.getOwnPropertyNames(r),i=me,a=t.length-1;0<=a;--a)try{var u,o=t[a];o!==D&&r[o]!==D&&(u=r[o],n||(u=ma(u)),i=We(We(ma(o),u),i))}catch(e){}return i}function Oa(e,r){if(e[0]!==oe)return me;var n,e=e[he];if(r[0]===re)n=r[le];else{if(r[0]!==ne)return me;n=r[pe]}return T(e.hasOwnProperty(n))}function Na(e){if(e[0]===w)return Su(e);if(e[0]!==oe)return me;e=e[he];return K(e)?me:ya(Object.getOwnPropertyNames(e),!0)}function ja(e,r){if(r===me&&(r=G),e[0]!==oe||r[0]!==w)return me;if(J!==X){if(e[se]!==me)return e[se]==r?e:me;if(r!==G&&r!==J&&r!==Z[0])return xi(_e(["internal","$can't lock "+oo(e)+" to "+Ne(r)]),me),me}return e[se]=r,e}function Pa(e,r){if(e[0]!==oe)return me;var n=e[3];if(n instanceof WeakMap&&r[0]!==ne&&r[0]!==te&&r[0]!==ie){e=n.get(r);return e===D&&(e=me),v(e)}if(r[0]===ee||r[0]===oe&&ua(r))return me;var t=xa(r);try{return ua(n)||n instanceof WeakMap?K(n)&&"length"==t?ma(n.length):n.hasOwnProperty(t)?v(n[t]):me:ma(n[t])}catch(e){return xi(_e(["internal",'$xget "'+t+'": '+e.toString()]),me)}}function Aa(e,r,n){if(e[0]!==oe)return me;var t=e[3];if(t instanceof WeakMap&&r[0]!==ne&&r[0]!==te&&r[0]!==ie)return Tr(e,!0)?(n===qe?t.delete(r):t.set(r,n),n):Mr;if(r[0]===ee||r[0]===oe&&ua(r))return me;if(!Tr(e,!0))return Mr;var i=xa(r);try{if(jt=1,_r=qr,n===qe)delete t[i];else if(ua(t)||t instanceof WeakMap)if(K(t))if("length"==i)t.length=xa(n);else{var a,u=parseInt(i);if(u!=u+"")return jt=-1,xi(_e(["internal","$non-numeric array index"]),me);for(t[i]=n,a=0;a<i;++a)t[a]===D&&(t[a]=me)}else t[i]=n;else t[i]=xa(n);return jt=-1,n}catch(e){return jt=-1,xi(_e(["internal",'$xset "'+i+'": '+e.toString()]),me)}}function Ta(e,r,n,t,i){if(r[0]===ee||r[0]===oe&&ua(r[3]))return me;var a=xa(r),u=null;if(e&&e[0]===oe){if(ua(u=e[3]))return me;if(u instanceof WeakMap)return me}for(var o,f=me,c=u===Number||u===String||u===Boolean,s=[],l=0;l<n;++l)s[l]=xa(i(l+t));try{return jt=1,_r=qr,r[0]===oe?f=ma(r[3].apply(u,s)):(!u||u.prototype!==D&&(o=u.prototype[a])!==D||(c=!1,o=u[a]),o!==D&&(f=ma(c?o.apply(s[0],s.slice(1)):o.apply(u,s)))),jt=-1,f}catch(e){return jt=-1,xi(_e(["internal",'$xcall "'+a+'": '+e.toString()]),me)}}function Ea(e,r){return Ia(),0<e?Ma(r(0),e-1,1,r):Ma(D,0,0,r)}function Ma(e,r,n,t){var i;if(e===D)return(i=ma({}))[x]=wa({persist:!0}),i;if(e[0]===ne||e[0]===re)return ma(s[Ee(e)]);if(e[0]===te)return Ie(L.bigInt2uint8(e[ge]));if(e[0]===ee)return Ie(xa(e));if(e[0]!==oe)return me;var a,u=e[3];if(ua(u))return ma(xa(e));if(u===WeakMap)return me;try{if("function"==typeof u){for(var o=[null],f=0;f<r;++f)o.push(xa(t(f+n)));jt=1,_r=qr;var c=new(Function.prototype.bind.apply(u,o));return jt=-1,Ie(c)}if(1<r)return me;c=t(n);return jt=1,_r=qr,i=0===r?("object"==typeof(a=Object.create(u))?Ie:ma)(a):c[0]!==oe?me:("object"==typeof(a=Object.create(u,c[3]))?Ie:ma)(a),jt=-1,i}catch(e){return jt=-1,xi(_e(["internal","$xnew: "+e.toString()]),me)}}function Ia(){0===Nt&&(Ot=St,Nt=bt,yr[1]=Re)}function Wa(){bt<Nt&&(St=Ot,Nt=0,yr[1]=me,nt=xt,xt=wt)}function $a(){jt=-1}function _a(e,r){var n=new Array(u);return n[0]=te,(n[1]=n)[2]=r,n[3]=e,n}function qa(e,r){return"number"!=typeof e||isNaN(e)?me:(r=r||me,_a(Ra(e),r))}function Fa(e){var r=new Array(o);return r[0]=ie,(r[1]=r)[2]=me,r[3]=e,r}function Ra(e){var r=Math.abs(e);"number"==typeof r&&!isNaN(r)||(r=0);r=L.int2bigInt(r,i,1);return e<0&&(r=L.negate(r)),L.trim(r,1)}function Ca(e,r){var n=L.int2bigInt(r,64,1),t=1;return L.negative(e)&&(e=L.negate(e),t=-1),L.greater(e,n)?null:t*L.modInt(e,r+1)}function Ba(e){var r=L.negative(e);r&&(e=L.negate(e));var n,t=L.bitSize(e);return e=i<t?Number.POSITIVE_INFINITY:k<t?(n=L.rightShift(e,t-k),L.modInt(n,Number.MAX_VALUE)*Math.pow(2,t-k)):L.modInt(e,Number.MAX_SAFE_INTEGER+1),r?-e:e}function Da(e,r){if(e[0]===te)return Ca(e[3],r);if(e[0]===ie){e=e[3];if(-r<=e&&e<=r)return e}return null}function La(e,r,n,t){return e[0]===te?_a(L.negate(e[3]),me):e[0]===ie?Fa(-e[3]):e[0]===oe&&e[3]instanceof ca?Ht(e,".negate"):Qt(B(t[2][1],"extendNegate"))}function Ua(e,r){return e[0]===te&&r[0]===te?_a(L.add(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]+r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])+r[3]):e[0]===ie&&r[0]===te?Fa(e[3]+Ba(r[3])):me}function Xa(e,r,n){var t;if(2==e&&(t=Ua(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".plus")}return Qt(B(n[2][1],"extend+"))}function za(e,r){return e[0]===te&&r[0]===te?_a(L.sub(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]-r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])-r[3]):e[0]===ie&&r[0]===te?Fa(e[3]-Ba(r[3])):me}function Ga(e,r,n){var t;if(2==e&&(t=za(r(0),r(1)))!==me)return t;if(1==e)return La(r(0),0,0,n);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".difference")}return Qt(B(n[2][1],"extend-"))}function Ja(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]*r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])*r[3]):e[0]===ie&&r[0]===te?Fa(e[3]*Ba(r[3])):me;var n=e[3],t=r[3],i=L.negative(n),e=L.negative(t);return i&&(n=L.negate(n)),e&&(t=L.negate(t)),n=L.greater(n,r[3])?L.mult(n,t):L.mult(t,n),i!=e&&(n=L.negate(n)),_a(n,me)}function Za(e,r,n){var t;if(2==e&&(t=Ja(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".times")}return Qt(B(n[2][1],"extend*"))}function Va(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]/r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])/r[3]):e[0]===ie&&r[0]===te?Fa(e[3]/Ba(r[3])):me;if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var n=e[3],t=r[3],i=L.negative(n),a=L.negative(t);i&&(n=L.negate(n)),a&&(t=L.negate(t));var u=L.dup(n),e=L.dup(n),r=a;return L.divide_(n,t,u,e),i&&(r=!a,L.isZero(e)||(u=L.addInt(u,1),e=L.sub(t,e))),r&&(u=L.negate(u)),_a(L.trim(u,1),me)}function Qa(e,r,n,t){var i;return(i=Va(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".quotient"):r[0]===oe&&r[3]instanceof ca?Ht(r,".quotient"):Qt(B(t[2][1],"extend/"))}function Ha(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]%r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])%r[3]):e[0]===ie&&r[0]===te?Fa(e[3]%Ba(r[3])):me;if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var n=e[3],t=r[3],i=L.negative(n),e=L.negative(t);i&&(n=L.negate(n)),e&&(t=L.negate(t));r=L.dup(n),e=L.dup(n);return L.divide_(n,t,r,e),i&&(L.isZero(e)||(e=L.sub(t,e))),_a(L.trim(e,1),me)}function Ya(e,r,n,t){var i;return(i=Ha(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".modulo"):r[0]===oe&&r[3]instanceof ca?Ht(r,".modulo"):Qt(B(t[2][1],"extendMod"))}function Ka(e,r){return e[0]===te&&r[0]===te?_a(L.and(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]&r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])&r[3]):e[0]===ie&&r[0]===te?Fa(e[3]&Ba(r[3])):me}function eu(e,r,n){var t;if(2==e&&(t=Ka(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitand")}return Qt(B(n[2][1],"extendBitAnd"))}function ru(e,r){return e[0]===te&&r[0]===te?_a(L.or(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]|r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])|r[3]):e[0]===ie&&r[0]===te?Fa(e[3]|Ba(r[3])):me}function nu(e,r,n){var t;if(2==e&&(t=ru(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitor")}return Qt(B(n[2][1],"extendBitOr"))}function tu(e,r){return e[0]===te&&r[0]===te?_a(L.xor(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]^r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])^r[3]):e[0]===ie&&r[0]===te?Fa(e[3]^Ba(r[3])):me}function iu(e,r,n){var t;if(2==e&&(t=tu(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitxor")}return Qt(B(n[2][1],"extendBitXor"))}function au(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]<<r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])<<r[3]):e[0]===ie&&r[0]===te?Fa(e[3]<<Ba(r[3])):me;r=Ba(r[3]);if(r<0)r=0;else if(n<r)return xi(_e(["internal","shiftleft > ".concat(n)]),me);return _a(L.leftShift(e[3],r),me)}function uu(e,r,n,t){var i;return(i=au(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".shiftleft"):r[0]===oe&&r[3]instanceof ca?Ht(r,".shiftleft"):Qt(B(t[2][1],"extendShiftLeft"))}function ou(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]>>r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])>>r[3]):e[0]===ie&&r[0]===te?Fa(e[3]>>Ba(r[3])):me;r=Ba(r[3]);return r<0&&(r=0),_a(L.rightShift(e[3],r),me)}function fu(e,r,n,t){var i;return(i=ou(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".shiftright"):r[0]===oe&&r[3]instanceof ca?Ht(r,".shiftright"):Qt(B(t[2][1],"extendShiftRight"))}function cu(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?T(e[3]>r[3]):e[0]===te&&r[0]===ie?T(Ba(e[3])>r[3]):e[0]===ie&&r[0]===te?T(e[3]>Ba(r[3])):e[0]===ne&&r[0]===ne?T(e[pe]>r[pe]):e[0]===oe&&e[3]instanceof ca?Ht(e,".greater"):r[0]===oe&&r[3]instanceof ca?Ht(r,".greater"):t?Qt(B(t[2][1],"extend>")):me;if(L.equals(e[3],r[3]))return me;if(L.negative(e[3])){if(!L.negative(r[3]))return me;var i=L.negate(e[3]),t=L.negate(r[3]),i=L.greater(t,i)}else{if(L.negative(r[3]))return Re;i=L.greater(e[3],r[3])}return T(i)}function su(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?T(e[3]<r[3]):e[0]===te&&r[0]===ie?T(Ba(e[3])<r[3]):e[0]===ie&&r[0]===te?T(e[3]<Ba(r[3])):e[0]===ne&&r[0]===ne?T(e[pe]<r[pe]):e[0]===oe&&e[3]instanceof ca?Ht(e,".lesser"):r[0]===oe&&r[3]instanceof ca?Ht(r,".lesser"):t?Qt(B(t[2][1],"extend<")):me;if(L.equals(e[3],r[3]))return me;if(L.negative(e[3])){if(!L.negative(r[3]))return Re;var i=L.negate(e[3]),t=L.negate(r[3]),i=L.greater(t,i)}else{if(L.negative(r[3]))return me;i=L.greater(e[3],r[3])}return i?me:Re}function lu(e){return null!==(e=Da(e,36))&&2<=e?e:-1}function pu(e){return e[x]!==me&&ke(e[x][he].hexcon)}function gu(e){return e[1]}function vu(e){return e[1]}function du(e){return e[2]}function hu(e){return e[1][1]}function bu(e){return e[2][1]}function yu(e){return e[2][2]}function mu(e){return e[2][1][1]}function ku(e){return e[2][2][1]}function wu(e){return e[2][2][2]}function xu(e,r){for(;e[0]===ee;)r=We(e[1],r),e=e[2];return r}function Su(e){var r,n;if(e[0]===w&&0<=(n=Oe.indexOf(e)))r=Oe[n][be];else{if(e!==me)return me;r=Z[0][be]}for(var t=me,i=null,a=0;a<r.length;++a){var u=We(r[a],me);i?i[2]=u:t=u,i=u}return t}function Ou(e,r){var n;r===me&&(r=(n=e[2][1])===Ce?Z[0]:n!==me?n[se]:me);r=Er(e,r);return"string"==typeof r?xi(_e(["internal",r]),me):Tr(r[2][1])?r:Mr}function Nu(e,r){for(;e;){if(e===r.prototype)return 1;e=Object.getPrototypeOf(e)}}(da.prototype=Object.create(ta.prototype)).constructor=da;var ju=100,Pu=101,Au=102,Tu=103,Eu=104,Mu=105,Iu=106,Wu=107,$u=108,_u=109,qu=110,Fu=111;function Ru(e,r){if(!e)return-1;for(var n=!1,t=0;t<e;++t){var i=r(t),a=i[0];if(a===oe&&ua(i[he])?a=K(i[he])?Pu:i[he]instanceof ca?Tu:i[he]instanceof da?Eu:i[he]instanceof la?Mu:i[he]instanceof WeakMap?Iu:i[he]instanceof so?Wu:Au:a===ee?a=we(i[1])?qu:Fu:ae<=a&&a<=ue&&(a=_u),n){if(a!==n)if(n===te&&a===ie||n===ie&&a===te)n=ju;else if(n!==ju||n!==ie&&a!==te)if(n===re&&a===ne||n===ne&&a===re)n=$u;else if(n!==$u||n!==re&&a!==ne){if(!(n===qu&&a===Fu||a===Fu&&a===qu))return-1;n=Fu}else;else;}else n=a}return n}function Cu(e,r){switch(Ru(e,r)){case ee:return ir;case re:return ar;case ne:return cr;case te:return ur;case ie:return or;case ae:case S:return tr;case ue:return Le;case oe:return gr;case w:return vr;case ju:return fr;case Pu:return sr;case Au:return lr;case Tu:return pr;case Eu:return dr;case Iu:return hr;case Wu:return br;case _u:return tr;case Fu:return ir}return me}function Bu(e){return e[0]===re&&e[se][be][e[se][ye][e[le]]]===e?e:e[0]===ne?R(e[pe]):me}function Du(e){var r;if(e[0]===re)r=e[le];else{if(e[0]!==ne)return me;r=e[pe]}return Pr(r)[ce]}function Lu(e){return T(e[0]===oe&&e[3]instanceof oa)}function Uu(e,r){if(0===e)return me;for(var n=0;n<e;++n)if(r(n)[0]===ee)return me;return Re}function Xu(e,r,n,t){return e[0]===te&&r[0]===te?T(L.equals(e[3],r[3])):e[0]===ie&&r[0]===ie?T(e[3]===r[3]):e[0]===te&&r[0]===ie||e[0]===ie&&r[0]===te?e[0]===oe&&e[3]instanceof ca?Ht(e,".eq"):r[0]===oe&&r[3]instanceof ca?Ht(r,".eq"):Qt(B(t[2][1],"extendEq")):e[0]===ne&&r[0]===ne||e[0]===oe&&r[0]===oe?T(e[3]===r[3]):T(e==r)}function zu(e,r,n,t){return e[0]===re&&r[0]===re?e===r||e[le]===r[le]?Re:me:e[0]===te&&r[0]===ie?T(Ba(e[3])==r[3]):e[0]===ie&&r[0]===te?T(e[3]==Ba(r[3])):e[0]===ae&&r[0]===ae||e[0]===S&&r[0]===S||e[0]===ue&&r[0]===ue?T(e[de]===r[de]):Xu(e,r,0,t)}function Gu(e,r){for(;;){if(e[0]!==ee)return(e[0]===oe&&ua(e[he])?function(e,r){var b=[],y=[];function m(e,r){for(;;){if(e[0]!==ee)return(e[0]===oe&&ua(e[he])?k:zu)(e,r);if(r[0]!==ee)return me;if(m(e[1],r[1])===me)return me;e=e[2],r=r[2]}}function k(e,r){var n;if(e===r)return Re;if(K(e[he])){if(!K(r[he]))return me;var t,i,a,u=e[he],o=r[he];if(u.length!=o.length)return me;for(t=0;t<u.length;++t)if(i=u[t],a=o[t],"number"==typeof i){if(i!=a)return me}else if(i[0]===oe&&ua(i[he])){if((n=b.indexOf(i))!=y.indexOf(a))return me;if(n<0&&(n=b.length,b.push(i),y.push(a),k(i,a)===me))return me;u[t]=n,o[t]=n}else if(m(i,a)===me)return me}else{if(K(r[he]))return me;var f,c,s,l=e[he],p=r[he],g=Object.getOwnPropertyNames(l).sort(),v=Object.getOwnPropertyNames(p).sort();if(g.length!=v.length)return me;for(f=0;f<g.length;++f){if((c=g[f])!=(s=v[f]))return me;var d=l[c],h=p[s];if("number"==typeof d){if(d!=h)return me}else if(d[0]===oe&&ua(d[he])){if((n=b.indexOf(d))!=y.indexOf(h))return me;if(n<0&&(n=b.length,b.push(d),y.push(h),k(d,h)===me))return me;l[c]=n,p[s]=n}else if(m(d,h)===me)return me}}return Re}function s(e,r){if(e[0]===oe&&ua(e[he]))if(K(e[he]))for(var n,t=e[he],i=0;i<t.length;++i)"number"==typeof(n=t[i])&&(n=r[n],t[i]=n),s(n,r);else for(var a,u=e[he],o=Object.getOwnPropertyNames(u),f=0;f<o.length;++f){var c=u[a=o[f]];"number"==typeof c&&(c=r[c],u[a]=c),s(c,r)}else e[0]===ee&&(s(e[1],r),s(e[2],r))}if(e[0]!==oe||!ua(e[he]))return me;if(r[0]!==oe||!ua(r[he]))return me;var n=k(e,r);return s(e,b),s(r,y),n}:zu)(e,r);if(r[0]!==ee)return me;if(Gu(e[1],r[1])===me)return me;e=e[2],r=r[2]}}function Ju(e,r){for(;;){if(r[0]!==ee)return me;if(Gu(e,r[1])===Re)return r;r=r[2]}}function Zu(e,r){for(var n;;){if(r[0]!==ee)return me;if(Gu(e,r[1])===Re)return r;if(r[1][0]===ee&&(n=Zu(e,r[1]))!==me)return n;r=r[2]}}function Vu(e,r){if(e===r)return 0;if(!ke(r))return ke(e)?-1:0;if(!ke(e))return 1;if(!(e[0]!==ie&&e[0]!==te||r[0]!==ie&&r[0]!==te))return su(e,r)===Re?-1:cu(e,r)===Re?1:0;var n=!1;if(e[0]===r[0]&&(n=e[0]),n===re){if(e[le]<r[le])return-1;if(e[le]>r[le])return 1;var t=Y(e),i=Y(r);return 0<=t&&0<=i?t<i?-1:i<t?1:0:0<=t&&i<0?-1:t<0&&0<=i?1:0}if(n===ne)return e[pe]==r[pe]?0:e[pe]<r[pe]?-1:1;if(n===w)return Vu(e[j],r[j]);if(n===ee)for(;;){var a=Vu(e[1],r[1]);if(0!==a)return a;if(e=e[2],r=r[2],e[0]!==ee)return r[0]!==ee?0:-1;if(r[0]!==ee)return 1}return e[0]<r[0]?-1:e[0]>r[0]?1:0}function Qu(e,r){if(e[0]===ee){for(var n=e;n[0]===ee;){if(n[O]!==me&&!Tr(n[O]))return;n=n[N]}n=e;for(var t=r;n[0]===ee;)t[0]!==ee?n[O]!==me&&(n[O][1]=t):(n[O]!==me&&(n[O][1]=t[O]),t=t[N]),n=n[N]}else{if(!Tr(e))return;e[1]=r}return 1}function Hu(e,r){return Qu(e,r)?r:Mr}function Yu(e,r){e=e[2];return Lu(e)===me?me:Pa(e,r)}function Ku(e,r,n){if(!Tr(e,!0))return Mr;var t=e[2];if(t===me)e[2]=t=aa(lr,me);else if(Lu(t)===me)return xi(_e(["internal","$invalid put annotation target"]),me);return r===me?me:Aa(t,r,n)}function eo(e,r){if(r[0]!==re||e[0]!==re)return me;if(!Tr(e))return Mr;if(r[3][0]>=ae&&r[3][0]<=ue)return Pe(e[le],r[3][3],r[3][0]);if(r[3][0]!==ee)return e[3]=r[3];var n=q(r[le]),t=r[3][2][1];t[le]===Ce[le]&&(n[O]=Ce),n[se]=t[se];r=We(r[3][1],We(n,r[3][2][2]));return n[3]=r,e[3]=r}var ro=!1;function no(e,r){var n;Lu(r)===Re&&(n=r[he]);e=Me(oo(e,n));return n&&ke(n.noquote)&&(e[x]=wa({noquote:!0})),e}function to(e){if(e[0]!==ee)return e[0]===re?e[le]:e[0]===ne?e[pe]:e[0]===te?vo.IntToString(e[ge],pu(e)):"";for(var r="";e[0]===ee;)r+=to(e[1]),e=e[2];return r}function io(e){if(e===me)return qa(0);if(e[0]===re)return qa(e[le].length);if(e[0]===ne)return qa(e[pe].length);if(e[0]===te||e[0]===ie)return qa(oo(e).length);if(e[0]===oe){var r=e[he];return ua(r)?K(r)?qa(r.length):qa(Object.getOwnPropertyNames(r).length):ma(e[he].length)}if(e[0]!==ee)return qa(oo(e).length);for(var n=1;e[2][0]===ee;)++n,e=e[2];return qa(n)}var ao=new b.NaanChannel(this),uo=new b.NaanChannel(this);function oo(e,r,n){var t;r&&r.radix&&(t=lu(r.radix))<2&&(t=D),n===D&&(n=vo);var i="";if(e===D)return qe[le];if(null===e)return Fe[le];if(e[g]===ee){if(e[N][0]!==ee&&e[N]!==me)i=n.ListToString([n.DottedPairToString(oo(e[1],r,n),oo(e[2],r,n))]);else{for(var a=e,u=[];a[g]===ee;)a[N][0]!==ee&&a[N]!==me?u.push(n.DottedPairToString(oo(a[1],r,n),oo(a[2],r,n))):u.push(oo(a[1],r,n)),a=a[N];i=n.ListToString(u)}return i}if(e[g]===re){var o=e[le];if(r&&ke(r.quote)&&(1!=o.length||p.indexOf(o)<0)){if(!ke(r.nonamespace)){i=function(e){if(e[se][0]!==w)return me;var r,n=e[se][ye][e[le]];if(e[se][be][n]!==e)return me;for(r=0;r<Z.length;++r){var t=Z[r];if(t[ye].hasOwnProperty(e[le]))return n=t[ye][e[le]],t[be][n]===e?me:e[se]}return e[se]}(e);if(i[0]===w)return o=n.QuoteSymbol(o),oo(i[j],!1,n)+n.NSinfix+o}return n.QuoteSymbol(o)}return o}if(e[g]===ne)return!r||!ke(r.quote)||e[x]!==me&&ke(e[x][he].noquote)?e[pe]:n.QuoteString(e[pe]);if(e[g]===te)return n.IntToString(e[ge],pu(e),t);if(e[g]===ie)return n.FloatToString(e[ve],t);if(e[g]>=ae&&e[g]<=ue){if(Xi<=Ii){var f=e[ce]+"";return f.substring(9,f.indexOf("("))}f=Ae(e[3]);return f?"[Builtin "+f+"]":e[2][0]===re?"[Compiled "+e[2][le]+"]":"[Compiled Function]"}if(e[g]===oe){var c,s=e[he];if(ua(s)){if(K(s))return"Array["+s.length+"]";var l=Object.getOwnPropertyNames(s).length;if(s instanceof da)return"Nonce{"+l+"}";if(s instanceof la)return"Continuation{"+l+"}";if(s instanceof so)return"TextStream{"+l+"}";if(s instanceof WeakMap)return"WeakMap{}";if(e[3]instanceof ca){f=Yu(e,xr);return f!==me?"{object "+f[3][2][1][le]+"}":"Object{"+l+"}"}return"Dictionary{"+l+"}"}try{if("function"==typeof s)return""!==s.name&&s.name?"[Function "+s.name+"]":"[Function ()]";if(K(s))c=JSON.stringify(s).slice(1,-1);else if("["===(c=s.toString()).substring(0,1))return c;return"["+Object.prototype.toString.call(s).slice(8,-1)+" "+c+"]"}catch(e){l=s[Symbol.toStringTag];return l?"[object "+l+"]":"[private object]"}}else if(e[g]===w)return"Namespace<"+oo(e[j],!1,n)+">";debugger;return"unknown: "+e}function fo(e,r){return bo[he].printline[3](e,r)}function co(){return 0<uo.TextAvail()&&A.hasOwnProperty("console-out")&&A["console-out"](y,uo.TakeText()),Re}function so(e,r,n,t){var i,a,u=me,o=me,f=me,c=me,s=!1,l=!1;function p(e){if(i.EOF())return e!==me?me:xi(_e(["internal","$end-of-file"]),me);if(c===me)return At;e=c;return c=me,xi(e)}function g(){if(f[0]===ee){var e=f[1];return f=f[2],o=e,1}e=function(e){var r,n;e:for(;;){if(null===(n=e.ReadToken()))return null;switch(n.type){case e.kTTNewline:case e.kTTSymbol:s&&(r=s[n.token])!==D||(r=Ar(n.token));break e;case e.kTTInteger:r=_a(n.token,me);break e;case e.kTTHexInteger:r=_a(n.token,wa({hexcon:!0}));break e;case e.kTTString:r=Me(n.token);break e;case e.kTTComment:case e.kTTCommentLine:var t=fa();if(t[he].text=Me(n.token),t[he].loc=We(qa(n.loc.line),We(qa(n.loc.column),me)),u=We(t,u),n.type!=e.kTTCommentLine)continue;r=F("\n");break e;case e.kTTFloat:r=Fa(parseFloat(n.token));break e}}return n.atom=r,n}(i);return null!==e&&((o=fa())[he].atom=e.atom,o[he].loc=We(qa(e.loc.line),We(qa(e.loc.column),me)),1)}function v(e,r){var n=e[he].atom;if(r[0]!==ee)return r===cr?n[0]===ne:r===ar?n[0]===re:Gu(n,r)===Re;for(;;){if(r[0]!==ee)return;if(r[1][0]===ee)return;if(v(e,r[1]))return 1;r=r[2]}}function d(e,r){if(!tt&&a.Full())return At;for(var n,t=me,i=0;i<e;++i)n=oo(t=r(i),!1,a),a.WriteString(n);return l&&co(),t}function h(e){return f=We(o,f),o=e}this.addtext=Pe("addtext",function(e){return e[0]===ne?(i.AddText(e[pe]),i.SetEOF(),e):me},ae,!0)[ce],this.comments=Pe("comments",function(){var e=u;return u=me,e},ae,!0)[ce],this.isbreak=Pe("isbreak",function(e){return T(e[0]===re&&a.IsBreak(e[le].substring(0,1)))},ae,!0)[ce],this.linelength=Pe("linelength",function(){return 80},ae,!0)[ce],this.unbuffered=Pe("unbuffered",function(e){l=e===Re},ae,!0)[ce],this.newline=Pe("newline",function(e){if(!tt&&a.Full())return At;var r=1;if(e===me||null!==(r=Da(e,255))&&0<=r){for(;0<r--;)a.WriteString("\n");return l&&co(),Re}return me},ae,!0)[ce],this.spaces=Pe("spaces",function(e){if(!tt&&a.Full())return At;var r;if(null!==(r=Da(e,255))&&0<=r){for(var n=wr[1][wr[1][0]===re?le:pe];0<r--;)a.WriteString(n);l&&co()}return qa(a.Column())},ae,!0)[ce],this.printline=Pe("printline",function(e,r){return(r=d(e,r))===At||(a.WriteString("\n"),l&&co()),r},S,!0)[ce],this.print=Pe("print",d,S,!0)[ce],this.printloc=Pe("printloc",function(e){return We(qa(a.Line()),We(qa(a.Column()),me))},ae,!0)[ce],this.printq=Pe("printq",function(e,r){if(!tt&&a.Full())return At;for(var n,t=me,i=0;i<e;++i)n=oo(t=r(i),t!==wr[1]&&{quote:Re},a),a.WriteString(n);return l&&co(),t},S,!0)[ce],this.radix=Pe("radix",function(e){var r,n=We(qa(i.Radix()),We(qa(a.Radix()),me));return e[0]===ee&&(0<=(r=lu(e[1]))&&i.SetRadix(r),0<=(e=lu(e[2][1]))&&i.SetRadix(e)),n},ae,!0)[ce],this.readchar=Pe("readchar",function(){var e=i.ReadChar();return null!==e?Me(e):c===me?i.EOF()?me:At:(e=c,c=me,xi(e))},ae,!0)[ce],this.readready=Pe("readready",function(){return qa(i.ReadReady())},ae,!0)[ce],this.reset=Pe("reset",function(){i.Reset(),a.Reset()},ae,!0)[ce],this.setsymbols=Pe("setsymbols",function(e){if(e===me){if(s)return ya(Object.values(s),s=!1)}else{if(e[0]!==ee)return me;for(var r={},n=e;n[0]===ee;){if(n[1][0]!==re)return me;r[n[1][le]]=n[1],n=n[2]}s=r}return ar},ae,!0)[ce],this.taketext=Pe("taketext",function(){return Me(a.TakeText())},ae,!0)[ce],this.tokenread=Pe("tokenread",function(e){return g()?o:p(e)},ae,!0)[ce],this.tokenlast=Pe("tokenlast",function(e){return e===Re&&(o=me),o},ae,!0)[ce],this.tokenpush=Pe("tokenpush",h,ae,!0)[ce],this.tokenmatch=Pe("tokenmatch",function(e,r){var n=o;if(n[0]!==oe||!n[he].atom)return me;if(Gu(n[he].atom,kr[1])!==Re)return v(n,e)?n:me;for(var t=n;;){if(!g())return p(r);if((n=o)[0]!==oe||!n[he].atom)return me;if(Gu(n[he].atom,kr[1])!==Re)break;t=n}return v(n,e)?n:(h(t),me)},ae,!0)[ce],this.tokenpass=Pe("tokenpass",function(e,r){for(var n=o;;){if(n!=me&&!v(n,e))return n;if(!g())return p(r);n=o}},ae,!0)[ce],this.readex=Pe("readex",function(e){return c=e},ae,!0)[ce],r===me?i=ao:K(r)?r[0]===ne&&((i=new b.NaanChannel(y,t)).ScanReset(),i.SetText(r[pe]),i.SetEOF()):i=r,n===me?a=uo:K(n)?n===cr&&(a=new b.NaanChannel(y)).SetWriteLimit(0):a=n,this.raw=Ie({read:i,write:a})}function lo(e,r,n){var t=Ie(!1),n=new so(0,e,r,n);return t[x]=me,t[he]=n,t}(so.prototype=Object.create(ta.prototype)).constructor=so;var po=lo(ao,uo),go=ao,vo=uo,ho=po,bo=po;function yo(e){return T(e[0]===oe&&e[he]instanceof so)}function mo(){return/param/.test(function(e){})?me:Re}var ko=90,wo=11,xo=ko+1;function So(){var c=new Array(1),s=[];function l(e){var r;if(e===D)return xo;if("object"!=typeof e)return e;var n,t,i=e[0];if(wo<i)return Math.floor(i/wo);if(i===oe&&!(ua(t=(n=e)[he])?!(t instanceof da||t instanceof so||t instanceof la):!!(n[x]!==me&&ke(n[x][he].persist)||t.constructor&&m.hasOwnProperty(t.constructor.name)||t.NaanPersist)))return xo;var a=c.length+ko;s.push(e),e[0]=i+a*wo;var u,o,f=Array(e.length);switch(c.push(f),(f[0]=i)===oe&&(r=function(e){var r,n,t=e[he],i=l(e[x]);if(ua(t))if(K(t)){for(var a=[],u=0;u<t.length;++u)a.push(l(t[u]));r={na:a}}else{for(var o={},f=Object.getOwnPropertyNames(t),c=0;c<f.length;++c)o[f[c]]=l(t[f[c]],f[c]);r=e[3]instanceof ca?{no:o}:{nd:o},e[2]!==me&&(r.tag=l(e[2]))}else try{r=t instanceof RegExp?{tag:i,type:t.constructor.name,state:[t.source,t.flags]}:t.StateSave!==D?{tag:i,type:t.constructor.name,state:t.StateSave()}:{tag:i,type:t.constructor.name,object:t}}catch(e){r={type:t.constructor.name}}return e[se]&&e[se]!==me&&(n=Oe.indexOf(e[se]))<0&&(n=Oe.length),0<=n&&(r.xns=n),r}(e)),i){case ee:f[2]=l(e[2]),f[1]=l(e[1]);break;case re:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=l(e[3]),f[4]=Oe.indexOf(e[4]).toString(),f[5]=e[5];break;case ne:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=e[3];break;case ie:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=e[3].toString();break;case te:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=function(e){if(L.bitSize(e)<=k)return Ba(e);var r="";return L.negative(e)&&(e=L.negate(e),r="-"),r+L.bigInt2str(e,10)}(e[3]);break;case ae:case S:case ue:if(!(u=Ae(e[3])))return c.pop(),e[0]=i,xo;f[1]=l(e[1]),f[2]=l(e[2]),(o=C(u,[X,z]))[0]===re&&o[le]===u?f[3]=l(o):f[3]=u;break;case oe:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=r;break;case w:f[1]=Oe.indexOf(e).toString(),f.length=2;break;default:Zi(Di,"save-state warning: invalid element type "+i+" at "+a)}return a}for(var e,r=[],n=0;n<Oe.length;++n){var t=n;t<=1&&(t=1-t),e=Oe[t][be];for(var i=0,a=0;a<e.length;++a)!function(e,r){if("object"==typeof e&&e[0]==re){var n=c.length+ko;s.push(e),e[0]=re+n*wo;n=Array(P);return c.push(n),n[0]=re,n[1]=e[1],n[2]=e[2],n[3]=e[3],n[4]=r.toString(),n[5]=e[5],1}}(e[a],t)||++i;r[t]=i,l(Oe[t])}!function(){for(var e=1;e<c.length;++e){var r=c[e];r[0]===re&&(r[1]=l(r[1]),r[2]=l(r[2]),r[3]=l(r[3]))}}();var u=[];for(n=0;n<Oe.length;++n){e=Oe[n][be];var o=[];o.push(l(Oe[n][j])),o.push(l(qa(r[n]))),o.push(l(e[0])),u.push(o)}c[0]=u;var f=[l(J)];for(n=0;n<Z.length;++n)f.push(l(Z[n]));var p,g=new Array(dt);for(g[0]=bt,p=1;p<=dt;++p){var v=vt[p-1];"object"==typeof v?g[p]=l(v):"number"==typeof v?g[p]=-v:v===D?Zi(Di,"savestate: corrupt argstack"):g[p]=v}g[p++]=l($r),g[p++]=l(Wr),g[p++]=l(Ir),g[p++]=l(Mr),function(){for(var e=0;e<s.length;++e)s[e][0]%=wo}();var d,h=new Array(gt);for(h[0]=_r,d=1;d<=gt;++d)h[d]=pt[d-1];var b=[];b[0]=g,b[1]=h,b[2]=ht,b[3]=f,b[4]=Ii;var y=new Array("Naan",900,12002,xo);return new Array(y,c,b)}function Oo(e){var r,n=e[0];if(!("Naan"!==n[0]||900<n[1])){var t=e[1],o=t[0],i=n[3],a=e[2],u=a[0],f=u[0],c=a[1],s=a[2],l=c[0],p=a[3],g=a[4];if(t!==D&&o!==D&&i!==D&&a!==D&&u!==D&&f!==D&&c!==D&&l!==D&&p!==D){for(var v=i-1,d=new Array(t.length),h=[],b=0;b<o.length;++b)h[b]=new Array(U);for(x=1;x<t.length;++x)"object"==typeof(r=t[x])&&r.ns!==D?d[x]=h[r.ns]:d[x]=new Array(3);for(var y,m,k=h[1],w=1,x=1;x<t.length;++x)if("number"!=typeof(r=t[x]))if("string"!=typeof r){if("object"!=typeof r||0===r.length)return void Zi(Di,"loadstate: unexpected token: "+typeof r);if(K(r))if(1!=r.length)if(2!=r.length)if(3!=r.length){var S,O,N,j,P=r[0];for(d[x][0]=P,S=1;S<r.length;++S)if(O=r[S],P===re&&(S===ce&&(w=C(O)),S===se&&(k=(k=h[parseInt(O)])||me)),P===te&&S===ge)d[x][S]="string"!=typeof(m=O)?Ra(m):m="-"==m.charAt(0)?L.negate(L.str2bigInt(m.substring(1),10,1)):L.str2bigInt(m,10,1);else if(P===ie&&S===ve)d[x][S]=parseFloat(O);else if(ae<=P&&P<=ue&&S===de)if((j="string"==typeof O?H[O]:(j="string"==typeof(N=t[C(O)])?N:3<N.length?N[le]:N[0],H[B(j)]))===D){debugger;Zi(Di,"state-load warning: undefined builtin: "+O+"("+N+")"),d[x][S]=vi}else d[x][S]=j;else d[x][S]=P===ne&&S===pe?O:P===re&&S===le?B(O):P===re&&S===se?h[parseInt(O)]:d[C(O)]}else{if("string"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj3: "+typeof r[0]);d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],w=C(r[1]),d[x][3]=d[w],k=(k=h[parseInt(r[2])])||me,d[x][4]=k,d[x][5]=B(r[0])}else if("string"==typeof r[0])d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],w=C(r[1]),d[x][3]=d[w],d[x][4]=k,d[x][5]=B(r[0]);else{if("number"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj2: "+typeof r[0]);d[x][0]=ee,d[x][1]=d[C(r[0])],d[x][2]=d[C(r[1])]}else if("string"==typeof r[0])d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=d[++w],d[x][4]=k,d[x][5]=B(r[0]);else{if("number"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj1: "+typeof r[0]);d[x][0]=ee,d[x][1]=d[C(r[0])],d[x][2]=d[1]}else{d[x][0]=oe,d[x][1]=d[x],d[x][2]=d[1],d[x][4]=d[1];try{if(r.na!==D){var A,T=[];for(T[na]=ta,A=0;A<r.na.length;++A)T.push(d[C(r.na[A])]);d[x][3]=T,0<=r.xns&&!(d[x][4]=h[r.xns])&&(d[x][4]=G)}else if(r.nd!==D||r.no!==D){for(var E=new(r.nd?oa:ca),M=r.nd||r.no,I=Object.getOwnPropertyNames(M),W=0;W<I.length;++W)E[I[W]]=d[C(M[I[W]])];r.tag!==D&&(d[x][2]=d[C(r.tag)]),d[x][3]=E,0<=r.xns&&!(d[x][4]=h[r.xns])&&(d[x][4]=G)}else r.ns!==D||(y="undefined"!=typeof window?window:global,r.tag&&(d[x][2]=d[C(r.tag)]),r.type&&r.state!==D?d[x][3]=new(Function.prototype.bind.apply(y[r.type],[null].concat(r.state))):r.object!==D?r.type&&"Object"!==r.type&&y[r.type]!==D?d[x][3]=new y[r.type](r.object):d[x][3]=r.object:d[x][3]={})}catch(e){d[x][3]={}}}}else"$"==r.substring(0,1)?(d[x][0]=ne,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=r.substring(1)):(d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=d[1],d[x][4]=k,d[x][5]=B(r));else d[x][0]=ee,0===r?(d[x][1]=d[x+1],d[x][2]=d[1]):(d[x][1]=d[C(r)],d[x][2]=d[x+1]);var $,_=new Array(u.length),q=Oe,F=Z,n=X,e=z,a=G,i=J;if(!function(){try{for(V(),Oe=[],Z=[],X=h[0],z=h[1],b=0;b<o.length;++b){for(var e=o[b],r=d[e[0]-v],n=Ca(d[e[1]-v][3],99999),t=e[2]-v,i=Q(r,h[b]),a=0;a<n;++a){var u=d[t+a];(u[se]=i)[be].push(u),i[ye][u[le]]=a}if(i[be].length!=n)return void Zi(Di,"loadstate: symbol table sync: "+r[pe]+" "+i[be].length+" "+n)}return z[be].length<50||$<0||f<0||$<f?void Zi(Di,"loadstate: unqualified "+z[be].length):1}catch(e){return void Zi(Di,"loadstate failed: "+e.toString())}}())return Oe=q,Z=F,X=n,z=e,G=a,void(J=i);for(Z=[X,z],J=X,Io(),Wo(),Z=[],b=1;b<p.length;++b)Z.push(d[p[b]-v]);for(J=d[p[0]-v],$=1;$<u.length;++$){var R=u[$],R="number"==typeof R?R<=0?-R:d[R-v]:R;_[$-1]=R}return c.splice(0,1),_r=l,gt=(pt=c).length,dt=$-1,bt=f,ht=s,Mr=(vt=_)[--dt],Ir=vt[--dt],Wr=vt[--dt],$r=vt[--dt],Ii=g,1}Zi(Di,"cannot load malformed state")}function C(e){return e<=v?x+e:e-v}function B(e){return"\\$"===e.substring(0,2)?e.substring(1):e}}function No(e){var r,n=C("SaveTrap",Oe);if(n!==me&&n[ce]!==me&&(jt=-1,_r=qr,Ct(We(n,me),"savetrap"),Dt(!0),at!==Re))return r;var i=So();return e&&function(e){var r,n,t,i,a,u,o,f=e[1],c=[],s=[];function l(e){if("number"!=typeof e)return K(e)?e.length===P?Zi(Di,"save-state warning: unexpected symbol "+e[le]):Zi(Di,"save-state warning: unexpected element "+e[0]):Zi(Di,"save-state warning: invalid item encountered"),xo;var r,n=f[e-ko];switch(n[0]){case ee:break;case ne:case te:case ie:if(r=n[0].toString()+"/"+n[2].toString()+"/"+n[3],s.hasOwnProperty(r))return s[r];s[r]=e,n[0]+=wo;case ee+wo:case ne+wo:case te+wo:case ie+wo:default:return e}var t=l(n[O]),i=l(n[N]),a=t+i/(f.length+ko+1);return c.hasOwnProperty(a)?c[a]:(c[a]=e,n[0]=ee+wo,n[O]=t,n[N]=i,e)}for(m=1;m<f.length;++m)switch((r=f[m])[0]){case ee:case ne:case te:case ie:r[1]=l(r[1]),r[2]=l(r[2]);break;case re:r[1]=l(r[1]),r[2]=l(r[2]),r[3]=l(r[3]);break;case ae:case S:case ue:r[1]=l(r[1]),r[2]=l(r[2]),"number"==typeof r[3]&&(r[3]=l(r[3]));break;case oe:if(r[1]=l(r[1]),r[2]=l(r[2]),r[3].na!==D)for(i=r[3].na,n=0;n<i.length;++n)i[n]=l(i[n]);else if(r[3].nd!==D||r[3].no!==D){for(a=r[3].nd||r[3].no,u=Object.getOwnPropertyNames(a),t=0;t<u.length;++t)a[u[t]]=l(a[u[t]]);r[3].tag&&(r[3].tag=l(r[3].tag))}}for(var p,g=f[0],v=0;v<g.length;++v)for(p=g[v],o=0;o<p.length;++o)p[o]=l(p[o]);for(var d=e[2][0],h=1;h<d.length;++h)d[h]>ko&&(d[h]=l(d[h]));for(var b=[],y=0,m=1;m<f.length;++m)switch(f[m][0]){case ee:case ne:case te:case ie:++y;break;default:b[m+ko]=m+ko-y}for(v=0;v<g.length;++v)for(p=g[v],o=0;o<p.length;++o)p[o]=b[p[o]];for(h=1;h<d.length;++h)d[h]>ko&&(d[h]=b[d[h]]);for(var k=e[2][3],w=0;w<k.length;++w)k[w]>ko&&(k[w]=b[k[w]]);var x=new Array(1);for(m=1;m<f.length;++m){switch((r=f[m])[0]){case ee:case ne:case te:case ie:continue;case ee+wo:case ne+wo:case te+wo:case ie+wo:r[0]-=wo,r[1]=b[r[1]],r[2]=b[r[2]];break;case re:r[1]=b[r[1]],r[2]=b[r[2]],r[3]=b[r[3]];break;case ae:case S:case ue:r[1]=b[r[1]],r[2]=b[r[2]],"number"==typeof r[3]&&(r[3]=b[r[3]]);break;case oe:if(r[1]=b[r[1]],r[2]=b[r[2]],r[3].na!==D)for(i=r[3].na,n=0;n<i.length;++n)i[n]=b[i[n]];else if(r[3].nd!==D||r[3].no!==D){for(a=r[3].nd||r[3].no,u=Object.getOwnPropertyNames(a),t=0;t<u.length;++t)a[u[t]]=b[a[u[t]]];r[3].tag&&(r[3].tag=b[r[3].tag])}}x.push(r)}x[0]=g,e[1]=x}(i),function(){var e,r=i[1];function n(e,r){e+=ko;return r-e<=ko&&(-9<=r-e||999<r&&-99<=r-e)?r-e:r}for(e=1;e<r.length;++e){var t=r[e];switch(t[0]){case ee:case ne:case te:case ie:t[1]=n(e,t[1]),t[2]=n(e,t[2]);break;case re:t[1]=n(e,t[1]),t[2]=n(e,t[2]),t[3]=n(e,t[3]);break;case ae:case S:case ue:t[1]=n(e,t[1]),t[2]=n(e,t[2]),"number"==typeof t[3]&&(t[3]=n(e,t[3]));break;case oe:t[1]=n(e,t[1]),t[2]=n(e,t[2])}}}(),r=function e(r,n){function t(e){return n.QuoteString(e)}function i(e){return"$"==e.substring(0,1)&&(e="\\".concat(e)),t(e)}if(0===r.length)return"";n===D&&(n=vo);for(var a,u,o,f,c="[",s=!1,l=0;l<r.length;++l)s&&(c+=","),"object"==typeof r[l]?((o=r[l])[0]===ee?1===o[2]?c+=o[1]:o[2]===xo?1!==o[1]?c+="["+o[1]+"]":c+="0":c+="["+o[1]+","+o[2]+"]":o[0]===re&&0===o[1]&&o[2]===xo?(f=i(o[le]),a==o[4]?o[3]===xo?c+=f:o[3]==u+1?c+="["+f+"]":c+="["+f+","+o[3]+"]":c+="["+f+","+o[3]+","+o[4]+"]"):o[0]===ne&&0===o[1]&&o[2]===xo?c+=t("$"+o[pe]):o[0]===oe?c+=JSON.stringify(o[he]):o[0]===w?c+=JSON.stringify({ns:o[1]}):c+=e(r[l]),o[0]===re&&(a=o[4],u=o[3])):"string"==typeof r[l]?r[0]===re&&l===le?c+=i(r[l]):r[0]===ne&&l===pe?c+=t("$"+r[l]):c+=t(r[l]):r[l]!==D&&(c+=r[l]),s=!0;return c+="]"}(i)}function jo(e){if(!Oo(e))return me;$o(),_o();e=C("LoadTrap",Oe);if(e===me)return To;e=Ct(We(e,me),"loadtrap");return pt[gt++]=_r,e}function Po(e){e=No(e!=me);return"string"==typeof e?Me(e):e}Pe("save",Po,ae);function Ao(e){if(e[0]!==ne)return me;e=JSON.parse(e[pe]);return e&&0!==e.length?jo(e):me}var To=Pe("load",Ao,ae);var Eo=[["global","`",gu,ue],["global","deref",ki,ue],["global",".",wi,ue],["global","quote",gu,ue],["global","$",function(e){return mr[1]=e},ae],["exec","and",function(e){return pt[gt++]=Ur,e},ue],["exec","apply",di,ae],["exec","break",Ni,ae],["exec","call",function(e){return pt[gt++]=r,Wr=Re,Ir=e[2],e[1]},ue],["exec","catch",function(e){return pt[gt++]=Wn,e},ue],["exec","cond",function(e){return pt[gt++]=Sn,e},ue],["exec","continue",ji,ae],["exec","eval",function(e){return e[0]!==ee&&e[0]!==oe?e[1]:(pt[gt++]=vn,e)},ae],["exec","lambda",function(e){return T(e[0]===re&&e[le]==Ce[le])},ae],["exec","loop",function(e){return pt[gt++]=an,e},ue],["exec","or",function(e){return pt[gt++]=Mn,e},ue],["exec","return",function(e,r){return Oi(e?r(0):it)},S],["exec","throw",xi,ae],["exec","yield",function(){var e=Ea(0);return e[x]=me,e[he].execstate=Ei(!0),e},ae],["exec","resume",function(e,r){return e[0]!==oe||ua(e[he])||!K(e[he].execstate)?me:(Mi(e[he].execstate),Mr=r)},ae],["info","builtin",function(e,r){return T(Ru(e,r)===_u)},S],["info","procedure",function(e,r){return T(Ru(e,r)===qu)},S],["info","eq",Xu,ae],["info","equal",Gu,ae],["info","length",io,ae],["info","not",function(e){return T(!ke(e))},ae],["info","typeof",Cu,S],["info","relate",function(e,r){return qa(Vu(e,r))},ae],["symbol","setq",function(e){return e[0]!==ee?me:(pt[gt++]=nn,e)},ue],["symbol","assign",Hu,ae],["symbol","compress",function(e,r){for(var n="",t=0;t<e;++t)n+=to(r(t));return Ar(n)},S],["symbol","copyproc",eo,ae],["symbol","copyann",function(e,r,n){return Tr(e,!0)?r[0]!==re?me:(n===me&&(t=e[2]),e[2]=h(r[2],t),e):Mr;var t},ae],["symbol","exists",function(e,r){var n,t;if(e[0]===ne)t=e[pe];else if(e[0]===re)t=e[le];else{if(e[0]!==oe||!RegExp.prototype.isPrototypeOf(e[he]))return me;t=e[he]}if(r===me)n=Z;else if(r===Re)n=Oe;else{if(r[0]!==w)return me;n=[r]}for(var i,a=[],u=0;u<n.length;++u){var o=n[u];if("string"==typeof t){if(o[ye].hasOwnProperty(t))return i=o[ye][t],o[be][i]}else if(e[0]===oe)for(i=0;i<o[be].length;++i){var f=o[be][i];t.test(f[le])&&a.push(f)}}return xe(a)},ae],["symbol","get",Yu,ae],["symbol","getproc",function(e,r){return e[0]>=ae&&e[0]<=ue&&mo()===me?Me(e[3].name):e[0]!==re?me:r===Re?E(e):e[3]},ae],["symbol","interned",Bu,ae],["symbol","defbinding",Du,ae],["symbol","moveproc",function(e,r){return!ro&&Ui<=Ii&&(ro=!0,Zi(Ui,"warning: moveproc() is deprecated in favor of copyproc()")),eo(r,e)},ae],["symbol","name",function(e,r){return T((r=Ru(e,r))===re||r===ne||r===$u)},S],["symbol","ordered",function(e,r){return makeBoolean(Vu(e,r)<0)},ae],["symbol","preadjust",function(e){return pt[gt++]=mn,e},ue],["symbol","postadjust",function(e){return pt[gt++]=Jr,e},ue],["symbol","put",Ku,ae],["symbol","putproc",function(e,r){if(e[0]!==re)return me;if(!Tr(e))return Mr;if(r[0]>=ae&&r[0]<=ue||r[0]===re)return e[3]=r;if(r[0]===ee){var n=r[2][1][2];return e[2]!==n&&(e[2]=h(n)),e[3]=r}if(r[0]===ne){var i={j2n:ma,n2j:xa,nanu:aa,pl:fo,ns:e[se],len:io,idle:function(){_r=qr}};try{var a,t=r[pe],u=S,t=t.startsWith("macro:")?(u=ue,t=t.slice(6),a=new Function("args","_lib","_false",t),function(e,r){return a(e,i,me)||me}):t.startsWith("builtin:")?(u=ae,t=t.slice(8),a=new Function("cx","cy","cz","_lib","_false",t),function(e,r,n,t){return a(e,r,n,i,me)||me}):(u=S,a=new Function("narg","nthf","_lib","_false",t),function(e,r){return a(e,r,i,me)||me}),t=[u,null,e,t];return t[1]=t,e[3]=t}catch(e){return Zi(Ui,"compile: "+e.toString()),Me(e)}}return me},ae],["symbol","replacer",function(e,r){return Tr(e,!0)?(e[2]=r,e):Mr},ae],["symbol","symbol",function(e,r){return T(Ru(e,r)===re)},S],["symbol","unintern",function(e){var r;if(e[0]===re)r=q(e[le]);else{if(e[0]!==ne)return me;r=q(e[pe])}return r[se]=Z[0],r},ae],["tuple","atom",Uu,S],["tuple","car",vu,ae],["tuple","cdr",du,ae],["tuple","caar",hu,ae],["tuple","cadr",bu,ae],["tuple","cdar",function(e){return e[1][2]},ae],["tuple","cddr",yu,ae],["tuple","caaar",function(e){return e[1][1][1]},ae],["tuple","caadr",mu,ae],["tuple","cadar",function(e){return e[1][2][1]},ae],["tuple","caddr",ku,ae],["tuple","cdaar",function(e){return e[1][1][2]},ae],["tuple","cdadr",function(e){return e[2][1][2]},ae],["tuple","cddar",function(e){return e[1][2][2]},ae],["tuple","cdddr",wu,ae],["tuple","caaaar",function(e){return e[1][1][1][1]},ae],["tuple","caaadr",function(e){return e[2][1][1][1]},ae],["tuple","caadar",function(e){return e[1][2][1][1]},ae],["tuple","caaddr",function(e){return e[2][2][1][1]},ae],["tuple","cadaar",function(e){return e[1][1][2][1]},ae],["tuple","cadadr",function(e){return e[2][1][2][1]},ae],["tuple","caddar",function(e){return e[1][2][2][1]},ae],["tuple","cadddr",function(e){return e[2][2][2][1]},ae],["tuple","cdaaar",function(e){return e[1][1][1][2]},ae],["tuple","cdaadr",function(e){return e[2][1][1][2]},ae],["tuple","cdadar",function(e){return e[1][2][1][2]},ae],["tuple","cdaddr",function(e){return e[2][2][1][2]},ae],["tuple","cddaar",function(e){return e[1][1][2][2]},ae],["tuple","cddadr",function(e){return e[2][1][2][2]},ae],["tuple","cdddar",function(e){return e[1][2][2][2]},ae],["tuple","cddddr",function(e){return e[2][2][2][2]},ae],["tuple","cons",function(e,r){if(0===e)return me;if(1==e)return We(r(0),me);for(var n=r(--e);0<=--e;)n=We(r(e,r),n);return n},S],["tuple","insert",function(e,r){if(0===e)return me;for(var n=r(0);0<--e;)n=We(r(e,r),n);return n},S],["tuple","empty",Uu,S],["tuple","first",vu,ae],["tuple","ffirst",hu,ae],["tuple","fsecond",mu,ae],["tuple","list",function(e){return pt[gt++]=un,e},ue],["tuple","member",Ju,ae],["tuple","within",Zu,ae],["tuple","pop",function(e){var r=e[1];return r[0]!==re||r[1][0]!==ee?me:(e=r[1][1],r[1]=r[1][2],e)},ue],["tuple","push",function(e){return e[2][1][0]!==re?me:Tr(e[2][1])?(pt[gt++]=en,e):Mr},ue],["tuple","rest",du,ae],["tuple","reverse",xu,ae],["tuple","rrest",yu,ae],["tuple","rrrest",wu,ae],["tuple","second",bu,ae],["tuple","third",ku,ae],["tuple","totuple",Sa,ae],["tuple","tuple",function(e,r){return T((r=Ru(e,r))===ee||r===qu||r===Fu)},S],["tuple","tuplepath",function(e,i){return function e(r){if(Xu(r,i)!==me)return me;for(var n,t=0;;){if(Xu(r,i)!==me){t=-t,n=me;break}if(r[0]!==ee)return!1;if(n=e(r[1]))break;r=r[2],++t}return We(qa(t),n)}(e)||me},ae],["number","bitand",eu,S],["number","bitnot",function(e,r,n,t){return e[0]===te?_a(L.not(e[3]),me):e[0]===ie?Fa(~e[3]):e[0]===oe&&e[3]instanceof ca?Ht(e,".bitnot"):Qt(B(t[2][1],"extendBitNot"))},ae],["number","bitor",nu,S],["number","bitxor",iu,S],["number","difference",Ga,S],["number","divide",function(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===oe&&e[3]instanceof ca?Ht(e,".divide"):r[0]===oe&&r[3]instanceof ca?Ht(r,".divide"):Qt(B(t[2][1],"extendDivide"));if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var i=e[3],a=r[3],u=L.negative(i),t=L.negative(a);return u&&(i=L.negate(i)),t&&(a=L.negate(a)),e=L.dup(i),r=L.dup(i),L.divide_(i,a,e,r),u&&(L.isZero(r)||(e=L.addInt(e,1),r=L.sub(a,r))),We(_a(L.trim(e,1),me),_a(L.trim(r,1),me))},ae],["number","even",function(e){return e[0]===te?T(0===L.modInt(e[3],2)):e[0]!==ie?me:T((e=e[3]/2)==Math.floor(e))},ae],["number","float",function(e,r){return T(Ru(e,r)===ie)},S],["number","greater",cu,ae],["number","integer",function(e,r){return T(Ru(e,r)===te)},S],["number","lesser",su,ae],["number","mod",Ya,ae],["number","negate",La,ae],["number","negative",function(e){return e[0]===te?T(L.negative(e[3])):e[0]===ie?T(e[3]<0):me},ae],["number","numeric",function(e,r,n){var t=Ru(e,r);if(t===ie||t===te||t===ju)return Re;for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".numeric")}return Qt(B(n[2][1],"extendNumeric"))},S],["number","plus",Xa,S],["number","positive",function(e){return e[0]===te?T(!L.negative(e[3])&&!L.isZero(e[3])):e[0]===ie?T(0<e[3]):me},ae],["number","quotient",Qa,ae],["number","shiftleft",uu,ae],["number","shiftright",fu,ae],["number","times",Za,S],["number","tofloat",function(e,r,n,t){return e[0]===ie?e:e[0]===te?Fa(Ba(e[3])):e[0]===ne?Fa(parseFloat(e[3])):e[0]===oe&&"number"==typeof e[he]?Fa(e[he]):e[0]===oe&&e[3]instanceof ca?Ht(e,".tofloat"):Qt(B(t[2][1],"extendTofloat"))},ae],["number","toint",function(e,r){if(e[0]===ie)return qa(Math.floor(e[3]));if(e[0]===te)return _a(e[he],me);if(e[0]===ne){if(0!==e[3].indexOf("0x"))return r===me?qa(parseInt(e[3])):((n=lu(r[3]))<0&&(n=10),qa(parseInt(e[3],n)));n=qa(parseInt(e[3],16));return n[x]=wa({hexcon:!0}),n}if(e[0]===oe){var n=e[he].valueOf();if("number"==typeof n)return isFinite(n)?qa(n):me;try{if(e[he]instanceof Uint8Array)return _a(L.uint82bigInt(e[he]),me)}catch(e){return me}}return me},ae],["number","zero",function(e){return e[0]===te?T(L.isZero(e[3])):e[0]===ie?T(0===e[3]):me},ae],["string","explode",function(e){var r;if(e[0]===re)r=e[le];else if(e[0]===ne)r=e[pe];else{if(e[0]!==te)return me;r=vo.IntToString(e[ge],pu(e))}var n,t=me,i=null;if(0===r.length)return me;for(n=0;n<r.length;++n){var a=We(Me(r.charAt(n)),me);i?i[2]=a:t=a,i=a}return t},ae],["string","strcat",function(e,r){for(var n="",t=0;t<e;++t)n+=oo(r(t));return Me(n)},S],["string","string",function(e,r){return T(Ru(e,r)===ne)},S],["string","tostring",no,ae],["string","unicode",function(e){var r;if(e[0]===re)r=e[le];else{if(e[0]!==ne){if(e[0]!==te)return me;if(L.negative(e[3])||L.greater(e[3],L.int2bigInt(1114111,16,1)))return me;var n=L.modInt(e[3],1114111);if(n<65536)r=String.fromCharCode(n);else try{r=String.fromCodePoint(n)}catch(e){return Zi(Ui,"warning: couldn't fromCodePoint("+n+")"),me}return Me(r)}r=e[pe]}try{return qa(r.codePointAt(0),wa({hexcon:!0}))}catch(e){return Zi(Ui,"warning: couldn't codePointAt(\""+r.substring(0,1)+'")'),qa(r.charCodeAt(0))}},ae],["array","array",function(e,r){return T(Ru(e,r)===Pu)},S],["array","arraycall",function(e,r){function u(){var e=Ge[1],r=Mt;if(Dt(!0),r!=Mt&&xi(_e(["internal","fiber suspended during callback"]),me),e!==Ge[1])throw Pt}function n(e,r,n){var t,i=J,a=Ve[1];return function(){return t=We(arguments[0],We(ma(arguments[1]),We(r,me))),Ct(We(mi,We(e,t)),"arrayfilter"),Ve[1]=a,J=i,u(),1===n?at:(2===n&&(at=T(ke(at))),xa(at))}}function t(r){var n,t=J,i=Ve[1];return function(){var e=r?(n=ya(arguments,!1),Ct(We(mi,We(r,n)),"arraycompare"),Ve[1]=i,J=t,u(),xa(at)):Vu(arguments[0],arguments[1]);return e}}function i(e,r,n){var t;if(r){if(r[0]!==te)return me;null===(t=Ba(r[3],Number.MAX_SAFE_INTEGER))?t=n:(t<0&&(t=e-1+t),e<=t&&(t=e-1))}else t=n;return t}function a(e,r){var n="";r=r?xa(r):",";for(var t=0;t<e.length;++t){var i=xa(e[t]);0<t?n=n+r+i:n+=i}return ma(n)}if(e<2)return me;var o=r(0),f=r(1);if(o[0]!==oe||f[0]===ee||f[0]===oe&&ua(f))return me;var c=o[3];if(!ua(c)||!K(c))return me;for(var s,l,p=xa(f),g=[],v=0;v<e-2;++v)switch(p){case"every":case"filter":case"find":case"findIndex":case"forEach":case"some":0===v&&g.push(n(r(v+2),o,2));break;case"map":0===v&&g.push(n(r(v+2),o,1));break;case"indexOf":case"join":case"lastIndexOf":case"push":case"unshift":g.push(r(v+2));break;case"concat":(l=r(v+2))[0]===oe&&K(l[3])?(ua(s=l[3])||(s=ka(s,new WeakMap)[3]),g.push(s)):g.push([l]);break;case"copyWithin":case"slice":g.push(xa(r(v+2)));break;case"pop":case"reverse":case"shift":break;case"reduce":case"reduceRight":0===v?g.push(function(e,r){var n,t=J,i=Ve[1];return function(){return n=We(arguments[0],We(arguments[1],We(ma(arguments[2]),We(r,me)))),Ct(We(mi,We(e,n)),"arrayreduce"),Ve[1]=i,J=t,t=i=null,u(),at}}(r(v+2),o)):1==v&&g.push(r(v+2));break;case"sort":0===v&&g.push(t(r(v+2)));break;case"fill":0===v?g.push(r(v+2)):g.push(xa(r(v+2)));break;case"splice":v<2?g.push(xa(r(v+2))):g.push(r(v+2));break;default:return me}var d=!0;switch(p){case"find":d=!1;case"every":case"filter":case"findIndex":case"forEach":case"map":case"some":if(g.length<1)return me;break;case"sort":0===g.length&&g.push(t());break;case"indexOf":return function(e,r,n){if((n=i(e.length,n,0))===me)return me;for(var t=n;t<e.length;++t)if(Xu(e[t],r)!=me)return qa(t);return qa(-1)}(c,g[0],g[1]);case"join":return g.length<1?a(c,!1):a(c,g[0]);case"lastIndexOf":return function(e,r,n){if((n=i(e.length,n,e.length-1))===me)return me;for(var t=n;0<=t;--t)if(Xu(e[t],r)!=me)return qa(t);return qa(-1)}(c,g[0],g[1]);case"pop":case"shift":d=!1;break;case"reduce":case"reduceRight":if(d=!1,g.length<1)return me;if(g.length<2){if(c.length<1)return me;g.push(c[0]),c=c.slice(1)}break;case"toString":return no(o,me);case"push":case"unshift":case"concat":case"copyWithin":case"reverse":case"slice":case"fill":case"splice":break;default:return xi(_e(["internal",'$arrayCall "'+p+'": not defined']),me)}try{jt=1,_r=qr;var h=Array.prototype[p],b=me;return h!==D&&(b=h.apply(c,g),!d&&K(b)||(b=b===c?o:K(b)?(b[na]=ta,Ie(b)):ma(b))),jt=-1,b}catch(e){if(e===Pt)throw e;return jt=-1,xi(_e(["internal",'$arrayCall "'+p+'": '+e.toString()]),me)}},S],["dictionary","dictionary",function(e,r){return T(Ru(e,r)===Au)},S],["dictionary","set.",ba,ae],["dictionary","set[",ba,ae],["dictionary","merge",function(e,r){for(var n=[{}],t=0;t<e;++t){var i=r(t);if(i[0]!==oe||K(i[he])){if(i[0]===ee){var a=Object.assign.apply({},n);do{}while(delete a[xa(i[1])],(i=i[2])[0]===ee);n=[a]}}else ua(i[he])?n.push(i[he]):n.push(wa(i[he])[he])}return fa(Object.assign.apply({},n))},S],["dictionary","keys",Na,ae],["dictionary","defined",Oa,ae],["dictionary","object",function(e,r){return T(Ru(e,r)===Tu)},S],["local","instances",function(e){function r(e){for(var r=-1;++r<It;){var n=e[2][3][".parent"];if(!n)return[e,r];e=n}return[me,r]}function n(e){var r=e[2][3][".base"];return r||e}if(e[0]!==re||e[3]===me)return me;var t,i;[t,i]=r(e=e[3][2][1]);var a=n(t);if(a===me)return me;for(var u=function(o){var e,r,n,f=new WeakMap,c=[];function s(e){if("object"==typeof e&&!f.get(e))switch(f.set(e,e),e[0]){case ee:for(var r=e;;){s(r[1]);var n=r[2];if(n===me)break;if(n[0]!==ee){s(n);break}if(r=n,f.get(r))break;f.set(r,r)}break;case oe:if(ua(e[he])){var t=e[he];if(K(e[he]))for(var i=0;i<t.length;++i)s(t[i]);else for(var a=Object.getOwnPropertyNames(t),u=0;u<a.length;++u)s(t[a[u]])}break;case re:e[le]===o&&c.push(e),s(e[1]),s(e[2]),s(e[3])}}for(e=0;e<Oe.length;++e)for(n=Oe[e][be],r=0;r<n.length;++r)s(n[r]);for(var t=1;t<=dt;++t)s(vt[t-1]);return c}(e[le]),o=me,f=0;f<u.length;++f){var c,s,l=u[f];[c,s]=r(l),s==i&&n(c)===a&&(o=We(l,o))}return o},ae],["local","delete",function(e,r){for(var n=[],t=0;t<e;++t)n.push(r(t));for(var i,a=me,u=0;u<n.length;++u)(i=n[u])[0]===w?W(i):a=We(i,a);return a},S],["local","enclose",Ou,ae],["local","namespace",function(e){return e===me?X:e[0]===re||e[0]===oe?e[se]:e[0]===w?e[j]:me},ae],["local","new",aa,ae],["local","nonce",function(e){return T(e[0]===oe&&e[he]instanceof da)},ae],["local","nsactive",function(e){return e===me?xe(Z):e[0]===ee?I(e):e[0]===re&&e===Re?xe(Oe):me},ae],["local","nscaller",function(e){for(var r,n=bt;0<n;){var t=vt[n];switch(t){case Dn:return vt[n-6];case Ln:return r=vt[n-2],vt[n-9-r];case Kn:case Cn:case Bn:case et:case Rn:break;default:return Zi(Di,"nfuncNscaller: unknown frame type on stack: "+t),me}n=vt[n-1]}return me},ae],["local","caller",Ti,ae],["local","nsrights",function(e,r){if(0===e)return J;var n=r(0);if(1==e&&n[0]===w){var t=J;return J===X&&(J=n),t}for(var i=0;i<e;++i){var a=r(i);if(a[0]===w)n=a;else{if(a[0]!==re&&a[0]!==oe)return me;if(!ke(a))return me;n=a[se]}if(n!==me&&(n!=J&&J!==X))return me}return Re},S],["local","symlist",Su,ae],["local","weakmap",function(e){return T(e[0]===oe&&e[he]instanceof WeakMap)},ae],["local","packageDecode",function(e,r){var n;if(e[0]===oe){if(!K(e[he]))return me;ua(n=e[he])&&(n=xa(e))}else{if(e[0]!==ee)return me;n=xa(e)}var a={};if(r!=me){if(r[0]!==oe)return me;r=r[he];if(!ua(r))return me;r.intern&&(r.intern[0]==ne?a.intern=r.intern[pe]:a.intern=ke(r.intern)),r.objectDecoder&&(a.objectDecoder=r.objectDecoder),r.dialectSym&&(a.dialectSym=r.dialectSym)}try{var t=n[0][3];if("NaanPackage"!=n[0][0]||"string"!=typeof t)return Me("package not recognized");if(2<n[0][1]||n[0][2]<1||n[1].length<14||n[1][0]<3)return Me("package version not supported: ".concat(n[0][1],"-",n[0][2]))}catch(e){return Me("invalid package format")}var u=n[1][0],i=[],o=n[1][1]||[],f=n[1][2]||[],c=n[1][3]||[],s=n[1][4]||[],l=n[1][5]||[],p=n[1][6]||[],g=n[1][7]||[],v=n[1][8]||[],d=n[1][9]||[],h=n[1][10]||[],b=n[1][11]||[],y=n[1][12]||[],m=n[1][13]||[];function k(e){e=q(e);return e[se]=Z[0],e}function w(e,r){if(0===e)return me;if(Number.isInteger(r)){if(r++>u)throw"cycle corruption"}else r=1;var n;if(K(e)){n=me;for(var t=e.length-1;0<=t;--t)n=We(x(e[t]),n);return n}if(!Number.isInteger(e))throw"invalid refnum";if(e<o.length){var i=o[e];return"string"!=typeof i&&(i=i===D?"undefined":null===i?"null":!0===i?"true":i.toString(),"symbols"==a.intern)?Ar(i):n="undefined"==i?qe:"null"==i?Fe:(a.intern?Ar:k)(i)}if((e-=o.length)<f.length)return(n=q(f[e]))[se]=Z[0],n;if((e-=f.length)<c.length)return Me(c[e]);if((e-=c.length)<s.length)return qa(s[e]);if((e-=s.length)<l.length)return Fa(l[e]);if((e-=l.length)<p.length)return function(e,r){r=Se(x(p[e],r));return r[na]=ta,Ie(r)}(e,r);if((e-=p.length)<g.length)return function(e,r){for(var r=x(g[e],r),n=fa({}),t=r[1],i=r[2][1];t[0]===ee;)Aa(n,t[1],i[1]),t=t[2],i=i[2];return n}(e,r);if((e-=g.length)<v.length)return function(e){for(var r=v[e],n=me,t=r.length-1;0<=t;--t)n=We(x(r[t]),n);return n}(e);if((e-=v.length)<d.length)return function(e,r){r=x(d[e],r);return we(r[1])?r=Ou(r,me):r[0],r}(e,r);if((e-=d.length)<h.length)return function(e,r){var n,t=x(h[e],r);if(a.dialectSym){try{var i=a.dialectSym;i[0]===re&&(i=i[ce]);i=xa(i,!1,{convert:!1,retresult:!0});_r=qr,n=i(t[jt=1],t[2][1]),jt=-1}catch(e){throw"invalid dialectSym option"}if(n!==me&&n[0]===re)return n;if(n[0]===ne)throw n[pe]}r=t[2][1][pe];return(a.intern?Ar:k)(r)}(e,r);if((e-=h.length)<b.length)return Ie(function(e){if("undefined"!=typeof process&&process.versions&&process.versions.node){var r=Buffer.from(e,"base64");return new Uint8Array(r.buffer,r.byteOffset,r.byteLength)}for(var n=atob(e),t=n.length,i=new Uint8Array(t),a=0;a<t;a++)i[a]=n.charCodeAt(a);return i}(b[e]));if((e-=b.length)<y.length)return Ie(JSON.parse(y[e]));if((e-=y.length)<m.length)return function(e,r){var n,t=x(m[e],r);try{var i=a.objectDecoder;i[0]===re&&(i=i[ce]);i=xa(i,!1,{convert:!1,retresult:!0});jt=1,_r=qr,n=i(t),jt=-1}catch(e){throw"invalid objectDecoder option"}return n}(e,r+1);throw"invalid refnum: ".concat(e)}var x=function(e,r){return e?Number.isInteger(e)?i[e]||(i[e]=w(e,r)):w(e,r):me};try{var S=x(n[3]),O=We(Me(t),We(x(n[0][4]),We(x(n[0][5]),We(x(n[2]),me))));return We(O,S)}catch(e){return"string"==typeof e?Me(e):Me("unknown decode error: ".concat(e.toString()))}},ae],["local","packageEncode",function(e,r,n){if(e[0]!==re)return"package name must be a symbol";if(r[0]!==ee)return"package root list empty";var t=e,c=r,v={debug:!0,comments:!0,prereqs:me};if(n!==me){if(n[0]!==oe)return me;n=n[he];if(!ua(n))return me;n.nsignore&&(v.nsignore=ke(n.nsignore)),n.comments&&(v.comments=ke(n.comments)),n.objectEncoder&&(v.objectEncoder=n.objectEncoder),n.dialectName&&(v.dialectName=n.dialectName),n.prereqs&&(v.prereqs=n.prereqs),n.debug&&(v.debug=ke(n.debug))}var d,i,s=qa(10),l=new WeakMap,h=new WeakMap,p=new WeakMap,g=new WeakMap,b=new WeakMap,y=new WeakMap,a=new WeakMap,m=new WeakMap,k={},w={},x={},u={},S={},O={},N={},j=[],P=[],A=[],T=[],E=[],M=[],I=[],o=[],f=[],W=[],$=[],_=[],q=[],F=0,R=[],C=[];function B(r){var e,n;if(r[0]===re){if(ke(r)){if(r[se][be][r[se][ye][r[le]]]!==r&&!ke(Ju(r,c)))return(e=g.get(r))||(g.set(r,++F),P.push(r),R[F]=r,F);if(C.indexOf(r[se])<0){var t,i=Du(r),a=r[ce],u=a[0];if(!(a===i||ae<=u&&u<=ue&&a[de]===i[de]))if(v.dialectName){try{var o=v.dialectName;o[0]===re&&(o=o[ce]);o=xa(o,!1,{convert:!1,retresult:!0});jt=1,_r=qr,t=o(r[se]),jt=-1}catch(e){throw"invalid dialectName option"}if(t[0]===ne)return a=We(t,We(Me(r[le]),me)),n=G(a),(e=S[n])||(S[n]=++F,W.push(n),R[F]=qa(n),F)}else v.nsignore||(ke(i)?(v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save modified binding for well-known symbol "+r[le]),l.set(r,!0)):v.debug&&!l.get(r)&&(Zi(Ui,"nfuncPackageEncode: cannot save "+Ne(r[se])+"::"+r[le]+" from "+Ne(d)),l.set(r,!0)))}}return(e=p.get(r))||(p.set(r,++F),j.push(r),R[F]=r,F)}if(r[0]===ee)return(we(r[1])&&r[2][1][ce]===r?L:D)(r);if(r[0]===ne)return n=r[pe],(e=k[n])||(k[n]=++F,A.push(n),R[F]=r,F);if(r[0]===te)return n=oo(r,{radix:s}),(e=w[n])||(w[n]=++F,T.push(n),Ba(r[ge])<Number.MAX_SAFE_INTEGER?R[F]=r:R[F]=n,F);if(r[0]===ie)return n=r[ve],(e=x[n])||(x[n]=++F,E.push(n),R[F]=r,F);if(r[0]!==oe)return v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save type "+oo(r)),l.set(r,!0),1;var f=r[he];if(ua(f))return K(f)?(e=b.get(r))||(n=U(xe(f)),b.set(r,++F),M.push(r),R[F]=n,F):f instanceof ca?e||(n=qa(n=function(e){var r;try{var n=v.objectEncoder;n[0]===re&&(n=n[ce]);n=xa(n,!1,{convert:!1,retresult:!0});jt=1,_r=qr,r=n(e),jt=-1}catch(e){throw"invalid objectEncoder option"}return G(r)}(r)),m.set(r,++F),q.push(r),R[F]=n,F):f instanceof oa?(e=y.get(r))||(n=U(function(e){for(var r=Object.getOwnPropertyNames(e),n=[],t=0;t<r.length;++t)n.push(Me(r[t]));for(var i=[],t=0;t<r.length;++t)i.push(e[r[t]]);return We(xe(n),We(xe(i),me))}(f)),y.set(r,++F),I.push(r),R[F]=n,F):f instanceof da?1:void 0;if(i=f,"undefined"!=typeof Buffer&&Nu(i,Buffer)||("undefined"!=typeof ArrayBuffer&&Nu(i,ArrayBuffer)||("undefined"!=typeof DataView&&Nu(i,DataView)||("undefined"!=typeof Uint8Array&&Nu(i,Uint8Array)||!("undefined"==typeof Blob||!Nu(i,Blob))))))return(n=function(e){let n;if("string"==typeof e){const d=new TextEncoder;n=Array.from(d.encode(e))}else if(e instanceof Uint8Array)n=Array.from(e);else{if(!(e instanceof ArrayBuffer))return!1;n=Array.from(new Uint8Array(e))}var r=8*n.length;for(n.push(128);n.length%64!=56;)n.push(0);for(let e=0;e<8;e++)n.push(r>>>8*e&255);let t=1732584193,i=4023233417,a=2562383102,u=271733878;var o=[7,12,17,22,7,12,17,22,7,12,17,22,7,12,17,22,5,9,14,20,5,9,14,20,5,9,14,20,5,9,14,20,4,11,16,23,4,11,16,23,4,11,16,23,4,11,16,23,6,10,15,21,6,10,15,21,6,10,15,21,6,10,15,21],f=Array.from({length:64},(e,r)=>Math.floor(4294967296*Math.abs(Math.sin(r+1))));for(let r=0;r<n.length;r+=64){const h=[];for(let e=0;e<16;e++)h[e]=n[r+4*e]|n[r+4*e+1]<<8|n[r+4*e+2]<<16|n[r+4*e+3]<<24;var c=t,s=i,l=a,p=u;for(let n=0;n<64;n++){let e,r;r=n<16?(e=i&a|~i&u,n):n<32?(e=u&i|~u&a,(5*n+1)%16):n<48?(e=i^a^u,(3*n+5)%16):(e=a^(i|~u),7*n%16);var g=u;u=a,a=i;var v=t+e+f[n]+h[r]|0,v=v<<o[n]|v>>>32-o[n];i=i+v|0,t=g}t=t+c|0,i=i+s|0,a=a+l|0,u=u+p|0}return[t,i,a,u].map(r=>{let n="";for(let e=0;e<4;e++)n+=(r>>>8*e&255).toString(16).padStart(2,"0");return n}).join("")}(f))?(e=O[n])||(O[n]=++F,$.push(n),R[F]=Me(function(e){var r=e instanceof Uint8Array?e:new Uint8Array(e);if("undefined"!=typeof process&&process.versions&&process.versions.node)return Buffer.from(r).toString("base64");for(var n="",t=r.length,i=0;i<t;i++)n+=String.fromCharCode(r[i]);return btoa(n)}(f)),F):(v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save binary "+f.constructor.name),l.set(r,!0),1);try{n=JSON.stringify(f)}catch(e){return v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save xobject "+f.constructor.name),l.set(r,!0),1}return(e=N[n])||(N[n]=++F,_.push(n),R[F]=Me(n),F)}function D(e){for(var r=[],n=e;n[0]===ee;)r.push(G(n[1])),n=n[2];var t=xe(r.map(function(e){return qa(e)})),r=r.join(","),e=u[r];return e||(u[r]=++F,o.push(r),R[F]=t,F)}function L(e){if(e[0]>=ae&&e[0]<=ue)return G(oo(e));var r=e[2][1],n=a.get(r);if(n)return n;if(e[0]!==ee)return e!==me&&v.debug&&!l.get(e)&&(Zi(Ui,"nfuncPackageEncode: cannot save procedure type "+oo(e)),l.set(e,!0)),1;e=qa(e=D(e));return a.set(r,++F),f.push(r),R[F]=e,F}function U(e){return qa(G(e))}var X,z,G=function(e){var r=h.get(e);return r||(r=B(e),h.set(e,r)),r};function J(e){if("number"==typeof e)return Zi(Ui,"nfuncPackageEncode: raw renumber: "+e),i[e];if(e[0]===te)return qa(i[Ba(e[ge])]);if(e[0]!==ee)return!1;for(var r=[],n=e;n[0]===ee;)r.push(J(n[1])),n=n[2];return xe(r)}try{d=t[se],C.push(d),C.push(Oe[1]),G(me);var Z=qa(G(c)),V=function(e){for(var r=[".closure",".base",".parent"],n=me,t=[],i=Su(d);i[0]===ee;)i[1][2]!==me&&t.push(i[1]),i=i[2];for(var a,u,o=Se(e),f=0;f<o.length;++f){if((a=o[f])[0]!==re)throw"non-symbol in root list";if(d===a[se])for(u=Sa(a[2]);u[0]===ee;)r.includes(u[1][1][pe])||(g=u[1][2])[0]===re&&o.indexOf(g)<0&&o.push(g),u=u[2]}for(f=0;f<o.length;++f)G(o[f]);for(f=o.length-1;0<=f;--f){a=o[f];for(var c=me,s=0;s<t.length;++s){var l=t[s];if(l!==a)for(u=Sa(a[2]);u[0]===ee;){var p,g=u[1];r.includes(u[1][1][pe])||g[2]!==a||(p=We(l,We(g[1]),We(g[2])),c=We(p,c)),u=u[2]}}n=We(function(e,r,n){var t=e[ce],i=e[fe];if(i[0]===oe){var a,u=i[he];if(ua(u)){for(var o in u=Object.assign({},u),n)h.get(u[n[o]])||delete u[n[o]];u[".sourcemap"]&&(v.comments?u[".sourcemap"][0]===oe&&(a=u[".sourcemap"][he],delete(a=Object.assign({},a))[".map"],u[".sourcemap"]=fa(a)):delete u[".sourcemap"]),i=fa(u)}}return We(U(e),We(U(e[1]),We(U(i),We(qa(L(t)),We(U(r),me)))))}(a,c,r),n)}return n}(c);z=0,i={},Y(j,p),Y(P,g),Y(A,k),Y(T,w),Y(E,x),Y(M,b),Y(I,y),Y(o,u),Y(f,a),Y(W,S),Y($,O),Y(_,N),Y(q,m);var Q=We(Me("NaanPackage"),We(qa(1),We(qa(2),We(t,We(v.prereqs,me)))));return We(Q,We((X=0,Q=We(H(j,p),We(H(P,g),We(H(A,k),We(H(T,w),We(H(E,x),We(H(M,b,!0),We(H(I,y,!0),We(H(o,u,!0),We(H(f,a,!0),We(H(W,S,!0),We(H($,O),We(H(_,N),We(H(q,m,!0),me))))))))))))),We(qa(X),Q)),We(J(Z),We(J(V),me))))}catch(e){return"string"==typeof e?Me(e):Me("unknown encoding error: ".concat(e.toString()))}function H(e,r,n){for(var t=[],i=0;i<e.length;++i){var a="WeakMap"==r.constructor.name?r.get(e[i]):r[e[i]];a=R[a],n&&(a=J(a)),t.push(a),++X}var u=xe(t);return u===me?qa(0):u}function Y(e,r){for(var n=0;n<e.length;++n){var t="WeakMap"==r.constructor.name?r.get(e[n]):r[e[n]];i[t]=z++}}},ae],["host","editget",function(e){return A.hasOwnProperty("edit-get-string")?Me(A["edit-get-string"]()):me},ae],["host","editset",function(e){return A.hasOwnProperty("edit-set-string")?(A["edit-set-string"](oo(e)),e):me},ae],["host","future",function(e,r){var n=Ie(!1);return(r=new da(n,e,va(r))).cancel=r.signal,r.run=r.reset,delete r.signal,delete r.reset,n[x]=me,n[he]=r,n},ae],["host","futures",function(){for(var e=Object.getOwnPropertyNames(ga),r=me,n=0;n<e.length;++n){var t=ga[e[n]],i=new oa;i.nonce=t.nonce,i.start=qa(t.start),i.count=qa(t.count),t.delay&&(i.delay=qa(t.delay)),t.execute&&(i.execute=t.execute),t.waiting&&0<t.waiting.length&&(i.waiting=xe(t.waiting)),t.contins&&0<t.contins.length&&(i.continuations=xe(t.contins)),r=We(Ie(i),r)}return r},ae],["host","loadstate",Ao,ae],["host","milliseconds",function(){return qa((new Date).getTime())},ae],["host","mangled",mo,ae],["host","runaverage",function(e,r){var n,t;if(e===me)n=!1;else if(null===(n=Da(e,50))||n<0)return me;if(r===me)t=!1;else if(null===(t=Da(r,1e3))||t<10)return me;return ka(Zt(n,t),new WeakMap)},ae],["host","savestate",Po,ae],["host","sprint",function(){return Ia(),Re},ae],["host","wait",function(){return jt<0?(jt=0,Re):(jt=1,At)},ae],["stdio","textstream",yo,ae],["stdio","textstreams",function(e){var r=ho,n=bo;if(r===po&&e!==Re&&(r=me),n===po&&e!==Re&&(n=me),e[0]===ee){if(e[2][0]!==ee)return me;var t=e[1],e=e[2][1];if(t===me)t=po;else if(t===Re)t=ho;else if(yo(t)!==Re)return me;if(e===me)e=po;else if(e===Re)e=bo;else if(yo(e)!==Re)return me;go=(ho=t)[he].raw[he].read,vo=(bo=e)[he].raw[he].write}return We(r,We(n,me))},ae],["stdio","isbreak",function(e){return bo[he].isbreak[3](e)},ae],["stdio","newline",function(e){return bo[he].newline[3](e)},ae],["stdio","spaces",function(e){return bo[he].spaces[3](e)},ae],["stdio","printline",fo,S],["stdio","print",function(e,r){return bo[he].print[3](e,r)},S],["stdio","printloc",function(e){return bo[he].printloc[3](e)},ae],["stdio","printq",function(e,r){return bo[he].printq[3](e,r)},S],["stdio","printFlush",co,ae],["external","xapply",function(e,r,n){if(e[0]!==oe||r[0]===ee||r[0]===oe&&ua(r))return me;var t=n===me?[]:xa(n);if(!K(t))return me;var i=xa(r),a=null;if(e[0]===oe){if(ua(a=e[3])){if(a.hasOwnProperty(i)){e=a[i];if(K(e))return di(e,n)}return me}if(a instanceof WeakMap)return me}var u,o=me,f=a===Number||a===String||a===Boolean;try{return jt=1,_r=qr,r[0]===oe?o=ma(r[3].apply(a,t)):(a.prototype!==D&&(u=a.prototype[i])!==D||(f=!1,u=a[i]),u!==D&&(o=ma(f?u.apply(t[0],t.slice(1)):u.apply(a,t)))),jt=-1,o}catch(e){return jt=-1,xi(_e(["internal",'$xapply "'+i+'": '+e.toString()]),me)}},ae],["external","xcall",function(e,r){return e<2?me:Ta(r(0),r(1),e-2,2,r)},S],["external","xget",Pa,ae],["external","xdefined",Oa,ae],["external","xkeys",Na,ae],["external","xlock",ja,ae],["external","xnew",Ea,S],["external","xobject",function(e){return T(e[0]===oe&&!ua(e[3]))},ae],["external","xset",Aa,ae],["debug","breakpoint",ea,S],["debug","debuglog",Ki,S],["debug","jsdebugger",function(e,r){var n=Ii;Ii=Li,Ki(e,r),Ii=n;debugger;return Re},S],["debug","loglevel",function(e){var r=Ii;return null===(Ii=Da(e,9))&&(Ii=r),qa(r)},ae],["debug","stacktrace",function(){return Pi(bt)},ae],["debug","stacktrap",function(e,r,n){var t,i;if(null===(e=Da(e,65535))||e<0)return me;if(r===me)return Ai(e);if(r[0]===te){if(L.negative(r[3]))return me;t=r,i=n}else i=r;return(e=Ai(e,!0))!==me&&(e[he].trap=i,t?e[he].steps=t:delete e[he].steps),e},ae],["debug","symtrace",function(e){return e[1][0]!==re?me:(Gi=e[1],Ji=Gi[1],e[1])},ue]];function Mo(e,r,n){var t=nr[O],i=t[he][e];i||(i=fa(),ja(t[he][e]=i,X)),i[he][r]||(i[he][r]=n)}function Io(){var e=nr[O];e!==me&&e[0]===oe&&ua(e[he])||(ja(e=fa(),X),nr[O]=e);var r,n=R("App"),t=n[O];for(t!==me&&t[0]===oe&&ua(t[he])||(t=fa(),n[O]=t),r=0;r<Eo.length;++r){var i=Eo[r][0],a=Eo[r][1],u=Eo[r][2],o=Eo[r][3],f=(Eo[r][4],R(a));f!==me&&f[ce]!==me||(f=Pe(a,u,o)),_(a,z)||Mo(i,a,f)}e[he].module||(e[he].module=fa()),nr=R("Naan"),R("deref"),He=R("."),Ge=R("exception"),Je=R("escape"),me=R("false"),Qe=R("`"),Ze=R("this"),Ve=R("self"),qe=R("undefined"),Fe=R("null"),Re=R("true"),Ce=R("lambda"),Ye=R("body"),R("call"),er=R("catch"),Ue=R("closure"),Be=R("function"),De=R("function&"),Xe=R("let"),ze=R("let&"),Ke=R("loop"),Le=R("macro"),R("var"),tr=R("builtin"),R("list"),ir=R("tuple"),ar=R("symbol"),ur=R("integer"),or=R("float"),fr=R("numeric"),cr=R("string"),sr=R("array"),Nr=R("arraycall"),lr=R("dictionary"),pr=R("object"),vr=R("namespace"),dr=R("nonce"),R("save"),To=R("load"),mr=R("$"),hr=R("weakmap"),yr=R("sprint"),R("xget"),R("xset"),jr=R("xcall"),R("xapply"),gr=R("xobject"),br=R("textstream"),wr=R("space"),kr=R("cr"),ra=R("breakpoint"),rr=R("interrupt")}function Wo(){function e(e,r){Ku(ir,Me(e),R(r||e)[ce])}function r(e,r){Ku(ir,Me(e),r)}function n(e,r){Ku(ar,Me(e),R(r||e)[ce])}function t(e,r){Ku(cr,Me(e),R(r||e)[ce])}function i(e,r){Ku(ur,Me(e),R(r||e)[ce])}function a(e,r){Ku(or,Me(e),R(r||e)[ce])}function u(e,r){Ku(sr,Me(e),R(r||e)[ce])}function o(e,r){Ku(vr,Me(e),R(r||e)[ce])}function f(e,r){Ku(vr,Me(e),r)}e("atom"),e("insert"),e("length"),e("reverse"),e("tostring"),e("tuple"),e("typeof"),r("member",Pe("member",function(e,r){return Ju(r,e)},ae,!0)),r("toarray",Pe("toarray",function(e){return aa(sr,e)},ae,!0)),r("within",Pe("within",function(e,r){return Zu(r,e)},ae,!0)),n("atom"),n("copyproc"),n("copyann"),n("interned"),n("length"),n("namespace"),n("proc","getproc"),n("putproc"),n("symbol"),n("tostring"),n("typeof"),n("value","car"),t("append","strcat"),t("atom"),t("interned"),t("length"),t("string"),t("tostring"),t("unicode"),t("typeof"),i("atom"),i("even"),i("integer"),i("negate"),i("negative"),i("numeric"),i("length"),i("positive"),i("tofloat"),i("toint"),i("tostring"),i("typeof"),i("unicode"),i("zero"),a("atom"),a("even"),a("float"),a("negate"),a("negative"),a("numeric"),a("length"),a("positive"),a("tofloat"),a("toint"),a("tostring"),a("typeof"),a("zero"),u("atom"),u("tostring"),u("totuple"),u("typeof"),o("atom"),o("typeof"),f("tostring",Pe("tostring",function(e){return e[0]===w?e[j]:me},ae,!0)),f("length",Pe("length",function(e){var r;return e[0]===w&&0<=(r=Oe.indexOf(e))?qa(Oe[r][be].length):me},ae,!0)),f("symbols",Pe("symbols",function(e){if(e[0]===w&&0<=(r=Oe.indexOf(e))){var r=Oe[r][be].slice();return r[na]=ta,Ie(r)}return me},ae,!0)),f("index",Pe("index",function(e){var r;return e[0]===w&&0<=(r=Oe.indexOf(e))?aa(ma(Oe[r][ye]),me):me},ae,!0)),f("lookup",Pe("lookup",function(e,r){var n,r=to(r);if(e[0]===w&&0<=(n=Oe.indexOf(e))){r=Oe[n][ye][r],r=Oe[n][be][r];if(r)return r}return me},ae,!0))}function $o(){for(var e in s)s.hasOwnProperty(e)&&je(e,ma(s[e]))}function _o(){A.hasOwnProperty("init-load")&&A["init-load"]()}Ft(),Io(),Wo(),$o(),this.Process=function(e,r,n){try{return n=n||"false",0<e.length&&($a(),go.SetText(e),r&&vo.WriteString("\r")),Bt()||(Ft(),Rt(_e(["loop",["catch",[["driver",n]],[[["equal","exception","driver"]]],"false"]])),n="false"),Nt=0,Dt(!1),Bt()}catch(e){return Zi(Di,"Naan internal error (101): "+e.toString()),!1}},this.GetOutput=function(){return vo.TakeText()},this.SetInput=function(e,r){go.WriteString(e),r&&go.SetEOF()},this.RunOutput=function(){try{return Nt=0,Dt(!1),vo.TakeText()}catch(e){return Zi(Di,"Naan internal error (102): "+e.toString()),null}},this.Run=function(){try{return Nt=0,Dt(!1),Bt()}catch(e){return Zi(Di,"Naan internal error (103): "+e.toString()),!1}},this.Escape=function(){try{return $a(),go.ScanReset(),go.SetText(""),vo.TakeText(),Si(_e(["internal","escape"])),!1}catch(e){return Zi(Di,"Naan internal error (104): "+e.toString()),null}},this.Banner=function(){return vo.WriteString("\rWelcome to Naan v1.7.0+1\n"),!0},this.StateSave=function(e){e=No(e);return"string"==typeof e&&e},this.StateLoad=function(e){try{return jo(JSON.parse(e))!==me}catch(e){return Zi(Di,"Naan StateLoad failed: "+e.toString()),!1}},this.StateDefault=function(){return _o(),!0},this.On=function(e,r){r?A[e]=r:delete A[e]},this.Signal=function(){$a()},this.Status=Zt,this._InheritNamespace=function(e){for(var r=Z,n=0;n<Oe.length;++n){var t,i=Oe[n];if(Ee(i[j])==e){Z.indexOf(i)<0&&(t=Z.shift(),Z.unshift(i),t&&Z.unshift(t));break}}return r},this._SetNamespace=function(e,r){var n,t=Z;return"string"==typeof e?I(We(Q(Me(e)),xe(Z)),!0):K(e)?(n=Z[0],Z=e,!r&&Z.indexOf(n)<0&&Z.push(n)):Zi(Di,"_SetNamespace: invalid argument: "+e),t},this._AddNamedObject=function(e,r){if("string"!=typeof e||0===e.length||"object"!=typeof r)return!1;r=Ie(r);return Ar(e)[1]=r,!0},this._SetValue=function(e,r){if("string"!=typeof e||0===e.length)return!1;r=r===D?Ar(e):je(e,$e(r));return r!==me},this._AddSymbolWithTarget=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("string"!=typeof r||0===r.length)return!1;var n=R(r);return n===me&&(n=Ar(r)),Ar(e),je(e,n)!==me},this._AddPropertyList=function(e,r){return"string"==typeof e&&0!==e.length&&("object"==typeof r&&function(e,r){var n,t=$e(e);if(t===me)return me;for(n=0;n<r.length;++n){var i=r[n];if("object"!=typeof i)return me;if(!(i.length<2)){var a=i[0];if("string"!=typeof a)return me;Ku(t,$e(a),$e(i[1]))}}return t}(e,r)[le])},this._SetBindingList=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("object"!=typeof r)return!1;r="string"==typeof(r=Er(r=$e(r),Z[0]))?(Zi(Di,"can't create closure: "+r),me):r;return r!==me&&(Te(e,r),!0)},this._CopyBinding=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("string"!=typeof r||0===r.length)return!1;e=R(e);return e!==me&&(Te(r,e[ce]),!0)},this._Execute=function(e){if("object"!=typeof e)return!1;var r=$e(e);if(r===me)return!1;e=jt;jt=-1;r=xa((Rt(r),Dt(!(Nt=0)),Mr));return jt=e,r},this._Export=function(e,r){if(!nr)return!1;if("string"!=typeof r||0===r.length)return!1;var n=R(r);return n!==me&&(Mo(e,r,n),!0)},this._Import=function(e,r,n){if(!nr)return!1;if(r===D){var t=nr[O][he][e];if(t===D)return!1;for(var i=Object.getOwnPropertyNames(t[he]),a=0;a<i.length;++a)this._Import(e,i[a]);return!0}if("string"!=typeof r||0===r.length)return!1;if(n===D)n=r;else if("string"!=typeof n||0===n.length)return!1;var u,t=Z.indexOf(X);0<=t&&Z.splice(t,1);try{u=nr[O][he][e][he][r]}catch(e){u=!1}return!!u&&(Te(n,u[ce]),!0)}}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
+!function(qo){qo.NaanInterpreter=function(){"use strict";var D,L=new(qo.LeemonBigIntegerLib?qo:require("./bigint.js")).LeemonBigIntegerLib,b=qo.NaanChannel?qo:require("./naan_io.js"),s={Number:Number,String:String,Date:Date,RegExp:RegExp,Array:Array,Math:Math,Promise:Promise},m={Number:Number,String:String,Date:Date,RegExp:RegExp};function K(e){return e instanceof Array||"[object Array]"===Object.prototype.toString.apply(e)}var k=Math.log2(Number.MAX_SAFE_INTEGER),i=Math.log2(Number.MAX_VALUE),n=131072,p="\b\f\n\0\r\t\v ~`@#$%^&*()_+-={}|[]\\:\";'<>?,./",a={ignoreWriteParamOnFalse:!0},y=this,ee=1,re=2,ne=3,te=4,ie=5,ae=6,S=7,ue=8,oe=9,w=10,g=0,O=1,N=2,fe=2,ce=3,se=4,le=5,x=2,pe=3,ge=3,ve=3,de=3,he=3,j=2,be=3,ye=4,l=N+1,P=le+1,t=pe+1,u=ge+1,o=ve+1,f=N+1,c=he+1,U=ye+1,A={},me=null;function ke(e){return e&&e!==me&&e!==qe&&e!==Fe}function we(e){return e===Ue||e===Be||e===De||e===Le||e===Xe||e===ze}function T(e){return e?Re:me}function v(e){return e===D?qe:null===e?Fe:e}function xe(e){for(var r=me,n=e.length-1;0<=n;--n)r=We(e[n],r);return r}function Se(e){for(var r=[];e[g]===ee;)r.push(e[O]),e=e[N];return r}function d(e,r){for(var n=Object.getOwnPropertyNames(r),t=0;t<n.length;++t){var i=n[t];e[i]=r[i]}}function h(e,r){return e===me?me:(r&&r!==me||(r=fa()),Lu(e)!==me&&d(r[he],e[he]),r)}function E(e){for(var r=0;e[0]===re;){if(++r>It)return me;if(e[ce]!==me)e=e[ce];else{if(e[1]===e)break;e=e[1]}}return e}var X,z,G,J,Oe=[],Z=[],M=1e5;function V(){Oe=[],Z=[],X=Q(Me("NaanRoot")),z=Q(Me("NaanCore")),G=Q(Me("NaanConst")),Oe.pop(),Z.push(z),J=X}function Q(e,r){return e===D?me:(r===D&&(r=new Array(U)),r[0]=w,(r[1]=r)[2]=e,r[3]=[],r[4]={},Oe.push(r),r)}function Ne(e){e=e&&e[0]===w?oo(e[j]):"nowhere";return e}function I(e,r){for(var n=[],t=xe(Z);e[g]===ee;){var i=e[O];i===me&&(i=X),i[0]===w&&n.indexOf(i)<0&&n.push(i),e=e[N]}if(0<n.length){if(!r&&n[0]!==Z[0]&&J!=n[0]&&J!==X)return xi(_e(["internal","$"+oo(J)+": no privileges to activate "+Ne(n[0])])),me;Z=n}return t}function W(l){var e,r,n,p=new WeakMap,g={};function v(e){e=function e(r){var n;if("object"!=typeof r)return r;if(p.get(r))return p.get(r);switch(p.set(r,r),r[0]){case ee:for(var t=r;;){var i=t[1],a=t[2];if(t[1]=v(i),a===me)break;if(a[0]!==ee){t[2]=v(a);break}if(t=a,p.get(t))break;p.set(t,t)}return r;case oe:if(r[se]===l)p.set(r,me),r=me;else if(ua(r[he])){var u=r[he];if(K(r[he]))for(var o=0;o<u.length;++o)(n=e(u[o]))===g?u.splice(o,1):u[o]=n;else for(var f,c=Object.getOwnPropertyNames(u),s=0;s<c.length;++s)(n=e(u[f=c[s]]))===g?delete u[f]:u[f]=n}return r;case re:return r[se]===l?((r[1]=r)[2]=me,r[3]=me,r[4]=me):(r[1]=v(r[1]),r[2]=v(r[2]),r[3]=v(r[3])),r}return r}(e);return e===g?me:e}for(p.set(g,g),p.set(l,g),e=0;e<Oe.length;++e)if(Oe[e]!==l)for(n=Oe[e][be],r=0;r<n.length;++r)v(n[r]);for(var t=1;t<=dt;++t)vt[t-1]=v(vt[t-1]);var i=Z.indexOf(l);0<=i&&Z.splice(i,1),0<=(i=Oe.indexOf(l))&&Oe.splice(i,1)}function $(e){for(var r=0;r<Z.length;++r){var n=Z[r];if(n[ye].hasOwnProperty(e)){var t=n[ye][e];return n[be][t]}}return!1}function _(e,r){return!!r[ye].hasOwnProperty(e)&&r[be][r[ye][e]]}var H={};function q(e){var r=new Array(P);return me||(me=r,V()),r[0]=re,(r[1]=r)[2]=me,r[3]=me,r[4]=me,r[5]=e,r}function F(e){var r,n,t=$(e);return t||(t=q(e),r=t,n=Z[0],e=r[le],t=n[ye][e],n[be][t]===r||((r[se]=n)[ye][e]=n[be].length,n[be].push(r)),r)}function R(e){e=$(e);return e||me}function C(e,r){var n,t;for(n in r)if(t=_(e,r[n]))return t;return me}function B(e,r){return C(r,[e[se],X,z])}function Y(e){if(e[se][0]!==w)return-1;var r=Oe.indexOf(e[se]);if(r<0)return Zi(Di,"can't find namespace for symbol \""+e[le]+'"'),0;var n=r*M,r=Oe[r][ye][e[le]];return"number"!=typeof r?(Zi(Di,"can't find interned symbol \""+e[le]+'"'),0):n+r}function je(e,r){e=F(e);return e===me&&Zi(Di,"can't set that: "+r),e===me?me:(r===D?r=e:"string"==typeof r?r=F(r):"number"==typeof r&&(r=qa(r)),e[1]=r,e)}function Pe(e,r,n,t){var i=(t?q:F)(e);i===me&&Zi(Di,"can't add builtin \""+i+'"');var a=new Array(f);return a[0]=n,(a[1]=a)[2]=i,a[3]=r,i[ce]=a,t||(H[e]=r),i}function Ae(e){for(var r=Object.getOwnPropertyNames(H),n=0;n<r.length;++n)if(H[r[n]]===e)return r[n];return D}function Te(e,r){e=F(e);return ke(e)||Zi(Di,"can't add that: "+r),e[ce]=r,e}function Ee(e){return e[0]===re?e[le]:e[0]===ne?e[pe]:e[0]===te?Ba(e[ge]).toString():e[0]===ie?e[ve].toString():""}function Me(e){var r=new Array(t);return r[0]=ne,(r[1]=r)[2]=me,r[3]=e,r}function Ie(e){var r=new Array(c);return r[0]=oe,(r[1]=r)[2]=me,r[3]=e,r[4]=me,r}function We(e,r){var n=new Array(l);return n[0]=ee,n[1]=e,n[2]=r,n}function $e(e){if("string"==typeof e)return 1<e.length&&"."==e.substring(0,1)?Fa(parseFloat(e.substring(1))):"$"==e.substring(0,1)?Me(e.substring(1)):("\\"==e.substring(0,1)&&(e=e.substring(1)),Ar(e));if("number"==typeof e)return qa(e);if("object"==typeof e){if(K(e)){for(var r=me,n=r,t=0;t<e.length;++t){var i=new Array(l);i[0]=ee,i[1]=$e(e[t]),n!==(i[2]=me)?n[2]=i:r=i,n=i}return r}if(e.hasOwnProperty("dictionary")){var a=new oa,u=e.dictionary,o=Object.getOwnPropertyNames(u);for(t=0;t<o.length;++t){var f=o[t];"$"!=f.substring(0,1)&&"\\"!=f.substring(0,1)||(f=f.substring(1)),a[f]=$e(u[o[t]])}var c=Ie(a);return e.tag!==D&&(c[2]=$e(e.tag)),c}if(e.hasOwnProperty("array")){var s=[];for(u=e.array,s[na]=ta,t=0;t<u.length;++t)s[t]=$e(u[t]);return Ie(s)}if(e.hasOwnProperty("xobject"))return Ie(e.xobject)}return Zi(Ui,"naanParseJsValue warning: can't parse "+typeof e),me}function _e(e){var r=Z;(Z=Z.slice()).push(X);e=$e(e);return Z=r,e}F("false");var qe=F("undefined"),Fe=F("null"),Re=F("true"),Ce=F("lambda"),Be=F("function"),De=F("function&"),Le=F("macro"),Ue=F("closure"),Xe=F("let"),ze=F("let&"),Ge=(F("var"),F("exception")),Je=F("escape"),Ze=F("this"),Ve=F("self"),Qe=F("`"),He=(F("deref"),F(".")),Ye=F("body"),Ke=F("loop"),er=F("catch"),rr=F("interrupt"),nr=(F("list"),F("Naan")),tr=F("builtin"),ir=F("tuple"),ar=F("symbol"),ur=F("integer"),or=F("float"),fr=F("numeric"),cr=F("string"),sr=F("array"),lr=F("dictionary"),pr=F("object"),gr=F("xobject"),vr=F("namespace"),dr=F("nonce"),hr=F("weakmap"),br=F("textstream"),yr=F("sprint"),mr=F("$");F("driver"),F("App"),F("identity"),F("js"),function(){for(var e in s)s.hasOwnProperty(e)&&F(e)}();var kr=je("cr","\n"),wr=F("space");wr[1]=Me(" "),je("doublequote",'"'),je("rpar",")"),je("lpar","("),je("comma",","),je("quote","`"),je("period","."),je("sprint",me),Z=[X,z];var xr=Me(".closure"),Sr=Me(".tostring"),Or=F("throw"),Nr=(F("call"),F("arraycall")),jr=(F("xget"),F("xset"),F("xcall"));F("xapply");function Pr(e){if(nr[1][0]!==oe)return me;for(var r=Object.getOwnPropertyNames(nr[1][he]),n=0;n<r.length;++n){var t=nr[1][he][r[n]][he];if(t.hasOwnProperty(e)){if(t[e][0]===re)return t[e];break}}return me}function Ar(e){var r=$(e);if(r)return r;if(r=F(e),nr[1][0]!==oe)return r;var n=Pr(e);return"future"!==e&&(n=n[ce])===me||(r[ce]=n),r}function Tr(e,r){if((e[0]===re||r&&e[0]===oe)&&ke(e)){if(e[se]===me)return 1;if(J==e[se])return 1;if(Z[0]===e[se])return 1;if(J===X)return 1;r=Ne(e[se])+vo.NSinfix;e[0]===re?r+=e[le]:r+=oo(e),xi(_e(["internal","$can't modify "+r+" from "+Ne(J)]),me)}else xi(_e(["internal","$attempt to modify constant "+oo(e)]),me)}function Er(e,r){try{return function(e,b){var u,o,r,n={};function y(e,r,n){if(r[0]!==re||((a=r)===me||a===qe||a===Fe||a===Ce||we(a)))for(;r[0]===ee;)y(e,r[1],n),r=r[2];else{var t=r[le];if(n===De||n===ze){if(r[se]===b||b===me)return;u!==Ue&&u!==Le&&Zi(Ui,"warning: using "+vo.NSinfix+t+" for parameter "+Ne(r[se])+vo.NSinfix+t+" in "+Ne(b)+vo.NSinfix+o[le])}var i=q(t);i[se]=b===me?r[se]:b;a=e[t];a&&(i[ce]=a[ce]),e[t]=i}var a}function m(e,r){for(;r[0]===ee;){if(r[1][0]===ee&&r[1][1]!==Qe)if(we(r[1][1])){var n=r[1][2][1];if(n!==me&&n[le]!==Ce[le]){var t=n[le],i=q(t);if(i[se]=b===me?n[se]:b,i[ce]=r[1],e.hasOwnProperty(t))throw"duplicate procedure name "+t+" in "+o[le];e[t]=i}}else m(e,r[1]);r=r[2]}}function k(e,r,n,t){if(e[0]!==ee){if(e[0]===oe&&ua(e[3])){var i=e[he];if(K(i)){for(var a=aa(sr,me),u=0;u<i.length;++u)a[he][u]=k(i[u],r,n,t);return a}var o,f=Object.getOwnPropertyNames(i),c=(e[3]instanceof ca?sa:fa)();for(c[2]=e[2],o=0;o<f.length;++o)c[he][f[o]]=k(i[f[o]],r,n,t);return c}return e[0]!==re?e:r.hasOwnProperty(e[le])?r[e[le]]:e}if(!n&&we(e[1])){var s=k(e[2][1],r,!1,t);s[le]===Ce[le]&&((s=q(s[le]))[O]=Ce,s[se]=b!==me?b:s[se]);var l=e[2][2][1],p=e[2][2][2],g={};m(g,p),y(g=Object.assign({},r,g),l,e[1]);p=We(k(l,g,!1,t),k(p,g,!1,s)),g=We(e[1],We(s,p));return s[ce]=g,t&&(s[2]===me&&(s[2]=aa(lr,me)),(s[2][3][".parent"]=t)[2]===me&&(t[2]=aa(lr,me)),p=(p=t[2][3][".children"])||me,t[2][3][".children"]=We(s,p)),g}e[1]===Qe&&(n=!0);for(var v=me,d=null;e[0]===ee;){var h=We(k(e[1],r,n,t),me);e.breakpoint&&(h.breakpoint=e.breakpoint),d?d[2]=h:v=h,d=h,e=e[2]}return e!==me&&d&&(d[2]=e),v}if(e[0]!==ee)return me;if(u=e[1],(o=e[2][1])[0]!==re)return me;var t=b!==me?b:o[se];o[se]!==t||(u!==Be&&u!==De||o[ce]!==e)&&o[ce]!==me?((r=q(o[le]))[O]=o,r[se]=t,r[fe]=h(o[fe]),u!==Ue&&u!==Le||r[fe][".base"]||(r[2]===me&&(r[2]=aa(lr,me)),r[2][3][".base"]=o)):r=o;r[2]!=me&&delete r[2][3][".children"];y(n,Ze),n[Ze[le]][1]=r,m(n,e[2][2][2]),y(n,e[2][2][1],u),t=k(e[2][2][1],n,!1),n=k(e[2][2][2],n,!1,r);n=We(u,We(r,We(t,n)));return r[ce]=n}(e,r)}catch(e){return e}}var Mr,Ir,Wr,$r,_r,qr=0,Fr=1,r=2,e=3,Rr=4,Cr=5,Br=6,Dr=7,Lr=8,Ur=9,Xr=10,zr=11,Gr=12,Jr=13,Zr=14,Vr=15,Qr=16,Hr=17,Yr=18,Kr=19,en=20,rn=21,nn=22,tn=23,an=24,un=25,on=26,fn=27,cn=28,sn=29,ln=30,pn=31,gn=32,vn=33,dn=34,hn=35,bn=36,yn=37,mn=38,kn=39,wn=40,xn=41,Sn=42,On=43,Nn=44,jn=45,Pn=46,An=47,Tn=48,En=49,Mn=50,In=51,Wn=52,$n=53,_n=54,qn=55,Fn=56,Rn=90,Cn=91,Bn=92,Dn=93,Ln=94,Un=0,Xn=1,zn=2,Gn=3,Jn=4,Zn=5,Vn=6,Qn=57,Hn=58,Yn=59,Kn=95,et=96,rt=[];rt[qr]=function(){},rt[vn]=function(){var e=Mr,r=0;if(e[0]!==ee){if(e[0]===oe&&ua(e[3])){if(K((Mr=e)[3]))return void(_r=Yr);if(e[3]instanceof oa)return void(_r=wn)}return Mr=e[1],void(_r=pt[--gt])}var n=e[1];for(;n[0]===re;){if(++r>It)return _r=pt[--gt],void(Mr=me);if(n[3]!==me)n=n[3];else{if(n[1]===n)break;if((n=n[1])[0]===oe)return _r=gn,$r=n,Wr=Re,Ir=e[2],void(Mr=n)}}if(n[0]===ee&&we(n[1])||n[0]===ae||n[0]===S||n[0]===ue)return _r=gn,$r=e[1],Wr=Re,Ir=e[2],void(Mr=n);if(we(n))return void(_r=pt[--gt]);_r=un},rt[yn]=function(){Mr[0]===re&&(Mr=E(Mr[ce]));$r=Mr[0]===ee?Mr:Ce;Wr=me,_r=gn},rt[gn]=Kt,rt[Qn]=Kt,rt[Lr]=function(){for(var e=vt[--dt],r=vt[dt-1-e],n=vt[dt-2-e],t=vt[dt-3-e],i=Mr;;){if(r[0]===ee)vt[dt++]=i,++e,r=r[2];else if(n[0]!==ee){!function(e){var r=ri();if(r){var n=dt,t=vt[n-4-e],i=ni(r,t);if(i){for(bt=vt[r-1],vt[i+0]=vt[n-5-e],vt[i+1]=t,vt[i+2]=vt[n-3-e],vt[i+3]=vt[n-2-e],vt[i+4]=vt[n-1-e],n-=e,i+=5;0<=--e;)vt[i++]=vt[n++];dt=i}}}(e);var a=vt[dt-4-e],u=a[2][1][se];r=a[2][2][1];for(var o=dt-e,f=!1;r[0]===ee;){if(i=r[1][1],r[1]===me)f=!0;else{if(r[1][0]!==re)return void Si(_e(["internal","$parameter is not a symbol"]));if(r[1][se]!==u)return void Si(_e(["internal","$parameters in foreign namespace: "+Ne(r[1][se])+vo.NSinfix+r[1][le]+" from: "+Ne(u)]));r[1][1]=f?me:vt[o]}vt[o++]=i,r=r[2]}return vt[dt++]=e,Wr=me,Ir=a[2][2][2],Mr=me,vt[dt++]=bt,vt[bt=dt++]=Ln,pt[gt++]=zr,vt[dt++]=gt,vt[dt++]=!1,_r=cn,"number"==typeof(i=vt[dt-11-e])&&(a=Ve[1],Ve[1]=vt[i],vt[dt-11-e]=a),void(J=u)}if(n[0]!==ee?i=me:(i=n[1],n=n[2]),t!==me){if(i[0]===ee||i[0]===oe)break;i=i[O]}}vt[dt-2-e]=n,vt[dt-1-e]=r,vt[dt++]=e,Mr=i,pt[gt++]=Lr,_r=vn},rt[Vr]=function(){var e=vt[dt-1];vt[dt-1]=Mr,_r=(Mr=e)===me?Qr:(pt[gt++]=Qr,vn)},rt[Qr]=function(){var e=vt[dt-2];vt[dt-2]=Mr,_r=(Mr=e)===me?Hr:(pt[gt++]=Hr,vn)},rt[Hr]=function(){var e=vt[--dt],r=vt[--dt],n=Mr,t=vt[--dt];if((Mr=t[3](e,r,n,t))===At)return void Vt(t,e,r,n);if(Mr===Tt)return Mr=ot,Ir=We(e,We(r,We(n,me))),void(_r=yn);if(Mr===Et)return void pi(ft,ct,We(e,We(r,We(n,me))));_r=pt[--gt]},rt[qn]=function(){var e;!function(){var e,r,n,t=ri();t&&(r=vt[(e=dt)-1],(n=ni(t,r))&&(bt=vt[t-1],vt[n+0]=vt[e-2],vt[n+1]=r,dt=n+2))}();var r=vt[dt-1],n=r[2][2][1];vt[dt++]=n[1],ke(n)&&(n[1]=Mr);Wr=me,Ir=r[2][2][2],Mr=me,vt[dt++]=bt,vt[bt=dt++]=Dn,pt[gt++]=Fn,vt[dt++]=gt,vt[dt++]=!1,_r=cn,"number"==typeof(e=vt[dt-8])&&(n=Ve[1],Ve[1]=vt[e],vt[dt-8]=n);J=r[2][1][se]},rt[Fn]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==Dn&&Zi(Di,"nadiCallNoSpread2: lost frame sync");(bt=vt[--dt])<Nt&&Wa();var r=vt[dt-2],e=r[2][2][1];e!==me&&r[1]!==Ue&&(e[1]=vt[dt-1]);dt-=3,Ve[1]=vt[--dt],J=vt[--dt],_r=pt[--gt]},rt[zr]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==Ln&&Zi(Di,"nadiCallComplete: lost frame sync");(bt=vt[--dt])<Nt&&Wa();var r=vt[--dt],e=vt[dt-4-r];if(e[1]!==Ue)for(var n=e[2][2][1],t=dt-r,i=r;0<=--i&&n[0]===ee;)n[1]!==me&&(n[1][1]=vt[t]),++t,n=n[2];dt-=r+5,Ve[1]=vt[--dt],J=vt[--dt],_r=pt[--gt]},rt[an]=function(){Wr=Re,Ir=Mr,it=Mr=me,_r=cn},rt[cn]=function(){vt[dt++]=bt,vt[bt=dt++]=Cn,vt[dt++]=gt,vt[dt++]=!1,vt[dt++]=Wr,vt[dt++]=Ir,vt[dt++]=Ir,_r=sn},rt[sn]=ai,rt[ln]=ai,rt[pn]=ai,rt[Yn]=function(){dt-=5,vt[--dt]!==Cn&&Zi(Di,"nadiBody4: lost frame sync");return bt=vt[--dt],void(_r=pt[--gt])},rt[un]=function(){vt[dt++]=me,vt[dt++]=me,vt[dt++]=Mr,_r=on},rt[on]=function(){var e=vt[dt-1];return e[0]===ee?(Mr=e[1],pt[gt++]=fn,void(_r=vn)):(Mr=vt[dt-2],dt-=3,void(_r=pt[--gt]))},rt[fn]=function(){var e=vt[dt-1],r=vt[dt-3],n=We(Mr,me);r!==me?r[2]=n:vt[dt-2]=n;vt[dt-3]=n,vt[dt-1]=e[2],_r=on},rt[Ur]=function(){vt[dt++]=Mr,_r=Xr,Mr=Re},rt[Xr]=function(){var e=vt[dt-1];return ke(Mr)&&e[0]===ee?(Mr=e[1],vt[dt-1]=e[2],pt[gt++]=Xr,void(_r=vn)):(--dt,void(_r=pt[--gt]))},rt[Mn]=function(){vt[dt++]=Mr,_r=In,Mr=me},rt[In]=function(){var e=vt[dt-1];if(ke(Mr)||e[0]!==ee)return--dt,void(_r=pt[--gt]);return Mr=e[1],vt[dt-1]=e[2],pt[gt++]=In,void(_r=vn)},rt[nn]=function(){return vt[dt++]=Mr,Ir=Mr[2][1],Mr=Ir,pt[gt++]=tn,void(_r=vn)},rt[tn]=function(){return Qu(vt[--dt][1],Mr),void(_r=pt[--gt])},rt[Sn]=function(){vt[dt++]=0,vt[dt++]=Mr,_r=On},rt[On]=function(){var e=vt[dt-1];return e[0]===ee?(Mr=e[1][1],pt[gt++]=Nn,void(_r=vn)):(dt-=2,Mr=me,void(_r=pt[--gt]))},rt[Nn]=function(){var e=vt[dt-1];_r=ke(Mr)?(0!==vt[dt-2]&&(vt[vt[dt-2]]=zn),dt-=2,Ir=e[1][2],Wr=me,cn):(vt[dt-1]=e[2],On);return},rt[en]=function(){return Mr=(vt[dt++]=Mr)[1],pt[gt++]=rn,void(_r=vn)},rt[rn]=function(){var e=vt[--dt];return Mr=e[2][1][1]=We(Mr,e[2][1][1]),void(_r=pt[--gt])},rt[An]=ui,rt[Tn]=function(){return vt[dt-1]=Mr,Mr=vt[dt-2],pt[gt++]=En,void(_r=vn)},rt[En]=oi,rt[Rr]=function(){return ui(),void(pt[gt-1]=Cr)},rt[Cr]=oi,rt[Br]=function(){var e=me;if(Ir=Mr,Mr=vt[--dt],Wr=vt[--dt],!ke(Mr))return Mr=me,void(_r=pt[--gt]);var r=Re;switch(Mr[0]){case ee:if(Ir===me)e=Mr;else if(Ir[0]===te||Ir[0]===ie){var n=Da(Ir,65535);if(null!==n){for(e=Mr,n=Math.abs(n);e[0]===ee&&0<=--n;)e=e[2];L.negative(Ir[3])||(e=e[1])}}else if(si(ir))return;break;case re:if(si(ar))return;if(Wr===me)return ci();e=me;break;case w:if(si(vr))return;if(Wr===me)return ci();e=me;break;case ne:if(Ir[0]!==te)return si(cr)?void 0:Wr===me?ci():void li("String");var t=Da(Ir,Number.MAX_SAFE_INTEGER);e=Me(t<0?Mr[3].charAt(Mr[3].length+t):Mr[3].charAt(t));break;case te:return fi()?void 0:si(ur)?void 0:Wr===me?ci():void li("Number");case ie:return fi()?void 0:si(or)?void 0:Wr===me?ci():void li("Number");case oe:if(ua(Mr[3])){if(e=me,t=Ir[0]===re?Ir[le]:Ir[0]===ne?Ir[pe]:(Ir[0]===te||Ir[0]===ie)&&Da(Ir,Number.MAX_SAFE_INTEGER),K(Mr[3]))if("length"==t)e=qa(Mr[3].length);else{if(si(sr))return;if(Ir[0]===te)(e=Mr[3][t])===D&&(e=me);else if(Wr!==me)return Ir=We(Mr,We($r=Ir,Wr[1])),Wr=sr,Mr=Nr[3],void(_r=gn)}else if(!1!==t)if(Mr[3].hasOwnProperty(t))e=Mr[3][t];else if(Mr[3]instanceof ca)Wr!==me?(Wr[1][0]===re&&Wr[1]!==me&&(r=me,Wr=Wr[1]),(e=ha(Mr,t))===me&&(e=ha(Mr,".undefined",!0))!==me&&(t=r!==me?We(Qe,We(Ir,me)):Ir,Wr=We(We(t,Wr[1]),me))):(e=ha(Mr,".."+t,!0))!==me?Wr=We(me,me):(e=ha(Mr,"..undefined",!0))!==me&&(Wr=We(We(We(Qe,We(Ir,me)),Wr[1]),me));else if(si(lr))return}else if(e=Pa(Mr,Ir),Wr!==me)return Ir=We(Mr,We($r=Ir,Wr[1])),Wr=He,Mr=jr[3],void(_r=gn);break;default:return ci()}if(Wr===me)return Mr=e,void(_r=pt[--gt]);$r=Ir,vt[dt++]=Mr,pt[gt++]=Dr,Ir=Wr[1],Wr=r,e[0]===re&&(e=E(e[ce]));return Mr=e,void(_r=Qn)},rt[Dr]=function(){return--dt,void(_r=pt[--gt])},rt[Gr]=gi,rt[Fr]=gi,rt[kn]=function(){var e,r=$r,n=Wr,t=Ir,i=Mr;e=r[0]>=ae&&r[0]<=ue?r[3](i,t,n,r):me;e===At?Vt(r,i,t,n):(Mr=e,_r=pt[--gt]);return},rt[Zr]=function(){return function(e){--Wi<0&&(Wi=0);0<Ri.length?(Zi(Ci,Ri+"==> "+oo(e,{quote:Re})),Ri=""):Zi(Xi,Vi()+"==> "+oo(e,{quote:Re}))}(Mr),void(_r=pt[--gt])},rt[Wn]=function(){return vt[dt++]=me,vt[dt++]=Un,vt[dt++]=me,vt[dt++]=Mr,vt[dt++]=bt,vt[bt=dt++]=Bn,vt[dt++]=gt,vt[dt++]=!1,Wr=me,Ir=Mr[1],Mr=me,pt[gt++]=$n,void(_r=cn)},rt[$n]=function(){vt[dt-6]=Mr,vt[dt-3]=et,bt<Nt&&Wa();vt[dt-7]===zn&&(Ge[1]=Ge);return Mr=vt[dt-5],Wr=me,Ir=Mr[2][2][1],Mr=me,pt[gt++]=_n,void(_r=cn)},rt[_n]=function(){Mr=vt[dt-6],Ir=vt[dt-7],Wr=vt[dt-8],bt=vt[dt-4];var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);dt-=2,vt[--dt]!==et&&Zi(Di,"nadiCatch2: lost frame sync");dt-=5,_r=(Ir===zn||Ir===Un||(Ir===Jn?(Oi(Mr),vt[bt]==Bn&&(Ge[1]=Ge)):Ir===Zn?Ni(Wr):Ir===Vn?ji(Wr):xi(Ge[1],Re)),pt[--gt]);return},rt[jn]=function(){var e,r=vt[dt-3],n=dt-3-r,t=vt[dt-2],i=vt[dt-1];function a(e){return e<0||r<=e?me:vt[n+e]}if(t<r)return Mr=vt[n+t],_r=Wr===He&&1==t||Wr===sr&&(0===t||1===t)?Pn:(pt[gt++]=Pn,vn),void(vt[dt++]=Wr);vt[dt++]=bt,vt[bt=dt++]=Kn,pt[gt++]=Hn,vt[dt++]=gt,vt[dt++]=!1,Mr=i[0]===oe?function(e){return e.prototype&&e.prototype.constructor.name}(i[he])?Ma(i,r,0,a):Ta(null,i,r,0,a):i[3]!==me?i[3](r,a,i,vt[n-1]):me;if(Mr===At)return ei(),pt[gt-1]=jn,_r=qr,void(jt=1);if(Mr===Tt){for(Mr=ot,Ir=me,e=r;0<=--e;)Ir=We(vt[n+e],Ir);return void(_r=yn)}if(Mr===Et){for(Ir=me,e=r;0<=--e;)Ir=We(vt[n+e],Ir);return void pi(ft,ct,Ir)}_r=pt[--gt]},rt[Pn]=function(){Wr=vt[--dt];var e=vt[dt-3],r=vt[dt-2];vt[dt-3-e+r]=Mr,vt[dt-2]=r+1,_r=jn},rt[Hn]=function(){var e=vt[dt-1];if(e&&e[he].trap)return void Yi(e,Mr);ei();e=vt[dt-3];dt=dt-4-e,_r=pt[--gt]},rt[r]=function(){vt[dt++]=Wr,vt[dt++]=Ir,pt[gt++]=e,_r=vn},rt[e]=function(){Mr[0]===re&&(Mr=E(Mr[ce]));$r=Mr[0]===ee?Mr[2][1]:Ce;Ir=vt[--dt],Wr=vt[--dt],_r=gn},rt[Yr]=function(){if(Wr=aa(sr,me),0===Mr[3].length)return Mr=Wr,void(_r=pt[--gt]);vt[dt++]=Mr,vt[dt++]=Wr,vt[dt++]=0,pt[gt++]=Kr,(Mr=Mr[3][0])===D&&(Mr=qe);_r=vn},rt[Kr]=function(){if(Ir=vt[dt-1]++,Wr=vt[dt-2],$r=vt[dt-3],Wr[3][Ir++]=Mr,Ir<$r[3].length)return pt[gt++]=Kr,Mr=$r[3][Ir],void(_r=vn);dt-=3,Mr=Wr,_r=pt[--gt]},rt[wn]=function(){if(Wr=fa(),0===(Ir=ma(Object.getOwnPropertyNames(Mr[3]).reverse()))[3].length)return Mr=Wr,void(_r=pt[--gt]);vt[dt++]=Mr,vt[dt++]=Wr,vt[dt++]=Ir,pt[gt++]=xn,(Mr=Mr[3][Ir[3][Ir[3].length-1]])===D&&(Mr=qe);_r=vn},rt[xn]=function(){Ir=vt[dt-1],Wr=vt[dt-2],$r=vt[dt-3],Mr===qe?Ir[3].pop():Wr[3][Ir[3].pop()]=Mr;if(0<Ir[3].length)return pt[gt++]=xn,Mr=$r[3][Ir[3][Ir[3].length-1]],void(_r=vn);dt-=3,Mr=Wr,_r=pt[--gt]},rt[mn]=Yt,rt[Jr]=Yt,rt[dn]=function(){vt[dt-4]=Mr,Mr=vt[dt-2],pt[gt++]=hn,_r=vn},rt[hn]=function(){vt[dt-2]=Mr,Mr=vt[dt-1],pt[gt++]=bn,_r=vn},rt[bn]=function(){var e,r,n,t,i;i=vt[dt-5],t=Mr,n=vt[dt-2],r=vt[dt-3],e=vt[dt-4],r[0]===ee&&r[1][ce][de]===wi&&(e=We(e,r[2][2]));dt-=5,Mr=function(e,r,n,t){function i(e){if(e[0]===re&&(e=E(e[ce])),e[0]===ae)return e[de];if(e[0]===S){if((e=e[de])===Xa)return Ua;if(e===Ga)return za;if(e===Za)return Ja;if(e===Qa)return Va;if(e===Ya)return Ha;if(e===uu)return au;if(e===fu)return ou;if(e===eu)return Ka;if(e===iu)return tu;if(e===nu)return ru}return function(){return me}}function a(e){return e[0]===oe&&e[3]instanceof ca&&(pi(e,t!==me?".preadjust":".postadjust",We(e,We(r,We(n,me)))),pt[gt++]=_r,1)}var u,o;if(e[0]===ee){var f=e[1],c=e[2][1];if(a(o=Pa(f,c)))return Mr;u=i(r),c=Aa(f,c,u(o,n))}else{if(e[0]!==re)return xi(_e(["internal","$invalid adjust target"]),me);if(a(o=e[1]))return Mr;u=i(r),c=Hu(e,u(o,n))}return t!==me?c:o}(e,n,t,i),_r=pt[--gt]};var nt,tt,it,at,ut,ot,ft,ct,st,lt,pt=[],gt=0,vt=[],dt=0,ht=-1,bt=0,yt=!1,mt=!1,kt=6e3,wt=1e3,xt=0,St=0,Ot=0,Nt=0,jt=0,Pt=[],At=[],Tt=[],Et=[],Mt=0,It=100,Wt=3e4,$t=1e4,_t=2e5,qt=Wt;function Ft(){return bt=dt=gt=0,_r=qr,Mr=Ir=Wr=$r=Ve[1]=me,Ge[1]=Ge,Ii=Li,Ri="",Ci=Wi=0,1}function Rt(e){return pt[gt++]=qr,_r=vn,Mr=e}function Ct(e,r,n){return $a(),vt[dt++]=St,St=0,vt[dt++]=mt,vt[dt++]=yt,vt[dt++]=e,vt[dt++]=r,vt[dt++]=J,vt[dt++]=Ve[1],vt[dt++]=$r,vt[dt++]=Wr,vt[dt++]=Ir,vt[dt++]=Mr,vt[dt++]=bt,vt[bt=dt++]=Rn,vt[dt++]=gt+2,vt[dt++]=!1,pt[gt++]=_r,pt[gt++]=n?Fr:Gr,_r=vn,at=me,mt=yt=!1,Mr=e}function Bt(){return jt<=0&&(_r!==qr||0<gt)}function Dt(e){if(!(0<jt)){var r=tt;for(st=(new Date).getTime(),vt.length=dt;_r===qr&&0<gt;)_r=pt[--gt];St=kt,tt=e=e||tt,yr[1]=T(e);try{!function(){var e=st;xt=0,nt=D;do{if(Ji!==Gi[1])return Si(We(Me("symtrace"),We(We(Qe,We(Gi,me)),We(We(Qe,We(Ji,me)),We(We(Qe,We(Gi[1],me)),me))))),Ji=Gi[1];if(qt<dt&&(Si(_e(["internal","$maximum stack depth exceeded"])),qt=dt+$t,_t<dt))return Zi(Di,"intractable recursion"),Ft(),$a(),0;if(++xt>=wt){if(xt=0,vt.length=dt,0<St&&!tt&&0==Nt&&(nt?(St-=nt,nt=D):St-=wt,St<=0)){St=kt,_r!==qr&&(pt[gt++]=_r,_r=qr);break}var r=(new Date).getTime();if(1e3<=r-e&&(st=r),1e4<(e=r)-st)return Si(_e(["internal","$unresponsive"])),0}}while(rt[_r](),_r!=qr)}()}catch(e){if(e!==Pt){debugger;Zi(Di,"caught: "+e.toString()),Si(_e(["unknown","$"+e.toString()]))}$a()}finally{tt=r,vt.length=dt,Wt<qt&&dt<qt-$t/2&&(qt-=$t/2)<Wt&&(qt=Wt),e=(new Date).getTime(),r=e-st,lt===D&&(Lt[lt=0]=st,Xt[0]=0,zt[0]=0,Gt[0]=0,Jt[0]=0),++Xt[lt],zt[lt]+=r,Gt[lt]<r&&(Gt[lt]=r),++Jt[lt],e>=Lt[lt]+200&&(Ut[lt]=e-Lt[lt],50<++lt&&(lt=0),Lt[lt]=e,Xt[lt]=0,zt[lt]=0,Gt[lt]=0,Jt[lt]=0)}0<uo.TextAvail()&&A.hasOwnProperty("console-out")&&A["console-out"](y,uo.TakeText())}}var Lt=[],Ut=[],Xt=[],zt=[],Gt=[],Jt=[];function Zt(e,r){e=e||4,r=r||1e3;for(var n=[],t=[],i=Lt.length-1,a=lt-1,u=e*r;0<=--i&&(n.push({start:Lt[a],width:Ut[a],runtime:zt[a],peak:Gt[a],runcount:Xt[a],counter:Jt[a]}),--a<0&&(a=Lt.length-1),!((u-=Ut[a])<0)););if(0===n.length)return[];var o=n[0];(new Date).getTime()-o.start>3*r&&t.push({start:o.start+r,width:r,cpu:0,peak:0,average:0,samples:0});for(var f=o.start+o.width-r,c=1;t.length<e;)if(f>=o.start){var s=o.peak;r<s&&(s=r);var l=Number((o.runtime/o.width).toFixed(3)),p=Math.round(o.runtime/o.runcount);s==r&&(l=1,p=1e3),t.push({start:f,width:r,cpu:l,peak:s,average:p,samples:o.counter}),f-=r}else{if(c>=n.length)break;o=n[c++]}return t}function Vt(e,r,n,t){Mr=r,Ir=n,Wr=t,$r=e,pt[gt++]=kn,_r=qr,jt=1}function Qt(e){if(e[ce]!==me)ut=e[ce];else{if(e[1]===e)return me;ut=e[1]}return ot=e,Tt}function Ht(e,r){return ft=e,ct=r,Et}function Yt(){if(vt[dt++]=_r===mn?Re:me,vt[dt++]=me,vt[dt++]=Mr[1],vt[dt++]=Mr[2][1],vt[dt++]=Mr[2][2][1],(Mr=Mr[1])[0]===ee){var e=Mr[1][ce][de];if(e===ki&&Mr[2][2][2]===me)Mr=Mr[2],_r=un;else{if(e!==wi)return dt-=5,Mr=me,void(_r=pt[--gt]);Mr=Mr[2][1],_r=vn}pt[gt++]=dn}else _r=dn}function Kt(){var r,n,e,t,i=Mr,a=Ir,u=Wr!==me;if(i[0]===re&&(i=E(i[ce])),i[0]===ae)return e=a[2][2][1],n=a[2][1],r=a[1],zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr),u?r[0]!==ee&&n[0]!==ee&&e[0]!==ee&&r[0]!==oe&&n[0]!==oe&&e[0]!==oe?(Mr=i[3](r[1],n[1],e[1],i))===At?void Vt(i,r[1],n[1],e[1]):Mr===Tt?($r=ot,Wr=Re,void(Mr=ut)):Mr===Et?void pi(ft,ct,a,!0):void(_r=pt[--gt]):(vt[dt++]=i,vt[dt++]=e,vt[dt++]=n,Mr=r,pt[gt++]=Vr,void(_r=vn)):(Mr=i[3](r,n,e,i))===At?void Vt(i,r,n,e):Mr===Tt?($r=ot,void(Mr=ut)):Mr===Et?void pi(ft,ct,a):void(_r=pt[--gt]);if(i[0]===S||i[0]===oe)if(zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr),i[0]===S&&_r!==Qn&&u&&(Mr=!1,a[0]===ee?(r=a[1])[0]!==ee&&r[0]!==oe&&(a[2][0]===ee?(n=a[2][1])[0]!==ee&&n[0]!==oe&&a[2][2][0]!==ee&&(Mr=i[3](2,function(e){return 0<=e&&e<2?[r[1],n[1]][e]:me},i,me)):Mr=i[3](1,function(e){return 0===e?r[1]:me},i,me)):Mr=i[3](0,function(e){return me},i,me),Mr&&Mr!==At&&Mr!==Tt&&Mr!==Et||pt[gt-1]===Gr))_r=pt[--gt];else{_r===Qn?(vt[dt]=vt[dt-1],++dt):vt[dt++]=me,zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,u),pt[gt++]=Zr);for(var o=0;a[0]===ee;)vt[dt++]=a[1],++o,a=a[2];vt[dt++]=o,vt[dt++]=u?0:o,vt[dt++]=i,_r=jn}else if(i[0]===ue){if(zi<=Ii&&(Qi(zi,oo(i,{quote:Re}),a,!1),pt[gt++]=Zr),(Mr=i[3](a,i))!==At)return Mr===Tt?($r=ot,Wr=me,void(Mr=ut)):void(Mr!==Et?_r=pt[--gt]:pi(ft,ct,a));Vt(i,a)}else i[0]!==ee||i[1]!==Le&&i[1]!==Be&&i[1]!==De&&i[1]!==Ue&&i[1]!==Xe&&i[1]!==ze?(Mr=me,_r=pt[--gt]):(t=i[2][1],Xi<=Ii&&(Qi(Xi,oo($r),a,u),pt[gt++]=Zr),vt[dt++]=J,_r===Qn?(vt[dt]=dt-2,++dt):vt[dt++]=Ve[1],t!==Ce&&t[0]===re&&t[se]!==me?t[ce]===i?(i[1]===Le?(u=!1,Wr=me,t[se]!==X&&(i=Er(i,J))):i[1]===Ue&&(i=Er(i,t[se])),"string"!=typeof i?(t=i[2][1],e=i[2][2][1],t=t[se],e[0]!==ee?e[0]===re?e[1]!==Xe?e===me||e[se]===t?(vt[dt++]=$r,vt[dt++]=i,Mr=a,_r=u?(pt[gt++]=qn,un):qn):Si(_e(["internal","$parameter in foreign namespace: "+Ne(e[se])+vo.NSinfix+e[le]+" from: "+Ne(t)])):Si(_e(["internal","$let parameter must be tuple"])):Si(_e(["internal","$parameter is not a symbol"])):(a[0]!==ee?r=me:(r=a[1],a=a[2]),vt[dt++]=$r,vt[dt++]=i,vt[dt++]=Wr,vt[dt++]=a,vt[dt++]=e,vt[dt++]=0,Mr=r,_r=u?r[0]===ee||r[0]===oe?(pt[gt++]=Lr,vn):(Mr=r[O],Lr):Lr)):Si(_e(["internal",i]))):Si(_e(["internal","$privilege violation in "+oo($r)])):Si(_e(["internal","$namespace invalid in "+oo($r)])))}function ei(){dt-=2,vt[--dt]!==Kn&&Zi(Di,"naanUnlinkArbFrame: lost frame sync"),(bt=vt[--dt])<Nt&&Wa()}function ri(){var e=bt;if(vt[e]!==Cn)return!1;for(var r=gt;;){var n=pt[--r];if(n!==ln){if(n===zr||n===Fn)break;return!1}}for(;vt[e]===Cn;){if(vt[e+3]!==me||vt[e+5][2][0]===ee)return!1;e=vt[e-1]}return e}function ni(e,r){if(r[1]!==Be&&r[1]!==Ue)return!1;var n,t;if(vt[e]===Dn)n=vt[e-3],t=ti;else{if(vt[e]!==Ln)return!1;n=vt[e-vt[e-2]-6],t=ii}if(vt[e+2])return!1;if(n[1]===Be||n[1]===Xe){var i=n[2][1],r=r[2][1];if(i[se]!==r[se])return!1;for(var a=r;a=a[2][3][".parent"];)if(a===i)return!1}else if(n[1]!==Ue)return!1;return t(e)}function ti(e){var r=vt[e-3],n=r[2][2][1];return n!==me&&r[1]!==Ue&&(n[1]=vt[e-2]),gt=vt[e+1]-1,e-4}function ii(e){var r=vt[e-2],n=vt[e-6-r];if(n[1]!==Ue)for(var t=n[2][2][1],i=e-2-r,a=r;0<=--a&&t[0]===ee;)t[1]!==me&&(t[1][1]=vt[i]),++i,t=t[2];return gt=vt[e+1]-1,e-7-r}function ai(){for(var e=vt[dt-1],r=vt[dt-3];;){if(it=Mr,_r===ln?(_r=sn,e=e[2],vt[dt-1]=e):_r===pn&&(_r=sn,ke(it)?(r=me,e=e[1][2],vt[dt-3]=r):e=e[2],vt[dt-1]=e),e[0]!==ee){if(r!==me)return e=vt[dt-2],void(vt[dt-1]=e);_r=pt[--gt]}else{if(yt&&0==--yt)return void function(e){var r=mt;mt=yt=!1;var n=fa();d(n[he],e),Ct(We(mi,We(r,We(n,me))),"steptrap")}({state:Me("task"),body:vt[dt-2],task:e,loop:r,value:it});if(e[1].breakpoint&&function(e){if(ra[1]!==ra)return!1;if(e[1].breakpoint[0]===oe){var r=e[1].breakpoint[he];if(ua(r)&&ke(r.enable))return ra[1]=e,Ct(We(mi,We(r.proc,We(e[1].breakpoint,We(it,me)))),"breakpoint"),!0}return!1}(e))return;if(e[1][0]!==ee){if((Mr=e[1])[0]===oe)return pt[gt++]=ln,void(_r=vn);Mr=Mr[1],_r=ln;continue}if(e[1][1][0]===ee){if(e[1][1][1][0]!==ee)return Mr=e[1][1],pt[gt++]=pn,void(_r=vn);r===me&&e[2][0]!==ee?(e=e[1],r=me,vt[dt-1]=e,vt[dt-2]=e,vt[dt-3]=r):(yt&&++yt,vt[dt-1]=e[2],e=e[1],r=me,vt[dt++]=bt,vt[bt=dt++]=Cn,vt[dt++]=gt,vt[dt++]=!1,vt[dt++]=r,vt[dt++]=e,vt[dt++]=e,pt[gt++]=sn),vt[dt-6]!==Cn&&Zi(Di,"nadiBody1: lost frame sync");continue}if(Mr=e[1],_r=Mr[1][ce]!==me?($r=Mr[1],Wr=Re,Ir=Mr[2],Mr=$r[ce],gn):vn,!(Ii<=Bi&&r===me&&e[2][0]!==ee))return void(pt[gt++]=ln)}var n=vt[dt-4];return n&&n[he].trap?(pt[gt++]=_r,_r=Yn,void Yi(n,Mr)):(dt-=5,vt[--dt]!==Cn&&Zi(Di,"nadiBody4: lost frame sync"),void(bt=vt[--dt]))}}function ui(){vt[dt++]=Mr[2][2],vt[dt++]=Mr[2][1],Mr=Mr[1],vt[dt++]=Mr,pt[gt++]=Tn,_r=vn}function oi(){_r===En?vt[dt-2]=Mr:vt[dt-1]=Mr,Ir=vt[--dt],Mr=vt[--dt],Wr=vt[--dt],_r===Cr&&Mr[0]===ee&&(Mr[2][0]!==ee?Mr=Mr[1]:(vt[dt++]=Wr,vt[dt++]=Mr[2],vt[dt++]=Ir,pt[gt++]=Cr,Mr=Mr[1],Wr=me)),_r=Br,vt[dt++]=Wr,vt[dt++]=Ir}function fi(){return(Ir[0]===te||Ir[0]===ie)&&(_r=pt[--gt],Si(_e(["internal","numeric scalar dereference"])),1)}function ci(){Mr=Wr===me&&Mr[0]===ne&&(Ir[0]===ne&&"length"==Ir[pe]||Ir[0]===re&&"length"==Ir[le])?qa(Mr[pe].length):Mr[0]===re?We(He,We(Mr,We(Ir,Wr))):me,_r=pt[--gt]}function si(e){e=Yu(e,Ir);if(!ke(e)){if(Mr[0]===ee)return;if(!ke(e=Yu(Mr,Ir)))return}return $r=Ir,Ir=We(We(Qe,We(Mr,me)),Wr[1]),Wr=Re,e[0]===re&&(e=E(e[ce])),Mr=e,_r=gn,1}function li(e){e=C(e,[X,z]);Ir=We(e,We($r=Ir,We(Mr,Wr[1]))),Wr=He,Mr=jr[3],_r=gn}function pi(e,r,n,t){var i=ha(e,r);i===me&&(i=ha(e,".undefined",!0))!==me&&(n=We(We(Me(r),n),me)),vt[dt++]=e,pt[gt++]=Dr,Ir=n,Wr=t?Re:me,i[0]===re&&(i=E(i[ce])),Mr=i,_r=Qn}function gi(){at=Mr;var e=_r===Fr,r=vt[dt-1];if(r&&r[he].trap)return Yi(r,Mr),vt[dt-13]=yt,void(vt[dt-14]=mt);dt-=2,vt[--dt]!==Rn&&Zi(Di,"nadiInterruptRestore: lost frame sync"),(bt=vt[--dt])<Nt&&Wa(),Mr=vt[--dt],Ir=vt[--dt],Wr=vt[--dt],$r=vt[--dt],Ve[1]=vt[--dt],J=vt[--dt],dt-=2,mt?dt-=2:(yt=vt[--dt],mt=vt[--dt]),e&&(Mr=at),St=vt[--dt],_r=tt?pt[--gt]:qr}function vi(){return me}function di(e,r){return pt[gt++]=yn,Ir=r,e}Pe("undefined",vi,ae);var hi,bi,yi,mi=(hi=function(e){return pt[gt++]=r,Wr=me,Ir=e[2],e[1]},bi=ue,(yi=new Array(f))[0]=bi,(yi[1]=yi)[2]=me,yi[3]=hi,yi);function ki(e){return pt[gt++]=An,e}function wi(e){return pt[gt++]=Rr,e}function xi(e,r){var n,t,i,a=bt;if(!function(){if(void 0===Mr||void 0===Ir||void 0===Wr||void 0===$r)debugger;var e,r,n,t,i=bt;if(dt<bt||bt+50<dt)debugger;for(t=0;t<dt;++t)if(void 0===vt[t])debugger;for(;0<i;){switch(vt[i]){case Dn:if(!we((r=vt[i-3])[1]))debugger;if(vt[i-6][0]!=w)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;if(pt[n-1]!=Fn)debugger;break;case Ln:if((e=vt[i-2])<0||1e3<e)debugger;if(!we((r=vt[i-6-e])[1]))debugger;if(vt[i-9-e][0]!=w)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;if(pt[n-1]!=zr)debugger;break;case Kn:if((e=vt[i-4])<0||1e3<e)debugger;if((r=vt[i-2])[0]!=S&&r[0]!=oe)debugger;if(n=vt[i+1],pt[n-1]!=Hn)debugger;break;case Cn:if((n=vt[i+1])<0||gt+1<n)debugger;break;case Bn:if(vt[i-4]<0||vt[i-4]>Vn)debugger;if((n=vt[i+1])<0||gt+1<n)debugger;break;case et:break;case Rn:if(vt[i-7][0]!=w)debugger;break;default:debugger}if(vt[i-1]<0||vt[i-1]>=i)debugger;i=vt[i-1]}}(),e[0]===ee&&e[1][0]===re&&"internal"==e[1][le]&&e[2][1]===Je&&Je[ce]!==me)return Ct(We(Je,me),"escape"),pt[gt++]=_r,Mr;if(Ge[ce]!==me&&r===me)return Ge[1]===Ge&&(Ge[1]=e),_r=pt[--gt],Ct(We(Or,We(Ge[1],We(Re,me))),"exception-rethrow"),Ct(We(Ge,We(e,me)),"exception-hook"),pt[gt++]=_r,Mr;for(Mr=me;0<a;){var u=vt[a];switch(u){case Dn:Xi<=Ii&&Hi(e),t=vt[a-2],(i=vt[a-3][2][2][1])!==me&&(i[1]=t),Ve[1]=vt[a-5],J=vt[a-6];break;case Ln:for(Xi<=Ii&&Hi(e),t=vt[a-2],i=vt[a-6-t][2][2][1],n=t-1;0<=n;--n)i[1][1]=vt[a-3-n],i=i[2];Ve[1]=vt[a-8-t],J=vt[a-9-t];break;case Kn:Xi<=Ii&&Hi(e);break;case Cn:break;case Bn:return vt[(bt=a)-4]!==Un?(vt[a-4]===zn&&(Ge[1]=e),vt[a-4]=Gn,dt=a+3,gt=vt[a+1],pt[gt++]=$n):(Ge[1]=e,bt<Nt&&Wa(),vt[a-4]=Xn,dt=a+3,gt=vt[a+1],Mr=vt[a-2],vt[dt++]=a-4,vt[dt++]=Mr[2][1],pt[gt++]=$n,pt[gt++]=On),Ge;case et:break;case Rn:if(Ve[1]=vt[a-6],J=vt[a-7],"future"==vt[a-8])vt[a-9][2][2][1][he][".exception"]=e;else{if("debugger"==oo(Ge[1]))break;if(!/fiberwake|escape|xcallback/.test(vt[a-8]))break}return Ge[1]=Ge,dt=a+3,gt=vt[a+1],me;default:Zi(Di,"nfuncThrow: unknown frame type on stack: "+u)}a=vt[a-1]}return Ge[1]!==Ge&&(e=Ge[1]),e[0]===ee&&e[1][0]===re&&"internal"==e[1][le]?e[2][1]!==Je&&Zi(Di,oo(e[2][1])):"debugger"!=oo(e)&&Zi(Di,"uncaught exception: "+oo(e)),Ft(),Rt(_e(["driver",101])),pt[gt++]=_r,Mr}function Si(e){xi(e,me),_r=pt[--gt]}function Oi(e,r){for(var n,t,i,a,u=bt;0<u;){var o=vt[u];switch(o){case Ln:if(t=vt[u-2],(a=vt[u-6-t])[1]!==Xe)return gt=vt[u+1],(bt=u)<Nt&&Wa(),dt=u+3,e;for(i=a[2][2][1],n=t-1;0<=n;--n)i[1][1]=vt[u-3-n],i=i[2];Ve[1]=vt[u-8-t],J=vt[u-9-t];break;case Dn:if((a=vt[u-3])[1]!==Xe)return gt=vt[u+1],(bt=u)<Nt&&Wa(),dt=u+3,e;t=vt[u-2],(i=a[2][2][1])!==me&&(i[1]=t),Ve[1]=vt[u-5],J=vt[u-6];break;case Kn:case Cn:break;case Bn:if(r)break;return vt[(bt=u)-4]=Jn,vt[u-3]=e,dt=u+3,gt=vt[u+1],pt[gt++]=$n,e;case et:case Rn:break;default:Zi(Di,"naanReturn: unknown frame type on stack: "+o)}u=vt[u-1]}return xi(_e(["internal","$orphaned return"]),me)}function Ni(e){for(var r,n,t,i,a=bt;0<a;){var u=vt[a];switch(u){case Ln:if(r=vt[a-2],(i=vt[a-6-r])[1]===Xe){for(t=i[2][2][1],n=r-1;0<=n;--n)t[1][1]=vt[a-3-n],t=t[2];Ve[1]=vt[a-8-r],J=vt[a-9-r];break}case Dn:a=-1;continue;case Kn:break;case Cn:if(vt[a+3]!==Re)break;if(e!==me&&Xu(e,vt[a+4][O])===me)break;return gt=vt[a+1],dt=(bt=a)+6,vt[a+3]=me,vt[a+5]=me,pt[gt++]=sn,it;case Bn:return vt[(bt=a)-5]=e,vt[a-4]=Zn,dt=a+3,gt=vt[a+1],pt[gt++]=$n,it;case et:case Rn:break;default:Zi(Di,"nfuncBreak: unknown frame type on stack: "+u)}a=vt[a-1]}return xi(_e(["internal",'$break tag "'+oo(e)+'" not found']),me)}function ji(e){for(var r,n,t,i,a=bt;0<a;){var u=vt[a];switch(u){case Ln:if(r=vt[a-2],(i=vt[a-6-r])[1]===Xe){for(t=i[2][2][1],n=r-1;0<=n;--n)t[1][1]=vt[a-3-n],t=t[2];Ve[1]=vt[a-8-r],J=vt[a-9-r];break}case Dn:a=-1;continue;case Kn:break;case Cn:if(vt[a+3]!==Re)break;if(e!==me&&Xu(e,vt[a+4][O])===me)break;return gt=vt[a+1],dt=(bt=a)+6,vt[a+5]=vt[a+4],pt[gt++]=sn,me;case Bn:return vt[(bt=a)-5]=e,vt[a-4]=Vn,dt=a+3,gt=vt[a+1],pt[gt++]=$n,it;case et:case Rn:break;default:Zi(Di,"nfuncContinue: unknown frame type on stack: "+u)}a=vt[a-1]}return xi(_e(["internal",'$continue tag "'+oo(e)+'" not found']),me)}function Pi(e,r){var n=[],t=[];function i(e){var r=Bu(e)!==me?e[se]:e,e=n.indexOf(r);return e<0&&(e=n.push(r)-1,t[e]={}),t[e]}function a(e,r){i(e)[e[le]]=r}function u(e){return i(e)[e[le]]}var o=me;e:for(;0<e;){var f,c,s,l,p,g,v,d,h,b,y,m=vt[e];switch(m){case Dn:g=vt[e-2],v=vt[e-3],d=vt[e-4],vt[e-5],y=vt[e-6],h=v[1],(f=u(b=v[2][2][1]))===D&&(f=b[1]),a(b,g),p=b===me?me:We(b,We(b[1],We(g,me))),l=We(h,We(d,We(p,We(v,We(y,me)))));break;case Ln:for(c=vt[e-2],v=vt[e-6-c],d=vt[e-7-c],vt[e-8-c],y=vt[e-9-c],h=v[1],b=v[2][2][1],p=me,s=c-1;0<=s;--s)(f=u(b[1]))===D&&(f=b[1][1]),p=We(We(b[1],We(f,We(vt[e-3-s],me))),p),b=b[2];for(b=v[2][2][1],s=c-1;0<=s;--s)a(b[1],vt[e-3-s]),b=b[2];l=We(h,We(d,We(p=xu(p,me),We(v,We(y,me)))));break;case Kn:for(c=vt[e-4],h=(v=vt[e-2])[0]===S?tr:gr,p=me,s=c-1;0<=s;--s)p=We(vt[e-4-c+s],p);l=We(h,We(p,We(v,me)));break;case Cn:l=We(h=vt[e+3]===me?Ye:Ke,We(vt[e+4],We(vt[e+5],me)));break;case Bn:l=We(h=er,We(vt[e-2],me));break;case et:break;case Rn:l=We(h=rr,We(vt[e-7],We(Me(vt[e-8]),We(vt[e-9],me))));break;default:return Zi(Di,"nfuncStacktrace: unknown frame type on stack: "+m),me}if(l[1]===me&&Zi(Di,"nfuncStacktrace: bad frameid"),o=We(l,o),e=vt[e-1],"number"==typeof r&&e<=r)break e}return xu(o,me)}function Ai(e,r){for(var n=bt;0<n;){var t=vt[n];switch(t){case Dn:case Ln:case Kn:case Cn:case Bn:case et:case Rn:if(0<e--){n=vt[n-1];continue}var i=vt[n+2];return i=i||(r?vt[n+2]=fa():me);default:return Zi(Di,"naanFrameHook: unknown frame type on stack: "+t),me}}return me}function Ti(e){for(var r,n=bt;0<n;){var t=vt[n];switch(t){case Dn:return vt[n-3];case Ln:return r=vt[n-2],vt[n-6-r];case Kn:case Cn:case Bn:case et:case Rn:break;default:return Zi(Di,"nfuncCaller: unknown frame type on stack: "+t),me}n=vt[n-1]}return me}function Ei(e,r){var n,t,i,a,u,o,f,c,s;function l(e){switch(e){case Ln:case Dn:case Kn:case Bn:case et:case Rn:return 3;case Cn:return 6}}(s=[]).saveSelf=Ve[1],s.saveExecNS=J,s.stephook=mt,s.stepping=yt,s.stack1=Mr,s.stack2=Ir,s.stack3=Wr,s.stack4=$r,s.runLimit=St,a=bt,u=dt,f=gt;e:for(;0<a;){switch(n={},0!==Nt&&Nt<a&&(n.sprint=!0),n.ftype=vt[a],o=a+l(n.ftype),n.runargs=vt.slice(o,u),n.ftype){case Ln:for(n.argcount=vt[a-2],u=a-9-n.argcount,n.execNS=vt[a-9-n.argcount],n.saveSelf=vt[a-8-n.argcount],n.fname=vt[a-7-n.argcount],n.fbind=vt[a-6-n.argcount],n.feval=vt[a-5-n.argcount],n.inarg=vt[a-4-n.argcount],n.inparm=vt[a-3-n.argcount],n.arglist=[],i=n.fbind[2][2][1],t=n.argcount-1;0<=t;--t)n.arglist.push(i[1][1]),i=i[2];if(c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r){if(n.fbind[1]===De||n.fbind[1]===ze)for(i=n.fbind[2][2][1],t=n.argcount-1;0<=t;--t)i[1]!==me&&(i[1][1]=vt[a-3-t]),i=i[2];Ve[1]=n.saveSelf,J=n.execNS}if(!0===e&&n.fbind[1]!==Xe)break e;break;case Dn:if(u=a-6,n.execNS=vt[a-6],n.saveSelf=vt[a-5],n.fname=vt[a-4],n.fbind=vt[a-3],i=n.fbind[2][2][1],n.arg=i[1],c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r&&(n.fbind[1]!==De&&n.fbind[1]!==ze||i===me||(i[1]=vt[a-2]),Ve[1]=n.saveSelf,J=n.execNS),!0===e)break e;break;case Kn:for(n.argcount=vt[a-4],u=a-6-n.argcount,n.targetThis=vt[a-6-n.argcount],n.arglist=[],t=n.argcount-1;0<=t;--t)n.arglist.push(vt[a-5-t]);n.inarg=vt[a-3],n.fbind=vt[a-2],c=vt[a+1]-1,n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n),r&&(Ve[1]=n.saveSelf,J=n.execNS);break;case Cn:u=a-1,n.loop=vt[a+3],n.body=vt[a+4],n.task=vt[a+5],c=vt[a+1],n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n);break;case Bn:case et:u=a-5,n.tag=vt[a-5],n.status=vt[a-4],n.result=vt[a-3],n.catchargs=vt[a-2],c=vt[a+1],n.runstates=pt.slice(c,f),n.hook=vt[a+2],s.push(n);break;case Rn:break e;default:Zi(Di,"naanSaveProcState: unknown frame type on stack: "+n.ftype)}if(a=vt[a-1],f=c,"number"==typeof e&&a<=e)break e}return r&&((bt=a)<Nt&&Wa(),dt=0===bt?0:a+l(vt[bt]),gt=c),s}function Mi(e){var r,n,t,i,a;for(St=e.runLimit,r=e.length-1;0<=r;--r){switch((n=e[r]).ftype){case Ln:for(vt[dt++]=n.execNS,vt[dt++]=n.saveSelf,vt[dt++]=n.fname,vt[dt++]=n.fbind,vt[dt++]=n.feval,vt[dt++]=n.inarg,vt[dt++]=n.inparm,i=n.fbind[2][2][1],t=0;t<n.argcount;++t)vt[dt++]=i[1][1],n.fbind[1]!==De&&n.fbind[1]!==ze||i[1]===me||(i[1][1]=n.arglist[t]),i=i[2];vt[dt++]=n.argcount,vt[dt++]=bt,bt=dt,vt[dt++]=Ln,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Dn:vt[dt++]=n.execNS,vt[dt++]=n.saveSelf,vt[dt++]=n.fname,vt[dt++]=n.fbind,i=n.fbind[2][2][1],vt[dt++]=i[1],n.fbind[1]!==De&&n.fbind[1]!==ze||i===me||(i[1][1]=n.arg),vt[dt++]=bt,bt=dt,vt[dt++]=Dn,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Kn:for(vt[dt++]=n.targetThis,t=0;t<n.argcount;++t)vt[dt++]=n.arglist[t];vt[dt++]=n.argcount,vt[dt++]=n.inarg,vt[dt++]=n.fbind,vt[dt++]=bt,bt=dt,vt[dt++]=Kn,vt[dt++]=gt+1,vt[dt++]=n.hook;break;case Cn:vt[dt++]=bt,bt=dt,vt[dt++]=Cn,vt[dt++]=gt,vt[dt++]=n.hook,vt[dt++]=n.loop,vt[dt++]=n.body,vt[dt++]=n.task;break;case Bn:case et:vt[dt++]=n.tag,vt[dt++]=n.status,vt[dt++]=n.result,vt[dt++]=n.catchargs,vt[dt++]=bt,bt=dt,vt[dt++]=n.ftype,vt[dt++]=gt,vt[dt++]=n.hook;break;case Rn:default:Zi(Di,"naanRunProcState: unknown frame type on stack: "+n.ftype)}for(a=0;a<n.runstates.length;++a)pt[gt++]=n.runstates[a];for(t=0;t<n.runargs.length;++t)vt[dt++]=n.runargs[t];n.sprint&&(0===Nt?Ia():bt<Nt&&(Nt=bt))}Mr=e.stack1,Ir=e.stack2,Wr=e.stack3,$r=e.stack4,mt=e.stephook,yt=e.stepping,Ve[1]=e.saveSelf,J=e.saveExecNS}var Ii=Di,Wi=0,$i=0,_i=30,qi=0,Fi=3*_i,Ri="",Ci=0,Bi=0,Di=1,Li=2,Ui=3,Xi=4,zi=5,Gi=me,Ji=Gi[1];function Zi(e,r){if(e<=Ii&&A.hasOwnProperty("debug-write"))try{A["debug-write"](r,e)}catch(e){}}function Vi(){var e="",r=0;for((Fi<=Wi||Wi<qi)&&($i=Math.floor(Wi/_i)*_i-2*_i,qi=$i+_i,Fi=$i+3*_i,0<$i&&(e="*")),0<$i&&(e+=Wi.toString(),e="     ".substring(e.length)+e+"   ",r=$i);r++<Wi;)e+=r%2==0?"|   ":"    ";return e}function Qi(e,r,n,t){0<Ri.length&&Zi(Ci,Ri);for(var i=n,a="";i[g]===ee;)0<a.length&&(a+=" "),t&&i[1][0]===re?a+=oo(i[1][1],{quote:Re}):a+=oo(i[1],{quote:Re}),i=i[N];Ri=Vi()+r+"("+a+")",Ci=e,++Wi}function Hi(e){--Wi<0&&(Wi=0),0<Ri.length?(Zi(Ci,Ri+"==> unknown"),Ri=""):Zi(Xi,Vi()+"==> unknown"),Zi(Xi,"==> proc terminated by throw: ",oo(e))}function Yi(e,r){var n;e[he].steps?(0<=(n=Da(e[he].steps,65535))&&(yt=n+1,mt=e[he].trap),delete e[he].steps):Ct(We(mi,We(e[he].trap,We(r,me))),"frametrap"),delete e[he].trap}function Ki(e,r){for(var n="",t=0;t<e;++t)n+=oo(r(t)),t<e-1&&(n+=" ");return""!==n&&Zi(J===X||J===z?Ui:Li,n),Re}function ea(e,r){function i(e,r){if(e[0]===oe){var n,t=e[he];if(!K(t)||!ua(t))return;for(n=0;n<t.length;++n)i(t[n],r)}else{if(e[0]!==ee)return;r===qe?delete e[1].breakpoint:e[1].breakpoint=r}return 1}if(0===e)return T(ra[1]===ra);var n=r(0);if(n[0]===re)return 1<e?me:(n===Re?ra[1]=ra:n===me&&(ra[1]=me),T(ra[1]===ra));if(2<e)return me;var t=r(1);if(t!==me){if(t!==qe){e=fa(),r=e[he];return r.enable=Re,r.proc=t,i(n,e)?e:me}i(n,t)}else if(n[1].breakpoint)return n[1].breakpoint;return me}var ra=Pe("breakpoint",ea,S);var na="*饢* Rcz *饢*",ta=function(){};function ia(e){var p=new WeakMap;return function e(r){var n,t;if(p.get(r))return p.get(r);if(K(t=r[he])){n=aa(sr,me),p.set(r,n);for(var i,a=n[he],u=0;u<t.length;++u)(i=t[u])[0]===oe&&ua(i[he])?a[u]=e(i):a[u]=i}else{n=(r[3]instanceof ca?sa:fa)(),p.set(r,n),n[2]=r[2];for(var o,f=n[he],c=Object.getOwnPropertyNames(t),s=0;s<c.length;++s){var l=t[o=c[s]];l[0]===oe&&ua(l[he])?f[o]=e(l):f[o]=l}}return n}(e)}function aa(e,r,n){if(e===me)return me;if(e===lr)return r[0]!==oe||K(r[he])?function(e){for(var r=fa();e[g]===ee;){var n=e[O];n[g]===ee&&Aa(r,n[O],n[N]),e=e[N]}return r}(r):(ua(r[he])?fa:wa)(r[he]);if(e===pr){var t=sa();return r[0]===re&&r[3][1]===Ue&&(Ku(t,xr,r),Ku(t,Sr,Ou(_e(["function","lambda","false",["strcat","${object ",r[3][2][1][le],"$}"]]),me))),t}if(e===sr){if(r[0]===oe&&K(r[he])){if(!ua(r[he]))return ka(r[he],new WeakMap);a=r[he].slice()}else a=Se(r);return a[na]=ta,Ie(a)}if(e[0]===oe)return ua(e[he])?ia(e):ka(e[he],new WeakMap);if(e!==vr)return e===dr?(i=Ie(!1),a=new da(i),i[x]=me,i[he]=a,i):e===hr?((i=Ie(new WeakMap))[x]=me,i):e===br?function(e,r){if(e!==me&&e[0]!==ne||r!==me&&r!==cr&&r[0]!==ee)return me;{var n,t;e[0]===ne&&r[0]===ee&&(n=Da(r[1],Number.MAX_SAFE_INTEGER),t=Da(r[2][1],Number.MAX_SAFE_INTEGER),r=me,t={Line:n,Column:t})}return lo(e,r,t)}(r,n):me;if(r[0]!==ne&&r[0]!==te)return me;var i,a,r=Q(r);return Z.splice(0,0,r),r}function ua(e){return K(e)?e[na]===ta:e instanceof ta}function oa(){}function fa(e){var r=Ie(me),n=new oa;return e&&Object.assign(n,e),r[he]=n,r}function ca(){}function sa(){var e=Ie(me),r=new ca;return e[he]=r,e}function la(r,n){this.stacktrace=Pe("stacktrace",function(){_r=pt[--gt],Ct(We(Qe,We(r,me)),"fiberwake",!0);var e=bt;return Mi(n),e=Pi(bt,e),Ei(!1,!0),e},ae,!0)[ce]}(oa.prototype=Object.create(ta.prototype)).constructor=oa,(ca.prototype=Object.create(ta.prototype)).constructor=ca,(la.prototype=Object.create(ta.prototype)).constructor=la;var pa=0,ga={};function va(e){return null===(e=Da(e,Number.MAX_SAFE_INTEGER))||e<0?e=D:2147483647<e&&(e=2147483647),e}function da(i,n,r){var t,a,u,o=[],f=0,c=++pa;function s(e,r){return r&&0<r?(l(),ga[c].delay=r,setTimeout(e,r)):(Promise.resolve().then(e),-1)}function l(e){var r=ga[c];(r=r||{nonce:i,start:(new Date).getTime(),waiting:[],contins:[]}).count=f,n&&(r.execute=n),e&&r.waiting.push(e),ga[c]=r}function p(){a&&clearTimeout(a),a=D}function g(){u&&clearTimeout(u),u=D}function v(e){var r=i[he];if(r.hasOwnProperty(".exception")){var n=r[".exception"];return delete r[".exception"],e?xi(n,me):Si(n)}return e}function d(e){if(e===D)return me;if(t!==D)return me;g();var r=Re;for(a&&(!0===a?r=me:p()),t=e;0<o.length;)!function(n,t){var e;ga[c].contins.shift(),(e=ga[c])&&e.waiting.pop(),s(function(){var e,r;e=n,r=t,Ct(We(Qe,We(i,me)),"fiberwake"),Mi(e),Mr=r,v(),Dt(tt)})}(o.shift(),t);return $a(),delete ga[c],r}function h(e){var r=J,n=Ve[1];return function(){!0!==a&&(++f,a=!0,Ct(We(mi,We(e,We(i,me))),"future"),Ve[1]=n,J=r,Dt(!0),d(at),A.hasOwnProperty("interrupted")&&A.interrupted(y))}}n&&0<=r&&(a=s(h(n),r)),this.wait=Pe("wait",function(e,r){return t!==D?v(t):(0<(n=va(e))&&(u=setTimeout(function(){d(r)},n)),l(Ti()),e=Ei(!1,!0),o.push(e),ga[c].contins.push((n=e,e=Ie(!1),n=new la(e,n),e[x]=me,e[he]=n,e)),++Mt,Re);var n},ae,!0)[ce],this.signal=Pe("signal",d,ae,!0)[ce],this.reset=Pe("reset",function(e){return!0===a&&t===D?xi(_e(["internal","$can't reschedule future within itself"]),me):(t=D,g(),n&&(p(),0<=(e=va(e))?r=e:e||(r=0),a=s(h(n),r)),i)},ae,!0)[ce]}function ha(e,r,n){for(var t,i=e;i[0]===oe;){var a,u=i[3];if(i[2][0]===oe&&i[2][3]instanceof oa)a=i[2][3],n&&(u=a);else if(n)break;if(u.hasOwnProperty(r))return u[r];if(!t&&a&&a.hasOwnProperty(".class"))t=i=a[".class"];else{if(!a||!a.hasOwnProperty(".parent"))break;i=a[".parent"]}}return me}function ba(e,r,n){var t=Ee(r);if(e[0]!==oe)return e===me&&a.ignoreWriteParamOnFalse?me:xi(_e(["internal","$attempted "+function(r){var e=me;if(r!==me&&(e=Cu(1,function(e){return 0===e?r:me}))===me)return"unknown";return e[le]}(e)+"['"+t+"'] = value"]),me);if(e[3]instanceof ca){var i,t=ha(e,".="+t,!0);if(t!==me?i=We(n,me):(t=ha(e,".=undefined",!0))!==me&&(i=We(r,We(n,me))),t!==me)return Tr(e,!0)?($r=r,vt[dt++]=e,pt[gt++]=Dr,Ir=i,Wr=Re,t[0]===re&&(t=E(t[ce])),pt[gt++]=Qn,t):Mr}return Aa(e,r,n)}function ya(e,r){for(var n=me,t=n,i=0;i<e.length;++i){var a=new Array(l),u=(r?ma:v)(u=e[i]);a[0]=ee,a[1]=u,t!==(a[2]=me)?t[2]=a:n=a,t=a}return n}function ma(e){return"string"==typeof e?Me(e):"number"==typeof e?(isFinite(e)&&Math.floor(e)==e?qa:Fa)(e):"boolean"==typeof e?T(e):e===D?qe:null===e?Fe:"object"==typeof e&&ua(e)?e:Ie(e)}function ka(e,r){if(e===D)return qe;if(null===e)return Fe;if("object"!=typeof e||ua(e))return ma(e);if(r.get(e))return r.get(e);var n=Ie(e);if(r.set(e,n),K(e)){for(var t=e.length,i=[],a=0;a<t;++a)i.push(ka(e[a],r));i[na]=ta}else{var u,o=Object.getOwnPropertyNames(e);if(0===o.length&&e.constructor!==Object)i=e;else if("0"===o[0]&&o[o.length-1]===(o.length-1).toString()&&"function"==typeof e.keys)i=e;else for(i=new oa,u=0;u<o.length;++u)try{i[o[u]]=ka(e[o[u]],r)}catch(e){}}return n[he]=i,n}function wa(e){if(e===D)return qe;if(null===e)return Fe;if("object"!=typeof e||ua(e))return ma(e);for(var r=Object.getOwnPropertyNames(e),n=new oa,t=0;t<r.length;++t)try{n[r[t]]=ma(e[r[t]])}catch(e){}return Ie(n)}function xa(r,e,n){if(r[0]===ee){if(we(r[1])){var t,i=J,a=Ve[1];return function(){t=ya(arguments,!n||n.convert),Ct(We(mi,We(r,t)),"xcallback",n&&n.retresult),Ve[1]=a,J=i;var e=Mt;return Dt(!null),e==Mt||(e=r[2][1][2][3])&&e.hasOwnProperty(".suspend")&&(at=e[".suspend"]),A.hasOwnProperty("interrupted")&&A.interrupted(y),n&&!n.convert||(at=xa(at)),at}}for(c=[];r[0]===ee;)c.push(xa(r[1],e)),r=r[2];return c}if(r[0]===re)return r===Re||r!==me&&(r===qe?D:r===Fe?null:r[le]);if(r[0]===ne)return r[pe];if(r[0]===te)return Ba(r[3]);if(r[0]===ie)return r[ve];if(r[0]===oe){var u=r[he];if(!ua(u))return u;if(e){if(e.get(u))return e.get(u)}else e=new WeakMap;if(K(u)){var o,f=u.length,c=[];for(e.set(u,c),o=0;o<f;++o)c.push(xa(u[o],e))}else{var s,l=Object.getOwnPropertyNames(u);for(c={},e.set(u,c),s=0;s<l.length;++s)c[l[s]]=xa(u[l[s]],e)}}return c}function Sa(e){if(e[0]===ee)return e;if(e[0]!==oe)return me;var r=e[he],n=ua(r);if(K(r))return ya(r,!n);for(var t=Object.getOwnPropertyNames(r),i=me,a=t.length-1;0<=a;--a)try{var u,o=t[a];o!==D&&r[o]!==D&&(u=r[o],n||(u=ma(u)),i=We(We(ma(o),u),i))}catch(e){}return i}function Oa(e,r){if(e[0]!==oe)return me;var n,e=e[he];if(r[0]===re)n=r[le];else{if(r[0]!==ne)return me;n=r[pe]}return T(e.hasOwnProperty(n))}function Na(e){if(e[0]===w)return Su(e);if(e[0]!==oe)return me;e=e[he];return K(e)?me:ya(Object.getOwnPropertyNames(e),!0)}function ja(e,r){if(r===me&&(r=G),e[0]!==oe||r[0]!==w)return me;if(J!==X){if(e[se]!==me)return e[se]==r?e:me;if(r!==G&&r!==J&&r!==Z[0])return xi(_e(["internal","$can't lock "+oo(e)+" to "+Ne(r)]),me),me}return e[se]=r,e}function Pa(e,r){if(e[0]!==oe)return me;var n=e[3];if(n instanceof WeakMap&&r[0]!==ne&&r[0]!==te&&r[0]!==ie){e=n.get(r);return e===D&&(e=me),v(e)}if(r[0]===ee||r[0]===oe&&ua(r))return me;var t=xa(r);try{return ua(n)||n instanceof WeakMap?K(n)&&"length"==t?ma(n.length):n.hasOwnProperty(t)?v(n[t]):me:ma(n[t])}catch(e){return xi(_e(["internal",'$xget "'+t+'": '+e.toString()]),me)}}function Aa(e,r,n){if(e[0]!==oe)return me;var t=e[3];if(t instanceof WeakMap&&r[0]!==ne&&r[0]!==te&&r[0]!==ie)return Tr(e,!0)?(n===qe?t.delete(r):t.set(r,n),n):Mr;if(r[0]===ee||r[0]===oe&&ua(r))return me;if(!Tr(e,!0))return Mr;var i=xa(r);try{if(jt=1,_r=qr,n===qe)delete t[i];else if(ua(t)||t instanceof WeakMap)if(K(t))if("length"==i)t.length=xa(n);else{var a,u=parseInt(i);if(u!=u+"")return jt=-1,xi(_e(["internal","$non-numeric array index"]),me);for(t[i]=n,a=0;a<i;++a)t[a]===D&&(t[a]=me)}else t[i]=n;else t[i]=xa(n);return jt=-1,n}catch(e){return jt=-1,xi(_e(["internal",'$xset "'+i+'": '+e.toString()]),me)}}function Ta(e,r,n,t,i){if(r[0]===ee||r[0]===oe&&ua(r[3]))return me;var a=xa(r),u=null;if(e&&e[0]===oe){if(ua(u=e[3]))return me;if(u instanceof WeakMap)return me}for(var o,f=me,c=u===Number||u===String||u===Boolean,s=[],l=0;l<n;++l)s[l]=xa(i(l+t));try{return jt=1,_r=qr,r[0]===oe?f=ma(r[3].apply(u,s)):(!u||u.prototype!==D&&(o=u.prototype[a])!==D||(c=!1,o=u[a]),o!==D&&(f=ma(c?o.apply(s[0],s.slice(1)):o.apply(u,s)))),jt=-1,f}catch(e){return jt=-1,xi(_e(["internal",'$xcall "'+a+'": '+e.toString()]),me)}}function Ea(e,r){return Ia(),0<e?Ma(r(0),e-1,1,r):Ma(D,0,0,r)}function Ma(e,r,n,t){var i;if(e===D)return(i=ma({}))[x]=wa({persist:!0}),i;if(e[0]===ne||e[0]===re)return ma(s[Ee(e)]);if(e[0]===te)return Ie(L.bigInt2uint8(e[ge]));if(e[0]===ee)return Ie(xa(e));if(e[0]!==oe)return me;var a,u=e[3];if(ua(u))return ma(xa(e));if(u===WeakMap)return me;try{if("function"==typeof u){for(var o=[null],f=0;f<r;++f)o.push(xa(t(f+n)));jt=1,_r=qr;var c=new(Function.prototype.bind.apply(u,o));return jt=-1,Ie(c)}if(1<r)return me;c=t(n);return jt=1,_r=qr,i=0===r?("object"==typeof(a=Object.create(u))?Ie:ma)(a):c[0]!==oe?me:("object"==typeof(a=Object.create(u,c[3]))?Ie:ma)(a),jt=-1,i}catch(e){return jt=-1,xi(_e(["internal","$xnew: "+e.toString()]),me)}}function Ia(){0===Nt&&(Ot=St,Nt=bt,yr[1]=Re)}function Wa(){bt<Nt&&(St=Ot,Nt=0,yr[1]=me,nt=xt,xt=wt)}function $a(){jt=-1}function _a(e,r){var n=new Array(u);return n[0]=te,(n[1]=n)[2]=r,n[3]=e,n}function qa(e,r){return"number"!=typeof e||isNaN(e)?me:(r=r||me,_a(Ra(e),r))}function Fa(e){var r=new Array(o);return r[0]=ie,(r[1]=r)[2]=me,r[3]=e,r}function Ra(e){var r=Math.abs(e);"number"==typeof r&&!isNaN(r)||(r=0);r=L.int2bigInt(r,i,1);return e<0&&(r=L.negate(r)),L.trim(r,1)}function Ca(e,r){var n=L.int2bigInt(r,64,1),t=1;return L.negative(e)&&(e=L.negate(e),t=-1),L.greater(e,n)?null:t*L.modInt(e,r+1)}function Ba(e){var r=L.negative(e);r&&(e=L.negate(e));var n,t=L.bitSize(e);return e=i<t?Number.POSITIVE_INFINITY:k<t?(n=L.rightShift(e,t-k),L.modInt(n,Number.MAX_VALUE)*Math.pow(2,t-k)):L.modInt(e,Number.MAX_SAFE_INTEGER+1),r?-e:e}function Da(e,r){if(e[0]===te)return Ca(e[3],r);if(e[0]===ie){e=e[3];if(-r<=e&&e<=r)return e}return null}function La(e,r,n,t){return e[0]===te?_a(L.negate(e[3]),me):e[0]===ie?Fa(-e[3]):e[0]===oe&&e[3]instanceof ca?Ht(e,".negate"):Qt(B(t[2][1],"extendNegate"))}function Ua(e,r){return e[0]===te&&r[0]===te?_a(L.add(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]+r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])+r[3]):e[0]===ie&&r[0]===te?Fa(e[3]+Ba(r[3])):me}function Xa(e,r,n){var t;if(2==e&&(t=Ua(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".plus")}return Qt(B(n[2][1],"extend+"))}function za(e,r){return e[0]===te&&r[0]===te?_a(L.sub(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]-r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])-r[3]):e[0]===ie&&r[0]===te?Fa(e[3]-Ba(r[3])):me}function Ga(e,r,n){var t;if(2==e&&(t=za(r(0),r(1)))!==me)return t;if(1==e)return La(r(0),0,0,n);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".difference")}return Qt(B(n[2][1],"extend-"))}function Ja(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]*r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])*r[3]):e[0]===ie&&r[0]===te?Fa(e[3]*Ba(r[3])):me;var n=e[3],t=r[3],i=L.negative(n),e=L.negative(t);return i&&(n=L.negate(n)),e&&(t=L.negate(t)),n=L.greater(n,r[3])?L.mult(n,t):L.mult(t,n),i!=e&&(n=L.negate(n)),_a(n,me)}function Za(e,r,n){var t;if(2==e&&(t=Ja(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".times")}return Qt(B(n[2][1],"extend*"))}function Va(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]/r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])/r[3]):e[0]===ie&&r[0]===te?Fa(e[3]/Ba(r[3])):me;if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var n=e[3],t=r[3],i=L.negative(n),a=L.negative(t);i&&(n=L.negate(n)),a&&(t=L.negate(t));var u=L.dup(n),e=L.dup(n),r=a;return L.divide_(n,t,u,e),i&&(r=!a,L.isZero(e)||(u=L.addInt(u,1),e=L.sub(t,e))),r&&(u=L.negate(u)),_a(L.trim(u,1),me)}function Qa(e,r,n,t){var i;return(i=Va(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".quotient"):r[0]===oe&&r[3]instanceof ca?Ht(r,".quotient"):Qt(B(t[2][1],"extend/"))}function Ha(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]%r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])%r[3]):e[0]===ie&&r[0]===te?Fa(e[3]%Ba(r[3])):me;if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var n=e[3],t=r[3],i=L.negative(n),e=L.negative(t);i&&(n=L.negate(n)),e&&(t=L.negate(t));r=L.dup(n),e=L.dup(n);return L.divide_(n,t,r,e),i&&(L.isZero(e)||(e=L.sub(t,e))),_a(L.trim(e,1),me)}function Ya(e,r,n,t){var i;return(i=Ha(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".modulo"):r[0]===oe&&r[3]instanceof ca?Ht(r,".modulo"):Qt(B(t[2][1],"extendMod"))}function Ka(e,r){return e[0]===te&&r[0]===te?_a(L.and(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]&r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])&r[3]):e[0]===ie&&r[0]===te?Fa(e[3]&Ba(r[3])):me}function eu(e,r,n){var t;if(2==e&&(t=Ka(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitand")}return Qt(B(n[2][1],"extendBitAnd"))}function ru(e,r){return e[0]===te&&r[0]===te?_a(L.or(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]|r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])|r[3]):e[0]===ie&&r[0]===te?Fa(e[3]|Ba(r[3])):me}function nu(e,r,n){var t;if(2==e&&(t=ru(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitor")}return Qt(B(n[2][1],"extendBitOr"))}function tu(e,r){return e[0]===te&&r[0]===te?_a(L.xor(e[3],r[3]),me):e[0]===ie&&r[0]===ie?Fa(e[3]^r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])^r[3]):e[0]===ie&&r[0]===te?Fa(e[3]^Ba(r[3])):me}function iu(e,r,n){var t;if(2==e&&(t=tu(r(0),r(1)))!==me)return t;if(1==e)return r(0);for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".bitxor")}return Qt(B(n[2][1],"extendBitXor"))}function au(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]<<r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])<<r[3]):e[0]===ie&&r[0]===te?Fa(e[3]<<Ba(r[3])):me;r=Ba(r[3]);if(r<0)r=0;else if(n<r)return xi(_e(["internal","shiftleft > ".concat(n)]),me);return _a(L.leftShift(e[3],r),me)}function uu(e,r,n,t){var i;return(i=au(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".shiftleft"):r[0]===oe&&r[3]instanceof ca?Ht(r,".shiftleft"):Qt(B(t[2][1],"extendShiftLeft"))}function ou(e,r){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?Fa(e[3]>>r[3]):e[0]===te&&r[0]===ie?Fa(Ba(e[3])>>r[3]):e[0]===ie&&r[0]===te?Fa(e[3]>>Ba(r[3])):me;r=Ba(r[3]);return r<0&&(r=0),_a(L.rightShift(e[3],r),me)}function fu(e,r,n,t){var i;return(i=ou(e,r))!==me?i:e[0]===oe&&e[3]instanceof ca?Ht(e,".shiftright"):r[0]===oe&&r[3]instanceof ca?Ht(r,".shiftright"):Qt(B(t[2][1],"extendShiftRight"))}function cu(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?T(e[3]>r[3]):e[0]===te&&r[0]===ie?T(Ba(e[3])>r[3]):e[0]===ie&&r[0]===te?T(e[3]>Ba(r[3])):e[0]===ne&&r[0]===ne?T(e[pe]>r[pe]):e[0]===oe&&e[3]instanceof ca?Ht(e,".greater"):r[0]===oe&&r[3]instanceof ca?Ht(r,".greater"):t?Qt(B(t[2][1],"extend>")):me;if(L.equals(e[3],r[3]))return me;if(L.negative(e[3])){if(!L.negative(r[3]))return me;var i=L.negate(e[3]),t=L.negate(r[3]),i=L.greater(t,i)}else{if(L.negative(r[3]))return Re;i=L.greater(e[3],r[3])}return T(i)}function su(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===ie&&r[0]===ie?T(e[3]<r[3]):e[0]===te&&r[0]===ie?T(Ba(e[3])<r[3]):e[0]===ie&&r[0]===te?T(e[3]<Ba(r[3])):e[0]===ne&&r[0]===ne?T(e[pe]<r[pe]):e[0]===oe&&e[3]instanceof ca?Ht(e,".lesser"):r[0]===oe&&r[3]instanceof ca?Ht(r,".lesser"):t?Qt(B(t[2][1],"extend<")):me;if(L.equals(e[3],r[3]))return me;if(L.negative(e[3])){if(!L.negative(r[3]))return Re;var i=L.negate(e[3]),t=L.negate(r[3]),i=L.greater(t,i)}else{if(L.negative(r[3]))return me;i=L.greater(e[3],r[3])}return i?me:Re}function lu(e){return null!==(e=Da(e,36))&&2<=e?e:-1}function pu(e){return e[x]!==me&&ke(e[x][he].hexcon)}function gu(e){return e[1]}function vu(e){return e[1]}function du(e){return e[2]}function hu(e){return e[1][1]}function bu(e){return e[2][1]}function yu(e){return e[2][2]}function mu(e){return e[2][1][1]}function ku(e){return e[2][2][1]}function wu(e){return e[2][2][2]}function xu(e,r){for(;e[0]===ee;)r=We(e[1],r),e=e[2];return r}function Su(e){var r,n;if(e[0]===w&&0<=(n=Oe.indexOf(e)))r=Oe[n][be];else{if(e!==me)return me;r=Z[0][be]}for(var t=me,i=null,a=0;a<r.length;++a){var u=We(r[a],me);i?i[2]=u:t=u,i=u}return t}function Ou(e,r){var n;r===me&&(r=(n=e[2][1])===Ce?Z[0]:n!==me?n[se]:me);r=Er(e,r);return"string"==typeof r?xi(_e(["internal",r]),me):Tr(r[2][1])?r:Mr}function Nu(e,r){for(;e;){if(e===r.prototype)return 1;e=Object.getPrototypeOf(e)}}(da.prototype=Object.create(ta.prototype)).constructor=da;var ju=100,Pu=101,Au=102,Tu=103,Eu=104,Mu=105,Iu=106,Wu=107,$u=108,_u=109,qu=110,Fu=111;function Ru(e,r){if(!e)return-1;for(var n=!1,t=0;t<e;++t){var i=r(t),a=i[0];if(a===oe&&ua(i[he])?a=K(i[he])?Pu:i[he]instanceof ca?Tu:i[he]instanceof da?Eu:i[he]instanceof la?Mu:i[he]instanceof WeakMap?Iu:i[he]instanceof so?Wu:Au:a===ee?a=we(i[1])?qu:Fu:ae<=a&&a<=ue&&(a=_u),n){if(a!==n)if(n===te&&a===ie||n===ie&&a===te)n=ju;else if(n!==ju||n!==ie&&a!==te)if(n===re&&a===ne||n===ne&&a===re)n=$u;else if(n!==$u||n!==re&&a!==ne){if(!(n===qu&&a===Fu||a===Fu&&a===qu))return-1;n=Fu}else;else;}else n=a}return n}function Cu(e,r){switch(Ru(e,r)){case ee:return ir;case re:return ar;case ne:return cr;case te:return ur;case ie:return or;case ae:case S:return tr;case ue:return Le;case oe:return gr;case w:return vr;case ju:return fr;case Pu:return sr;case Au:return lr;case Tu:return pr;case Eu:return dr;case Iu:return hr;case Wu:return br;case _u:return tr;case Fu:return ir}return me}function Bu(e){return e[0]===re&&e[se][be][e[se][ye][e[le]]]===e?e:e[0]===ne?R(e[pe]):me}function Du(e){var r;if(e[0]===re)r=e[le];else{if(e[0]!==ne)return me;r=e[pe]}return Pr(r)[ce]}function Lu(e){return T(e[0]===oe&&e[3]instanceof oa)}function Uu(e,r){if(0===e)return me;for(var n=0;n<e;++n)if(r(n)[0]===ee)return me;return Re}function Xu(e,r,n,t){return e[0]===te&&r[0]===te?T(L.equals(e[3],r[3])):e[0]===ie&&r[0]===ie?T(e[3]===r[3]):e[0]===te&&r[0]===ie||e[0]===ie&&r[0]===te?e[0]===oe&&e[3]instanceof ca?Ht(e,".eq"):r[0]===oe&&r[3]instanceof ca?Ht(r,".eq"):Qt(B(t[2][1],"extendEq")):e[0]===ne&&r[0]===ne||e[0]===oe&&r[0]===oe?T(e[3]===r[3]):T(e==r)}function zu(e,r,n,t){return e[0]===re&&r[0]===re?e===r||e[le]===r[le]?Re:me:e[0]===te&&r[0]===ie?T(Ba(e[3])==r[3]):e[0]===ie&&r[0]===te?T(e[3]==Ba(r[3])):e[0]===ae&&r[0]===ae||e[0]===S&&r[0]===S||e[0]===ue&&r[0]===ue?T(e[de]===r[de]):Xu(e,r,0,t)}function Gu(e,r){for(;;){if(e[0]!==ee)return(e[0]===oe&&ua(e[he])?function(e,r){var b=[],y=[];function m(e,r){for(;;){if(e[0]!==ee)return(e[0]===oe&&ua(e[he])?k:zu)(e,r);if(r[0]!==ee)return me;if(m(e[1],r[1])===me)return me;e=e[2],r=r[2]}}function k(e,r){var n;if(e===r)return Re;if(K(e[he])){if(!K(r[he]))return me;var t,i,a,u=e[he],o=r[he];if(u.length!=o.length)return me;for(t=0;t<u.length;++t)if(i=u[t],a=o[t],"number"==typeof i){if(i!=a)return me}else if(i[0]===oe&&ua(i[he])){if((n=b.indexOf(i))!=y.indexOf(a))return me;if(n<0&&(n=b.length,b.push(i),y.push(a),k(i,a)===me))return me;u[t]=n,o[t]=n}else if(m(i,a)===me)return me}else{if(K(r[he]))return me;var f,c,s,l=e[he],p=r[he],g=Object.getOwnPropertyNames(l).sort(),v=Object.getOwnPropertyNames(p).sort();if(g.length!=v.length)return me;for(f=0;f<g.length;++f){if((c=g[f])!=(s=v[f]))return me;var d=l[c],h=p[s];if("number"==typeof d){if(d!=h)return me}else if(d[0]===oe&&ua(d[he])){if((n=b.indexOf(d))!=y.indexOf(h))return me;if(n<0&&(n=b.length,b.push(d),y.push(h),k(d,h)===me))return me;l[c]=n,p[s]=n}else if(m(d,h)===me)return me}}return Re}function s(e,r){if(e[0]===oe&&ua(e[he]))if(K(e[he]))for(var n,t=e[he],i=0;i<t.length;++i)"number"==typeof(n=t[i])&&(n=r[n],t[i]=n),s(n,r);else for(var a,u=e[he],o=Object.getOwnPropertyNames(u),f=0;f<o.length;++f){var c=u[a=o[f]];"number"==typeof c&&(c=r[c],u[a]=c),s(c,r)}else e[0]===ee&&(s(e[1],r),s(e[2],r))}if(e[0]!==oe||!ua(e[he]))return me;if(r[0]!==oe||!ua(r[he]))return me;var n=k(e,r);return s(e,b),s(r,y),n}:zu)(e,r);if(r[0]!==ee)return me;if(Gu(e[1],r[1])===me)return me;e=e[2],r=r[2]}}function Ju(e,r){for(;;){if(r[0]!==ee)return me;if(Gu(e,r[1])===Re)return r;r=r[2]}}function Zu(e,r){for(var n;;){if(r[0]!==ee)return me;if(Gu(e,r[1])===Re)return r;if(r[1][0]===ee&&(n=Zu(e,r[1]))!==me)return n;r=r[2]}}function Vu(e,r){if(e===r)return 0;if(!ke(r))return ke(e)?-1:0;if(!ke(e))return 1;if(!(e[0]!==ie&&e[0]!==te||r[0]!==ie&&r[0]!==te))return su(e,r)===Re?-1:cu(e,r)===Re?1:0;var n=!1;if(e[0]===r[0]&&(n=e[0]),n===re){if(e[le]<r[le])return-1;if(e[le]>r[le])return 1;var t=Y(e),i=Y(r);return 0<=t&&0<=i?t<i?-1:i<t?1:0:0<=t&&i<0?-1:t<0&&0<=i?1:0}if(n===ne)return e[pe]==r[pe]?0:e[pe]<r[pe]?-1:1;if(n===w)return Vu(e[j],r[j]);if(n===ee)for(;;){var a=Vu(e[1],r[1]);if(0!==a)return a;if(e=e[2],r=r[2],e[0]!==ee)return r[0]!==ee?0:-1;if(r[0]!==ee)return 1}return e[0]<r[0]?-1:e[0]>r[0]?1:0}function Qu(e,r){if(e[0]===ee){for(var n=e;n[0]===ee;){if(n[O]!==me&&!Tr(n[O]))return;n=n[N]}n=e;for(var t=r;n[0]===ee;)t[0]!==ee?n[O]!==me&&(n[O][1]=t):(n[O]!==me&&(n[O][1]=t[O]),t=t[N]),n=n[N]}else{if(!Tr(e))return;e[1]=r}return 1}function Hu(e,r){return Qu(e,r)?r:Mr}function Yu(e,r){e=e[2];return Lu(e)===me?me:Pa(e,r)}function Ku(e,r,n){if(!Tr(e,!0))return Mr;var t=e[2];if(t===me)e[2]=t=aa(lr,me);else if(Lu(t)===me)return xi(_e(["internal","$invalid put annotation target"]),me);return r===me?me:Aa(t,r,n)}function eo(e,r){if(r[0]!==re||e[0]!==re)return me;if(!Tr(e))return Mr;if(r[3][0]>=ae&&r[3][0]<=ue)return Pe(e[le],r[3][3],r[3][0]);if(r[3][0]!==ee)return e[3]=r[3];var n=q(r[le]),t=r[3][2][1];t[le]===Ce[le]&&(n[O]=Ce),n[se]=t[se];r=We(r[3][1],We(n,r[3][2][2]));return n[3]=r,e[3]=r}var ro=!1;function no(e,r){var n;Lu(r)===Re&&(n=r[he]);e=Me(oo(e,n));return n&&ke(n.noquote)&&(e[x]=wa({noquote:!0})),e}function to(e){if(e[0]!==ee)return e[0]===re?e[le]:e[0]===ne?e[pe]:e[0]===te?vo.IntToString(e[ge],pu(e)):"";for(var r="";e[0]===ee;)r+=to(e[1]),e=e[2];return r}function io(e){if(e===me)return qa(0);if(e[0]===re)return qa(e[le].length);if(e[0]===ne)return qa(e[pe].length);if(e[0]===te||e[0]===ie)return qa(oo(e).length);if(e[0]===oe){var r=e[he];return ua(r)?K(r)?qa(r.length):qa(Object.getOwnPropertyNames(r).length):ma(e[he].length)}if(e[0]!==ee)return qa(oo(e).length);for(var n=1;e[2][0]===ee;)++n,e=e[2];return qa(n)}var ao=new b.NaanChannel(this),uo=new b.NaanChannel(this);function oo(e,r,n){var t;r&&r.radix&&(t=lu(r.radix))<2&&(t=D),n===D&&(n=vo);var i="";if(e===D)return qe[le];if(null===e)return Fe[le];if(e[g]===ee){if(e[N][0]!==ee&&e[N]!==me)i=n.ListToString([n.DottedPairToString(oo(e[1],r,n),oo(e[2],r,n))]);else{for(var a=e,u=[];a[g]===ee;)a[N][0]!==ee&&a[N]!==me?u.push(n.DottedPairToString(oo(a[1],r,n),oo(a[2],r,n))):u.push(oo(a[1],r,n)),a=a[N];i=n.ListToString(u)}return i}if(e[g]===re){var o=e[le];if(r&&ke(r.quote)&&(1!=o.length||p.indexOf(o)<0)){if(!ke(r.nonamespace)){i=function(e){if(e[se][0]!==w)return me;var r,n=e[se][ye][e[le]];if(e[se][be][n]!==e)return me;for(r=0;r<Z.length;++r){var t=Z[r];if(t[ye].hasOwnProperty(e[le]))return n=t[ye][e[le]],t[be][n]===e?me:e[se]}return e[se]}(e);if(i[0]===w)return o=n.QuoteSymbol(o),oo(i[j],!1,n)+n.NSinfix+o}return n.QuoteSymbol(o)}return o}if(e[g]===ne)return!r||!ke(r.quote)||e[x]!==me&&ke(e[x][he].noquote)?e[pe]:n.QuoteString(e[pe]);if(e[g]===te)return n.IntToString(e[ge],pu(e),t);if(e[g]===ie)return n.FloatToString(e[ve],t);if(e[g]>=ae&&e[g]<=ue){if(Xi<=Ii){var f=e[ce]+"";return f.substring(9,f.indexOf("("))}f=Ae(e[3]);return f?"[Builtin "+f+"]":e[2][0]===re?"[Compiled "+e[2][le]+"]":"[Compiled Function]"}if(e[g]===oe){var c,s=e[he];if(ua(s)){if(K(s))return"Array["+s.length+"]";var l=Object.getOwnPropertyNames(s).length;if(s instanceof da)return"Nonce{"+l+"}";if(s instanceof la)return"Continuation{"+l+"}";if(s instanceof so)return"TextStream{"+l+"}";if(s instanceof WeakMap)return"WeakMap{}";if(e[3]instanceof ca){f=Yu(e,xr);return f!==me?"{object "+f[3][2][1][le]+"}":"Object{"+l+"}"}return"Dictionary{"+l+"}"}try{if("function"==typeof s)return""!==s.name&&s.name?"[Function "+s.name+"]":"[Function ()]";if(K(s))c=JSON.stringify(s).slice(1,-1);else if("["===(c=s.toString()).substring(0,1))return c;return"["+Object.prototype.toString.call(s).slice(8,-1)+" "+c+"]"}catch(e){l=s[Symbol.toStringTag];return l?"[object "+l+"]":"[private object]"}}else if(e[g]===w)return"Namespace<"+oo(e[j],!1,n)+">";debugger;return"unknown: "+e}function fo(e,r){return bo[he].printline[3](e,r)}function co(){return 0<uo.TextAvail()&&A.hasOwnProperty("console-out")&&A["console-out"](y,uo.TakeText()),Re}function so(e,r,n,t){var i,a,u=me,o=me,f=me,c=me,s=!1,l=!1;function p(e){if(i.EOF())return e!==me?me:xi(_e(["internal","$end-of-file"]),me);if(c===me)return At;e=c;return c=me,xi(e)}function g(){if(f[0]===ee){var e=f[1];return f=f[2],o=e,1}e=function(e){var r,n;e:for(;;){if(null===(n=e.ReadToken()))return null;switch(n.type){case e.kTTNewline:case e.kTTSymbol:s&&(r=s[n.token])!==D||(r=Ar(n.token));break e;case e.kTTInteger:r=_a(n.token,me);break e;case e.kTTHexInteger:r=_a(n.token,wa({hexcon:!0}));break e;case e.kTTString:r=Me(n.token);break e;case e.kTTComment:case e.kTTCommentLine:var t=fa();if(t[he].text=Me(n.token),t[he].loc=We(qa(n.loc.line),We(qa(n.loc.column),me)),u=We(t,u),n.type!=e.kTTCommentLine)continue;r=F("\n");break e;case e.kTTFloat:r=Fa(parseFloat(n.token));break e}}return n.atom=r,n}(i);return null!==e&&((o=fa())[he].atom=e.atom,o[he].loc=We(qa(e.loc.line),We(qa(e.loc.column),me)),1)}function v(e,r){var n=e[he].atom;if(r[0]!==ee)return r===cr?n[0]===ne:r===ar?n[0]===re:Gu(n,r)===Re;for(;;){if(r[0]!==ee)return;if(r[1][0]===ee)return;if(v(e,r[1]))return 1;r=r[2]}}function d(e,r){if(!tt&&a.Full())return At;for(var n,t=me,i=0;i<e;++i)n=oo(t=r(i),!1,a),a.WriteString(n);return l&&co(),t}function h(e){return f=We(o,f),o=e}this.addtext=Pe("addtext",function(e){return e[0]===ne?(i.AddText(e[pe]),i.SetEOF(),e):me},ae,!0)[ce],this.comments=Pe("comments",function(){var e=u;return u=me,e},ae,!0)[ce],this.isbreak=Pe("isbreak",function(e){return T(e[0]===re&&a.IsBreak(e[le].substring(0,1)))},ae,!0)[ce],this.linelength=Pe("linelength",function(){return 80},ae,!0)[ce],this.unbuffered=Pe("unbuffered",function(e){l=e===Re},ae,!0)[ce],this.newline=Pe("newline",function(e){if(!tt&&a.Full())return At;var r=1;if(e===me||null!==(r=Da(e,255))&&0<=r){for(;0<r--;)a.WriteString("\n");return l&&co(),Re}return me},ae,!0)[ce],this.spaces=Pe("spaces",function(e){if(!tt&&a.Full())return At;var r;if(null!==(r=Da(e,255))&&0<=r){for(var n=wr[1][wr[1][0]===re?le:pe];0<r--;)a.WriteString(n);l&&co()}return qa(a.Column())},ae,!0)[ce],this.printline=Pe("printline",function(e,r){return(r=d(e,r))===At||(a.WriteString("\n"),l&&co()),r},S,!0)[ce],this.print=Pe("print",d,S,!0)[ce],this.printloc=Pe("printloc",function(e){return We(qa(a.Line()),We(qa(a.Column()),me))},ae,!0)[ce],this.printq=Pe("printq",function(e,r){if(!tt&&a.Full())return At;for(var n,t=me,i=0;i<e;++i)n=oo(t=r(i),t!==wr[1]&&{quote:Re},a),a.WriteString(n);return l&&co(),t},S,!0)[ce],this.radix=Pe("radix",function(e){var r,n=We(qa(i.Radix()),We(qa(a.Radix()),me));return e[0]===ee&&(0<=(r=lu(e[1]))&&i.SetRadix(r),0<=(e=lu(e[2][1]))&&i.SetRadix(e)),n},ae,!0)[ce],this.readchar=Pe("readchar",function(){var e=i.ReadChar();return null!==e?Me(e):c===me?i.EOF()?me:At:(e=c,c=me,xi(e))},ae,!0)[ce],this.readready=Pe("readready",function(){return qa(i.ReadReady())},ae,!0)[ce],this.reset=Pe("reset",function(){i.Reset(),a.Reset()},ae,!0)[ce],this.setsymbols=Pe("setsymbols",function(e){if(e===me){if(s)return ya(Object.values(s),s=!1)}else{if(e[0]!==ee)return me;for(var r={},n=e;n[0]===ee;){if(n[1][0]!==re)return me;r[n[1][le]]=n[1],n=n[2]}s=r}return ar},ae,!0)[ce],this.taketext=Pe("taketext",function(){return Me(a.TakeText())},ae,!0)[ce],this.tokenread=Pe("tokenread",function(e){return g()?o:p(e)},ae,!0)[ce],this.tokenlast=Pe("tokenlast",function(e){return e===Re&&(o=me),o},ae,!0)[ce],this.tokenpush=Pe("tokenpush",h,ae,!0)[ce],this.tokenmatch=Pe("tokenmatch",function(e,r){var n=o;if(n[0]!==oe||!n[he].atom)return me;if(Gu(n[he].atom,kr[1])!==Re)return v(n,e)?n:me;for(var t=n;;){if(!g())return p(r);if((n=o)[0]!==oe||!n[he].atom)return me;if(Gu(n[he].atom,kr[1])!==Re)break;t=n}return v(n,e)?n:(h(t),me)},ae,!0)[ce],this.tokenpass=Pe("tokenpass",function(e,r){for(var n=o;;){if(n!=me&&!v(n,e))return n;if(!g())return p(r);n=o}},ae,!0)[ce],this.readex=Pe("readex",function(e){return c=e},ae,!0)[ce],r===me?i=ao:K(r)?r[0]===ne&&((i=new b.NaanChannel(y,t)).ScanReset(),i.SetText(r[pe]),i.SetEOF()):i=r,n===me?a=uo:K(n)?n===cr&&(a=new b.NaanChannel(y)).SetWriteLimit(0):a=n,this.raw=Ie({read:i,write:a})}function lo(e,r,n){var t=Ie(!1),n=new so(0,e,r,n);return t[x]=me,t[he]=n,t}(so.prototype=Object.create(ta.prototype)).constructor=so;var po=lo(ao,uo),go=ao,vo=uo,ho=po,bo=po;function yo(e){return T(e[0]===oe&&e[he]instanceof so)}function mo(){return/param/.test(function(e){})?me:Re}var ko=90,wo=11,xo=ko+1;function So(){var c=new Array(1),s=[];function l(e){var r;if(e===D)return xo;if("object"!=typeof e)return e;var n,t,i=e[0];if(wo<i)return Math.floor(i/wo);if(i===oe&&!(ua(t=(n=e)[he])?!(t instanceof da||t instanceof so||t instanceof la):!!(n[x]!==me&&ke(n[x][he].persist)||t.constructor&&m.hasOwnProperty(t.constructor.name)||t.NaanPersist)))return xo;var a=c.length+ko;s.push(e),e[0]=i+a*wo;var u,o,f=Array(e.length);switch(c.push(f),(f[0]=i)===oe&&(r=function(e){var r,n,t=e[he],i=l(e[x]);if(ua(t))if(K(t)){for(var a=[],u=0;u<t.length;++u)a.push(l(t[u]));r={na:a}}else{for(var o={},f=Object.getOwnPropertyNames(t),c=0;c<f.length;++c)o[f[c]]=l(t[f[c]],f[c]);r=e[3]instanceof ca?{no:o}:{nd:o},e[2]!==me&&(r.tag=l(e[2]))}else try{r=t instanceof RegExp?{tag:i,type:t.constructor.name,state:[t.source,t.flags]}:t.StateSave!==D?{tag:i,type:t.constructor.name,state:t.StateSave()}:{tag:i,type:t.constructor.name,object:t}}catch(e){r={type:t.constructor.name}}return e[se]&&e[se]!==me&&(n=Oe.indexOf(e[se]))<0&&(n=Oe.length),0<=n&&(r.xns=n),r}(e)),i){case ee:f[2]=l(e[2]),f[1]=l(e[1]);break;case re:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=l(e[3]),f[4]=Oe.indexOf(e[4]).toString(),f[5]=e[5];break;case ne:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=e[3];break;case ie:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=e[3].toString();break;case te:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=function(e){if(L.bitSize(e)<=k)return Ba(e);var r="";return L.negative(e)&&(e=L.negate(e),r="-"),r+L.bigInt2str(e,10)}(e[3]);break;case ae:case S:case ue:if(!(u=Ae(e[3])))return c.pop(),e[0]=i,xo;f[1]=l(e[1]),f[2]=l(e[2]),(o=C(u,[X,z]))[0]===re&&o[le]===u?f[3]=l(o):f[3]=u;break;case oe:f[1]=l(e[1]),f[2]=l(e[2]),f[3]=r;break;case w:f[1]=Oe.indexOf(e).toString(),f.length=2;break;default:Zi(Di,"save-state warning: invalid element type "+i+" at "+a)}return a}for(var e,r=[],n=0;n<Oe.length;++n){var t=n;t<=1&&(t=1-t),e=Oe[t][be];for(var i=0,a=0;a<e.length;++a)!function(e,r){if("object"==typeof e&&e[0]==re){var n=c.length+ko;s.push(e),e[0]=re+n*wo;n=Array(P);return c.push(n),n[0]=re,n[1]=e[1],n[2]=e[2],n[3]=e[3],n[4]=r.toString(),n[5]=e[5],1}}(e[a],t)||++i;r[t]=i,l(Oe[t])}!function(){for(var e=1;e<c.length;++e){var r=c[e];r[0]===re&&(r[1]=l(r[1]),r[2]=l(r[2]),r[3]=l(r[3]))}}();var u=[];for(n=0;n<Oe.length;++n){e=Oe[n][be];var o=[];o.push(l(Oe[n][j])),o.push(l(qa(r[n]))),o.push(l(e[0])),u.push(o)}c[0]=u;var f=[l(J)];for(n=0;n<Z.length;++n)f.push(l(Z[n]));var p,g=new Array(dt);for(g[0]=bt,p=1;p<=dt;++p){var v=vt[p-1];"object"==typeof v?g[p]=l(v):"number"==typeof v?g[p]=-v:v===D?Zi(Di,"savestate: corrupt argstack"):g[p]=v}g[p++]=l($r),g[p++]=l(Wr),g[p++]=l(Ir),g[p++]=l(Mr),function(){for(var e=0;e<s.length;++e)s[e][0]%=wo}();var d,h=new Array(gt);for(h[0]=_r,d=1;d<=gt;++d)h[d]=pt[d-1];var b=[];b[0]=g,b[1]=h,b[2]=ht,b[3]=f,b[4]=Ii;var y=new Array("Naan",900,12002,xo);return new Array(y,c,b)}function Oo(e){var r,n=e[0];if(!("Naan"!==n[0]||900<n[1])){var t=e[1],o=t[0],i=n[3],a=e[2],u=a[0],f=u[0],c=a[1],s=a[2],l=c[0],p=a[3],g=a[4];if(t!==D&&o!==D&&i!==D&&a!==D&&u!==D&&f!==D&&c!==D&&l!==D&&p!==D){for(var v=i-1,d=new Array(t.length),h=[],b=0;b<o.length;++b)h[b]=new Array(U);for(x=1;x<t.length;++x)"object"==typeof(r=t[x])&&r.ns!==D?d[x]=h[r.ns]:d[x]=new Array(3);for(var y,m,k=h[1],w=1,x=1;x<t.length;++x)if("number"!=typeof(r=t[x]))if("string"!=typeof r){if("object"!=typeof r||0===r.length)return void Zi(Di,"loadstate: unexpected token: "+typeof r);if(K(r))if(1!=r.length)if(2!=r.length)if(3!=r.length){var S,O,N,j,P=r[0];for(d[x][0]=P,S=1;S<r.length;++S)if(O=r[S],P===re&&(S===ce&&(w=C(O)),S===se&&(k=(k=h[parseInt(O)])||me)),P===te&&S===ge)d[x][S]="string"!=typeof(m=O)?Ra(m):m="-"==m.charAt(0)?L.negate(L.str2bigInt(m.substring(1),10,1)):L.str2bigInt(m,10,1);else if(P===ie&&S===ve)d[x][S]=parseFloat(O);else if(ae<=P&&P<=ue&&S===de)if((j="string"==typeof O?H[O]:(j="string"==typeof(N=t[C(O)])?N:3<N.length?N[le]:N[0],H[B(j)]))===D){debugger;Zi(Di,"state-load warning: undefined builtin: "+O+"("+N+")"),d[x][S]=vi}else d[x][S]=j;else d[x][S]=P===ne&&S===pe?O:P===re&&S===le?B(O):P===re&&S===se?h[parseInt(O)]:d[C(O)]}else{if("string"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj3: "+typeof r[0]);d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],w=C(r[1]),d[x][3]=d[w],k=(k=h[parseInt(r[2])])||me,d[x][4]=k,d[x][5]=B(r[0])}else if("string"==typeof r[0])d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],w=C(r[1]),d[x][3]=d[w],d[x][4]=k,d[x][5]=B(r[0]);else{if("number"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj2: "+typeof r[0]);d[x][0]=ee,d[x][1]=d[C(r[0])],d[x][2]=d[C(r[1])]}else if("string"==typeof r[0])d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=d[++w],d[x][4]=k,d[x][5]=B(r[0]);else{if("number"!=typeof r[0])return void Zi(Di,"loadstate: malformed obj1: "+typeof r[0]);d[x][0]=ee,d[x][1]=d[C(r[0])],d[x][2]=d[1]}else{d[x][0]=oe,d[x][1]=d[x],d[x][2]=d[1],d[x][4]=d[1];try{if(r.na!==D){var A,T=[];for(T[na]=ta,A=0;A<r.na.length;++A)T.push(d[C(r.na[A])]);d[x][3]=T,0<=r.xns&&!(d[x][4]=h[r.xns])&&(d[x][4]=G)}else if(r.nd!==D||r.no!==D){for(var E=new(r.nd?oa:ca),M=r.nd||r.no,I=Object.getOwnPropertyNames(M),W=0;W<I.length;++W)E[I[W]]=d[C(M[I[W]])];r.tag!==D&&(d[x][2]=d[C(r.tag)]),d[x][3]=E,0<=r.xns&&!(d[x][4]=h[r.xns])&&(d[x][4]=G)}else r.ns!==D||(y="undefined"!=typeof window?window:global,r.tag&&(d[x][2]=d[C(r.tag)]),r.type&&r.state!==D?d[x][3]=new(Function.prototype.bind.apply(y[r.type],[null].concat(r.state))):r.object!==D?r.type&&"Object"!==r.type&&y[r.type]!==D?d[x][3]=new y[r.type](r.object):d[x][3]=r.object:d[x][3]={})}catch(e){d[x][3]={}}}}else"$"==r.substring(0,1)?(d[x][0]=ne,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=r.substring(1)):(d[x][0]=re,d[x][1]=d[x],d[x][2]=d[1],d[x][3]=d[1],d[x][4]=k,d[x][5]=B(r));else d[x][0]=ee,0===r?(d[x][1]=d[x+1],d[x][2]=d[1]):(d[x][1]=d[C(r)],d[x][2]=d[x+1]);var $,_=new Array(u.length),q=Oe,F=Z,n=X,e=z,a=G,i=J;if(!function(){try{for(V(),Oe=[],Z=[],X=h[0],z=h[1],b=0;b<o.length;++b){for(var e=o[b],r=d[e[0]-v],n=Ca(d[e[1]-v][3],99999),t=e[2]-v,i=Q(r,h[b]),a=0;a<n;++a){var u=d[t+a];(u[se]=i)[be].push(u),i[ye][u[le]]=a}if(i[be].length!=n)return void Zi(Di,"loadstate: symbol table sync: "+r[pe]+" "+i[be].length+" "+n)}return z[be].length<50||$<0||f<0||$<f?void Zi(Di,"loadstate: unqualified "+z[be].length):1}catch(e){return void Zi(Di,"loadstate failed: "+e.toString())}}())return Oe=q,Z=F,X=n,z=e,G=a,void(J=i);for(Z=[X,z],J=X,Io(),Wo(),Z=[],b=1;b<p.length;++b)Z.push(d[p[b]-v]);for(J=d[p[0]-v],$=1;$<u.length;++$){var R=u[$],R="number"==typeof R?R<=0?-R:d[R-v]:R;_[$-1]=R}return c.splice(0,1),_r=l,gt=(pt=c).length,dt=$-1,bt=f,ht=s,Mr=(vt=_)[--dt],Ir=vt[--dt],Wr=vt[--dt],$r=vt[--dt],Ii=g,1}Zi(Di,"cannot load malformed state")}function C(e){return e<=v?x+e:e-v}function B(e){return"\\$"===e.substring(0,2)?e.substring(1):e}}function No(e){var r,n=C("SaveTrap",Oe);if(n!==me&&n[ce]!==me&&(jt=-1,_r=qr,Ct(We(n,me),"savetrap"),Dt(!0),at!==Re))return r;var i=So();return e&&function(e){var r,n,t,i,a,u,o,f=e[1],c=[],s=[];function l(e){if("number"!=typeof e)return K(e)?e.length===P?Zi(Di,"save-state warning: unexpected symbol "+e[le]):Zi(Di,"save-state warning: unexpected element "+e[0]):Zi(Di,"save-state warning: invalid item encountered"),xo;var r,n=f[e-ko];switch(n[0]){case ee:break;case ne:case te:case ie:if(r=n[0].toString()+"/"+n[2].toString()+"/"+n[3],s.hasOwnProperty(r))return s[r];s[r]=e,n[0]+=wo;case ee+wo:case ne+wo:case te+wo:case ie+wo:default:return e}var t=l(n[O]),i=l(n[N]),a=t+i/(f.length+ko+1);return c.hasOwnProperty(a)?c[a]:(c[a]=e,n[0]=ee+wo,n[O]=t,n[N]=i,e)}for(m=1;m<f.length;++m)switch((r=f[m])[0]){case ee:case ne:case te:case ie:r[1]=l(r[1]),r[2]=l(r[2]);break;case re:r[1]=l(r[1]),r[2]=l(r[2]),r[3]=l(r[3]);break;case ae:case S:case ue:r[1]=l(r[1]),r[2]=l(r[2]),"number"==typeof r[3]&&(r[3]=l(r[3]));break;case oe:if(r[1]=l(r[1]),r[2]=l(r[2]),r[3].na!==D)for(i=r[3].na,n=0;n<i.length;++n)i[n]=l(i[n]);else if(r[3].nd!==D||r[3].no!==D){for(a=r[3].nd||r[3].no,u=Object.getOwnPropertyNames(a),t=0;t<u.length;++t)a[u[t]]=l(a[u[t]]);r[3].tag&&(r[3].tag=l(r[3].tag))}}for(var p,g=f[0],v=0;v<g.length;++v)for(p=g[v],o=0;o<p.length;++o)p[o]=l(p[o]);for(var d=e[2][0],h=1;h<d.length;++h)d[h]>ko&&(d[h]=l(d[h]));for(var b=[],y=0,m=1;m<f.length;++m)switch(f[m][0]){case ee:case ne:case te:case ie:++y;break;default:b[m+ko]=m+ko-y}for(v=0;v<g.length;++v)for(p=g[v],o=0;o<p.length;++o)p[o]=b[p[o]];for(h=1;h<d.length;++h)d[h]>ko&&(d[h]=b[d[h]]);for(var k=e[2][3],w=0;w<k.length;++w)k[w]>ko&&(k[w]=b[k[w]]);var x=new Array(1);for(m=1;m<f.length;++m){switch((r=f[m])[0]){case ee:case ne:case te:case ie:continue;case ee+wo:case ne+wo:case te+wo:case ie+wo:r[0]-=wo,r[1]=b[r[1]],r[2]=b[r[2]];break;case re:r[1]=b[r[1]],r[2]=b[r[2]],r[3]=b[r[3]];break;case ae:case S:case ue:r[1]=b[r[1]],r[2]=b[r[2]],"number"==typeof r[3]&&(r[3]=b[r[3]]);break;case oe:if(r[1]=b[r[1]],r[2]=b[r[2]],r[3].na!==D)for(i=r[3].na,n=0;n<i.length;++n)i[n]=b[i[n]];else if(r[3].nd!==D||r[3].no!==D){for(a=r[3].nd||r[3].no,u=Object.getOwnPropertyNames(a),t=0;t<u.length;++t)a[u[t]]=b[a[u[t]]];r[3].tag&&(r[3].tag=b[r[3].tag])}}x.push(r)}x[0]=g,e[1]=x}(i),function(){var e,r=i[1];function n(e,r){e+=ko;return r-e<=ko&&(-9<=r-e||999<r&&-99<=r-e)?r-e:r}for(e=1;e<r.length;++e){var t=r[e];switch(t[0]){case ee:case ne:case te:case ie:t[1]=n(e,t[1]),t[2]=n(e,t[2]);break;case re:t[1]=n(e,t[1]),t[2]=n(e,t[2]),t[3]=n(e,t[3]);break;case ae:case S:case ue:t[1]=n(e,t[1]),t[2]=n(e,t[2]),"number"==typeof t[3]&&(t[3]=n(e,t[3]));break;case oe:t[1]=n(e,t[1]),t[2]=n(e,t[2])}}}(),r=function e(r,n){function t(e){return n.QuoteString(e)}function i(e){return"$"==e.substring(0,1)&&(e="\\".concat(e)),t(e)}if(0===r.length)return"";n===D&&(n=vo);for(var a,u,o,f,c="[",s=!1,l=0;l<r.length;++l)s&&(c+=","),"object"==typeof r[l]?((o=r[l])[0]===ee?1===o[2]?c+=o[1]:o[2]===xo?1!==o[1]?c+="["+o[1]+"]":c+="0":c+="["+o[1]+","+o[2]+"]":o[0]===re&&0===o[1]&&o[2]===xo?(f=i(o[le]),a==o[4]?o[3]===xo?c+=f:o[3]==u+1?c+="["+f+"]":c+="["+f+","+o[3]+"]":c+="["+f+","+o[3]+","+o[4]+"]"):o[0]===ne&&0===o[1]&&o[2]===xo?c+=t("$"+o[pe]):o[0]===oe?c+=JSON.stringify(o[he]):o[0]===w?c+=JSON.stringify({ns:o[1]}):c+=e(r[l]),o[0]===re&&(a=o[4],u=o[3])):"string"==typeof r[l]?r[0]===re&&l===le?c+=i(r[l]):r[0]===ne&&l===pe?c+=t("$"+r[l]):c+=t(r[l]):r[l]!==D&&(c+=r[l]),s=!0;return c+="]"}(i)}function jo(e){if(!Oo(e))return me;$o(),_o();e=C("LoadTrap",Oe);if(e===me)return To;e=Ct(We(e,me),"loadtrap");return pt[gt++]=_r,e}function Po(e){e=No(e!=me);return"string"==typeof e?Me(e):e}Pe("save",Po,ae);function Ao(e){if(e[0]!==ne)return me;e=JSON.parse(e[pe]);return e&&0!==e.length?jo(e):me}var To=Pe("load",Ao,ae);var Eo=[["global","`",gu,ue],["global","deref",ki,ue],["global",".",wi,ue],["global","quote",gu,ue],["global","$",function(e){return mr[1]=e},ae],["exec","and",function(e){return pt[gt++]=Ur,e},ue],["exec","apply",di,ae],["exec","break",Ni,ae],["exec","call",function(e){return pt[gt++]=r,Wr=Re,Ir=e[2],e[1]},ue],["exec","catch",function(e){return pt[gt++]=Wn,e},ue],["exec","cond",function(e){return pt[gt++]=Sn,e},ue],["exec","continue",ji,ae],["exec","eval",function(e){return e[0]!==ee&&e[0]!==oe?e[1]:(pt[gt++]=vn,e)},ae],["exec","lambda",function(e){return T(e[0]===re&&e[le]==Ce[le])},ae],["exec","loop",function(e){return pt[gt++]=an,e},ue],["exec","or",function(e){return pt[gt++]=Mn,e},ue],["exec","return",function(e,r){return Oi(e?r(0):it)},S],["exec","throw",xi,ae],["exec","yield",function(){var e=Ea(0);return e[x]=me,e[he].execstate=Ei(!0),e},ae],["exec","resume",function(e,r){return e[0]!==oe||ua(e[he])||!K(e[he].execstate)?me:(Mi(e[he].execstate),Mr=r)},ae],["info","builtin",function(e,r){return T(Ru(e,r)===_u)},S],["info","procedure",function(e,r){return T(Ru(e,r)===qu)},S],["info","eq",Xu,ae],["info","equal",Gu,ae],["info","length",io,ae],["info","not",function(e){return T(!ke(e))},ae],["info","typeof",Cu,S],["info","relate",function(e,r){return qa(Vu(e,r))},ae],["symbol","setq",function(e){return e[0]!==ee?me:(pt[gt++]=nn,e)},ue],["symbol","assign",Hu,ae],["symbol","compress",function(e,r){for(var n="",t=0;t<e;++t)n+=to(r(t));return Ar(n)},S],["symbol","copyproc",eo,ae],["symbol","copyann",function(e,r,n){return Tr(e,!0)?r[0]!==re?me:(n===me&&(t=e[2]),e[2]=h(r[2],t),e):Mr;var t},ae],["symbol","exists",function(e,r){var n,t;if(e[0]===ne)t=e[pe];else if(e[0]===re)t=e[le];else{if(e[0]!==oe||!RegExp.prototype.isPrototypeOf(e[he]))return me;t=e[he]}if(r===me)n=Z;else if(r===Re)n=Oe;else{if(r[0]!==w)return me;n=[r]}for(var i,a=[],u=0;u<n.length;++u){var o=n[u];if("string"==typeof t){if(o[ye].hasOwnProperty(t))return i=o[ye][t],o[be][i]}else if(e[0]===oe)for(i=0;i<o[be].length;++i){var f=o[be][i];t.test(f[le])&&a.push(f)}}return xe(a)},ae],["symbol","get",Yu,ae],["symbol","getproc",function(e,r){return e[0]>=ae&&e[0]<=ue&&mo()===me?Me(e[3].name):e[0]!==re?me:r===Re?E(e):e[3]},ae],["symbol","interned",Bu,ae],["symbol","defbinding",Du,ae],["symbol","moveproc",function(e,r){return!ro&&Ui<=Ii&&(ro=!0,Zi(Ui,"warning: moveproc() is deprecated in favor of copyproc()")),eo(r,e)},ae],["symbol","name",function(e,r){return T((r=Ru(e,r))===re||r===ne||r===$u)},S],["symbol","ordered",function(e,r){return makeBoolean(Vu(e,r)<0)},ae],["symbol","preadjust",function(e){return pt[gt++]=mn,e},ue],["symbol","postadjust",function(e){return pt[gt++]=Jr,e},ue],["symbol","put",Ku,ae],["symbol","putproc",function(e,r){if(e[0]!==re)return me;if(!Tr(e))return Mr;if(r[0]>=ae&&r[0]<=ue||r[0]===re)return e[3]=r;if(r[0]===ee){var n=r[2][1][2];return e[2]!==n&&(e[2]=h(n)),e[3]=r}if(r[0]===ne){var i={j2n:ma,n2j:xa,nanu:aa,pl:fo,ns:e[se],len:io,idle:function(){_r=qr}};try{var a,t=r[pe],u=S,t=t.startsWith("macro:")?(u=ue,t=t.slice(6),a=new Function("args","_lib","_false",t),function(e,r){return a(e,i,me)||me}):t.startsWith("builtin:")?(u=ae,t=t.slice(8),a=new Function("cx","cy","cz","_lib","_false",t),function(e,r,n,t){return a(e,r,n,i,me)||me}):(u=S,a=new Function("narg","nthf","_lib","_false",t),function(e,r){return a(e,r,i,me)||me}),t=[u,null,e,t];return t[1]=t,e[3]=t}catch(e){return Zi(Ui,"compile: "+e.toString()),Me(e)}}return me},ae],["symbol","replacer",function(e,r){return Tr(e,!0)?(e[2]=r,e):Mr},ae],["symbol","symbol",function(e,r){return T(Ru(e,r)===re)},S],["symbol","unintern",function(e){var r;if(e[0]===re)r=q(e[le]);else{if(e[0]!==ne)return me;r=q(e[pe])}return r[se]=Z[0],r},ae],["tuple","atom",Uu,S],["tuple","car",vu,ae],["tuple","cdr",du,ae],["tuple","caar",hu,ae],["tuple","cadr",bu,ae],["tuple","cdar",function(e){return e[1][2]},ae],["tuple","cddr",yu,ae],["tuple","caaar",function(e){return e[1][1][1]},ae],["tuple","caadr",mu,ae],["tuple","cadar",function(e){return e[1][2][1]},ae],["tuple","caddr",ku,ae],["tuple","cdaar",function(e){return e[1][1][2]},ae],["tuple","cdadr",function(e){return e[2][1][2]},ae],["tuple","cddar",function(e){return e[1][2][2]},ae],["tuple","cdddr",wu,ae],["tuple","caaaar",function(e){return e[1][1][1][1]},ae],["tuple","caaadr",function(e){return e[2][1][1][1]},ae],["tuple","caadar",function(e){return e[1][2][1][1]},ae],["tuple","caaddr",function(e){return e[2][2][1][1]},ae],["tuple","cadaar",function(e){return e[1][1][2][1]},ae],["tuple","cadadr",function(e){return e[2][1][2][1]},ae],["tuple","caddar",function(e){return e[1][2][2][1]},ae],["tuple","cadddr",function(e){return e[2][2][2][1]},ae],["tuple","cdaaar",function(e){return e[1][1][1][2]},ae],["tuple","cdaadr",function(e){return e[2][1][1][2]},ae],["tuple","cdadar",function(e){return e[1][2][1][2]},ae],["tuple","cdaddr",function(e){return e[2][2][1][2]},ae],["tuple","cddaar",function(e){return e[1][1][2][2]},ae],["tuple","cddadr",function(e){return e[2][1][2][2]},ae],["tuple","cdddar",function(e){return e[1][2][2][2]},ae],["tuple","cddddr",function(e){return e[2][2][2][2]},ae],["tuple","cons",function(e,r){if(0===e)return me;if(1==e)return We(r(0),me);for(var n=r(--e);0<=--e;)n=We(r(e,r),n);return n},S],["tuple","insert",function(e,r){if(0===e)return me;for(var n=r(0);0<--e;)n=We(r(e,r),n);return n},S],["tuple","empty",Uu,S],["tuple","first",vu,ae],["tuple","ffirst",hu,ae],["tuple","fsecond",mu,ae],["tuple","list",function(e){return pt[gt++]=un,e},ue],["tuple","member",Ju,ae],["tuple","within",Zu,ae],["tuple","pop",function(e){var r=e[1];return r[0]!==re||r[1][0]!==ee?me:(e=r[1][1],r[1]=r[1][2],e)},ue],["tuple","push",function(e){return e[2][1][0]!==re?me:Tr(e[2][1])?(pt[gt++]=en,e):Mr},ue],["tuple","rest",du,ae],["tuple","reverse",xu,ae],["tuple","rrest",yu,ae],["tuple","rrrest",wu,ae],["tuple","second",bu,ae],["tuple","third",ku,ae],["tuple","totuple",Sa,ae],["tuple","tuple",function(e,r){return T((r=Ru(e,r))===ee||r===qu||r===Fu)},S],["tuple","tuplepath",function(e,i){return function e(r){if(Xu(r,i)!==me)return me;for(var n,t=0;;){if(Xu(r,i)!==me){t=-t,n=me;break}if(r[0]!==ee)return!1;if(n=e(r[1]))break;r=r[2],++t}return We(qa(t),n)}(e)||me},ae],["number","bitand",eu,S],["number","bitnot",function(e,r,n,t){return e[0]===te?_a(L.not(e[3]),me):e[0]===ie?Fa(~e[3]):e[0]===oe&&e[3]instanceof ca?Ht(e,".bitnot"):Qt(B(t[2][1],"extendBitNot"))},ae],["number","bitor",nu,S],["number","bitxor",iu,S],["number","difference",Ga,S],["number","divide",function(e,r,n,t){if(e[0]!==te||r[0]!==te)return e[0]===oe&&e[3]instanceof ca?Ht(e,".divide"):r[0]===oe&&r[3]instanceof ca?Ht(r,".divide"):Qt(B(t[2][1],"extendDivide"));if(L.isZero(r[3]))return xi(_e(["internal","$divide by zero"]),me);var i=e[3],a=r[3],u=L.negative(i),t=L.negative(a);return u&&(i=L.negate(i)),t&&(a=L.negate(a)),e=L.dup(i),r=L.dup(i),L.divide_(i,a,e,r),u&&(L.isZero(r)||(e=L.addInt(e,1),r=L.sub(a,r))),We(_a(L.trim(e,1),me),_a(L.trim(r,1),me))},ae],["number","even",function(e){return e[0]===te?T(0===L.modInt(e[3],2)):e[0]!==ie?me:T((e=e[3]/2)==Math.floor(e))},ae],["number","float",function(e,r){return T(Ru(e,r)===ie)},S],["number","greater",cu,ae],["number","integer",function(e,r){return T(Ru(e,r)===te)},S],["number","lesser",su,ae],["number","mod",Ya,ae],["number","negate",La,ae],["number","negative",function(e){return e[0]===te?T(L.negative(e[3])):e[0]===ie?T(e[3]<0):me},ae],["number","numeric",function(e,r,n){var t=Ru(e,r);if(t===ie||t===te||t===ju)return Re;for(var i=0;i<e;++i){var a=r(i);if(a[0]===oe&&a[3]instanceof ca)return Ht(a,".numeric")}return Qt(B(n[2][1],"extendNumeric"))},S],["number","plus",Xa,S],["number","positive",function(e){return e[0]===te?T(!L.negative(e[3])&&!L.isZero(e[3])):e[0]===ie?T(0<e[3]):me},ae],["number","quotient",Qa,ae],["number","shiftleft",uu,ae],["number","shiftright",fu,ae],["number","times",Za,S],["number","tofloat",function(e,r,n,t){return e[0]===ie?e:e[0]===te?Fa(Ba(e[3])):e[0]===ne?Fa(parseFloat(e[3])):e[0]===oe&&"number"==typeof e[he]?Fa(e[he]):e[0]===oe&&e[3]instanceof ca?Ht(e,".tofloat"):Qt(B(t[2][1],"extendTofloat"))},ae],["number","toint",function(e,r){if(e[0]===ie)return qa(Math.floor(e[3]));if(e[0]===te)return _a(e[he],me);if(e[0]===ne){if(0!==e[3].indexOf("0x"))return r===me?qa(parseInt(e[3])):((n=lu(r[3]))<0&&(n=10),qa(parseInt(e[3],n)));n=qa(parseInt(e[3],16));return n[x]=wa({hexcon:!0}),n}if(e[0]===oe){var n=e[he].valueOf();if("number"==typeof n)return isFinite(n)?qa(n):me;try{if(e[he]instanceof Uint8Array)return _a(L.uint82bigInt(e[he]),me)}catch(e){return me}}return me},ae],["number","zero",function(e){return e[0]===te?T(L.isZero(e[3])):e[0]===ie?T(0===e[3]):me},ae],["string","explode",function(e){var r;if(e[0]===re)r=e[le];else if(e[0]===ne)r=e[pe];else{if(e[0]!==te)return me;r=vo.IntToString(e[ge],pu(e))}var n,t=me,i=null;if(0===r.length)return me;for(n=0;n<r.length;++n){var a=We(Me(r.charAt(n)),me);i?i[2]=a:t=a,i=a}return t},ae],["string","strcat",function(e,r){for(var n="",t=0;t<e;++t)n+=oo(r(t));return Me(n)},S],["string","string",function(e,r){return T(Ru(e,r)===ne)},S],["string","tostring",no,ae],["string","unicode",function(e){var r;if(e[0]===re)r=e[le];else{if(e[0]!==ne){if(e[0]!==te)return me;if(L.negative(e[3])||L.greater(e[3],L.int2bigInt(1114111,16,1)))return me;var n=L.modInt(e[3],1114111);if(n<65536)r=String.fromCharCode(n);else try{r=String.fromCodePoint(n)}catch(e){return Zi(Ui,"warning: couldn't fromCodePoint("+n+")"),me}return Me(r)}r=e[pe]}try{return qa(r.codePointAt(0),wa({hexcon:!0}))}catch(e){return Zi(Ui,"warning: couldn't codePointAt(\""+r.substring(0,1)+'")'),qa(r.charCodeAt(0))}},ae],["array","array",function(e,r){return T(Ru(e,r)===Pu)},S],["array","arraycall",function(e,r){function u(){var e=Ge[1],r=Mt;if(Dt(!0),r!=Mt&&xi(_e(["internal","fiber suspended during callback"]),me),e!==Ge[1])throw Pt}function n(e,r,n){var t,i=J,a=Ve[1];return function(){return t=We(arguments[0],We(ma(arguments[1]),We(r,me))),Ct(We(mi,We(e,t)),"arrayfilter"),Ve[1]=a,J=i,u(),1===n?at:(2===n&&(at=T(ke(at))),xa(at))}}function t(r){var n,t=J,i=Ve[1];return function(){var e=r?(n=ya(arguments,!1),Ct(We(mi,We(r,n)),"arraycompare"),Ve[1]=i,J=t,u(),xa(at)):Vu(arguments[0],arguments[1]);return e}}function i(e,r,n){var t;if(r){if(r[0]!==te)return me;null===(t=Ba(r[3],Number.MAX_SAFE_INTEGER))?t=n:(t<0&&(t=e-1+t),e<=t&&(t=e-1))}else t=n;return t}function a(e,r){var n="";r=r?xa(r):",";for(var t=0;t<e.length;++t){var i=xa(e[t]);0<t?n=n+r+i:n+=i}return ma(n)}if(e<2)return me;var o=r(0),f=r(1);if(o[0]!==oe||f[0]===ee||f[0]===oe&&ua(f))return me;var c=o[3];if(!ua(c)||!K(c))return me;for(var s,l,p=xa(f),g=[],v=0;v<e-2;++v)switch(p){case"every":case"filter":case"find":case"findIndex":case"forEach":case"some":0===v&&g.push(n(r(v+2),o,2));break;case"map":0===v&&g.push(n(r(v+2),o,1));break;case"indexOf":case"join":case"lastIndexOf":case"push":case"unshift":g.push(r(v+2));break;case"concat":(l=r(v+2))[0]===oe&&K(l[3])?(ua(s=l[3])||(s=ka(s,new WeakMap)[3]),g.push(s)):g.push([l]);break;case"copyWithin":case"slice":g.push(xa(r(v+2)));break;case"pop":case"reverse":case"shift":break;case"reduce":case"reduceRight":0===v?g.push(function(e,r){var n,t=J,i=Ve[1];return function(){return n=We(arguments[0],We(arguments[1],We(ma(arguments[2]),We(r,me)))),Ct(We(mi,We(e,n)),"arrayreduce"),Ve[1]=i,J=t,t=i=null,u(),at}}(r(v+2),o)):1==v&&g.push(r(v+2));break;case"sort":0===v&&g.push(t(r(v+2)));break;case"fill":0===v?g.push(r(v+2)):g.push(xa(r(v+2)));break;case"splice":v<2?g.push(xa(r(v+2))):g.push(r(v+2));break;default:return me}var d=!0;switch(p){case"find":d=!1;case"every":case"filter":case"findIndex":case"forEach":case"map":case"some":if(g.length<1)return me;break;case"sort":0===g.length&&g.push(t());break;case"indexOf":return function(e,r,n){if((n=i(e.length,n,0))===me)return me;for(var t=n;t<e.length;++t)if(Xu(e[t],r)!=me)return qa(t);return qa(-1)}(c,g[0],g[1]);case"join":return g.length<1?a(c,!1):a(c,g[0]);case"lastIndexOf":return function(e,r,n){if((n=i(e.length,n,e.length-1))===me)return me;for(var t=n;0<=t;--t)if(Xu(e[t],r)!=me)return qa(t);return qa(-1)}(c,g[0],g[1]);case"pop":case"shift":d=!1;break;case"reduce":case"reduceRight":if(d=!1,g.length<1)return me;if(g.length<2){if(c.length<1)return me;g.push(c[0]),c=c.slice(1)}break;case"toString":return no(o,me);case"push":case"unshift":case"concat":case"copyWithin":case"reverse":case"slice":case"fill":case"splice":break;default:return xi(_e(["internal",'$arrayCall "'+p+'": not defined']),me)}try{jt=1,_r=qr;var h=Array.prototype[p],b=me;return h!==D&&(b=h.apply(c,g),!d&&K(b)||(b=b===c?o:K(b)?(b[na]=ta,Ie(b)):ma(b))),jt=-1,b}catch(e){if(e===Pt)throw e;return jt=-1,xi(_e(["internal",'$arrayCall "'+p+'": '+e.toString()]),me)}},S],["dictionary","dictionary",function(e,r){return T(Ru(e,r)===Au)},S],["dictionary","set.",ba,ae],["dictionary","set[",ba,ae],["dictionary","merge",function(e,r){for(var n=[{}],t=0;t<e;++t){var i=r(t);if(i[0]!==oe||K(i[he])){if(i[0]===ee){var a=Object.assign.apply({},n);do{}while(delete a[xa(i[1])],(i=i[2])[0]===ee);n=[a]}}else ua(i[he])?n.push(i[he]):n.push(wa(i[he])[he])}return fa(Object.assign.apply({},n))},S],["dictionary","keys",Na,ae],["dictionary","defined",Oa,ae],["dictionary","object",function(e,r){return T(Ru(e,r)===Tu)},S],["local","instances",function(e){function r(e){for(var r=-1;++r<It;){var n=e[2][3][".parent"];if(!n)return[e,r];e=n}return[me,r]}function n(e){var r=e[2][3][".base"];return r||e}if(e[0]!==re||e[3]===me)return me;var t,i;[t,i]=r(e=e[3][2][1]);var a=n(t);if(a===me)return me;for(var u=function(o){var e,r,n,f=new WeakMap,c=[];function s(e){if("object"==typeof e&&!f.get(e))switch(f.set(e,e),e[0]){case ee:for(var r=e;;){s(r[1]);var n=r[2];if(n===me)break;if(n[0]!==ee){s(n);break}if(r=n,f.get(r))break;f.set(r,r)}break;case oe:if(ua(e[he])){var t=e[he];if(K(e[he]))for(var i=0;i<t.length;++i)s(t[i]);else for(var a=Object.getOwnPropertyNames(t),u=0;u<a.length;++u)s(t[a[u]])}break;case re:e[le]===o&&c.push(e),s(e[1]),s(e[2]),s(e[3])}}for(e=0;e<Oe.length;++e)for(n=Oe[e][be],r=0;r<n.length;++r)s(n[r]);for(var t=1;t<=dt;++t)s(vt[t-1]);return c}(e[le]),o=me,f=0;f<u.length;++f){var c,s,l=u[f];[c,s]=r(l),s==i&&n(c)===a&&(o=We(l,o))}return o},ae],["local","delete",function(e,r){for(var n=[],t=0;t<e;++t)n.push(r(t));for(var i,a=me,u=0;u<n.length;++u)(i=n[u])[0]===w?W(i):a=We(i,a);return a},S],["local","enclose",Ou,ae],["local","namespace",function(e){return e===me?X:e[0]===re||e[0]===oe?e[se]:e[0]===w?e[j]:me},ae],["local","new",aa,ae],["local","nonce",function(e){return T(e[0]===oe&&e[he]instanceof da)},ae],["local","nsactive",function(e){return e===me?xe(Z):e[0]===ee?I(e):e[0]===re&&e===Re?xe(Oe):me},ae],["local","nscaller",function(e){for(var r,n=bt;0<n;){var t=vt[n];switch(t){case Dn:return vt[n-6];case Ln:return r=vt[n-2],vt[n-9-r];case Kn:case Cn:case Bn:case et:case Rn:break;default:return Zi(Di,"nfuncNscaller: unknown frame type on stack: "+t),me}n=vt[n-1]}return me},ae],["local","caller",Ti,ae],["local","nsrights",function(e,r){if(0===e)return J;var n=r(0);if(1==e&&n[0]===w){var t=J;return J===X&&(J=n),t}for(var i=0;i<e;++i){var a=r(i);if(a[0]===w)n=a;else{if(a[0]!==re&&a[0]!==oe)return me;if(!ke(a))return me;n=a[se]}if(n!==me&&(n!=J&&J!==X))return me}return Re},S],["local","symlist",Su,ae],["local","weakmap",function(e){return T(e[0]===oe&&e[he]instanceof WeakMap)},ae],["local","packageDecode",function(e,r){var n;if(e[0]===oe){if(!K(e[he]))return me;ua(n=e[he])&&(n=xa(e))}else{if(e[0]!==ee)return me;n=xa(e)}var a={};if(r!=me){if(r[0]!==oe)return me;r=r[he];if(!ua(r))return me;r.intern&&(r.intern[0]==ne?a.intern=r.intern[pe]:a.intern=ke(r.intern)),r.objectDecoder&&(a.objectDecoder=r.objectDecoder),r.dialectSym&&(a.dialectSym=r.dialectSym)}try{var t=n[0][3];if("NaanPackage"!=n[0][0]||"string"!=typeof t)return Me("package not recognized");if(2<n[0][1]||n[0][2]<1||n[1].length<14||n[1][0]<3)return Me("package version not supported: ".concat(n[0][1],"-",n[0][2]))}catch(e){return Me("invalid package format")}var u=n[1][0],i=[],o=n[1][1]||[],f=n[1][2]||[],c=n[1][3]||[],s=n[1][4]||[],l=n[1][5]||[],p=n[1][6]||[],g=n[1][7]||[],v=n[1][8]||[],d=n[1][9]||[],h=n[1][10]||[],b=n[1][11]||[],y=n[1][12]||[],m=n[1][13]||[];function k(e){e=q(e);return e[se]=Z[0],e}function w(e,r){if(0===e)return me;if(Number.isInteger(r)){if(r++>u)throw"cycle corruption"}else r=1;var n;if(K(e)){n=me;for(var t=e.length-1;0<=t;--t)n=We(x(e[t]),n);return n}if(!Number.isInteger(e))throw"invalid refnum";if(e<o.length){var i=o[e];return"string"!=typeof i&&(i=i===D?"undefined":null===i?"null":!0===i?"true":i.toString(),"symbols"==a.intern)?Ar(i):n="undefined"==i?qe:"null"==i?Fe:(a.intern?Ar:k)(i)}if((e-=o.length)<f.length)return(n=q(f[e]))[se]=Z[0],n;if((e-=f.length)<c.length)return Me(c[e]);if((e-=c.length)<s.length)return qa(s[e]);if((e-=s.length)<l.length)return Fa(l[e]);if((e-=l.length)<p.length)return function(e,r){r=Se(x(p[e],r));return r[na]=ta,Ie(r)}(e,r);if((e-=p.length)<g.length)return function(e,r){for(var r=x(g[e],r),n=fa({}),t=r[1],i=r[2][1];t[0]===ee;)Aa(n,t[1],i[1]),t=t[2],i=i[2];return n}(e,r);if((e-=g.length)<v.length)return function(e){for(var r=v[e],n=me,t=r.length-1;0<=t;--t)n=We(x(r[t]),n);return n}(e);if((e-=v.length)<d.length)return function(e,r){r=x(d[e],r);return we(r[1])?r=Ou(r,me):r[0],r}(e,r);if((e-=d.length)<h.length)return function(e,r){var n,t=x(h[e],r);if(a.dialectSym){try{var i=a.dialectSym;i[0]===re&&(i=i[ce]);i=xa(i,!1,{convert:!1,retresult:!0});_r=qr,n=i(t[jt=1],t[2][1]),jt=-1}catch(e){throw"invalid dialectSym option"}if(n!==me&&n[0]===re)return n;if(n[0]===ne)throw n[pe]}r=t[2][1][pe];return(a.intern?Ar:k)(r)}(e,r);if((e-=h.length)<b.length)return Ie(function(e){if("undefined"!=typeof process&&process.versions&&process.versions.node){var r=Buffer.from(e,"base64");return new Uint8Array(r.buffer,r.byteOffset,r.byteLength)}for(var n=atob(e),t=n.length,i=new Uint8Array(t),a=0;a<t;a++)i[a]=n.charCodeAt(a);return i}(b[e]));if((e-=b.length)<y.length)return Ie(JSON.parse(y[e]));if((e-=y.length)<m.length)return function(e,r){var n,t=x(m[e],r);try{var i=a.objectDecoder;i[0]===re&&(i=i[ce]);i=xa(i,!1,{convert:!1,retresult:!0});jt=1,_r=qr,n=i(t),jt=-1}catch(e){throw"invalid objectDecoder option"}return n}(e,r+1);throw"invalid refnum: ".concat(e)}var x=function(e,r){return e?Number.isInteger(e)?i[e]||(i[e]=w(e,r)):w(e,r):me};try{var S=x(n[3]),O=We(Me(t),We(x(n[0][4]),We(x(n[0][5]),We(x(n[2]),me))));return We(O,S)}catch(e){return"string"==typeof e?Me(e):Me("unknown decode error: ".concat(e.toString()))}},ae],["local","packageEncode",function(e,r,n){if(e[0]!==re)return"package name must be a symbol";if(r[0]!==ee)return"package root list empty";var t=e,c=r,v={debug:!0,comments:!0,prereqs:me};if(n!==me){if(n[0]!==oe)return me;n=n[he];if(!ua(n))return me;n.nsignore&&(v.nsignore=ke(n.nsignore)),n.comments&&(v.comments=ke(n.comments)),n.objectEncoder&&(v.objectEncoder=n.objectEncoder),n.dialectName&&(v.dialectName=n.dialectName),n.prereqs&&(v.prereqs=n.prereqs),n.debug&&(v.debug=ke(n.debug))}var d,i,s=qa(10),l=new WeakMap,h=new WeakMap,p=new WeakMap,g=new WeakMap,b=new WeakMap,y=new WeakMap,a=new WeakMap,m=new WeakMap,k={},w={},x={},u={},S={},O={},N={},j=[],P=[],A=[],T=[],E=[],M=[],I=[],o=[],f=[],W=[],$=[],_=[],q=[],F=0,R=[],C=[];function B(r){var e,n;if(r[0]===re){if(ke(r)){if(r[se][be][r[se][ye][r[le]]]!==r&&!ke(Ju(r,c)))return(e=g.get(r))||(g.set(r,++F),P.push(r),R[F]=r,F);if(C.indexOf(r[se])<0){var t,i=Du(r),a=r[ce],u=a[0];if(!(a===i||ae<=u&&u<=ue&&a[de]===i[de]))if(v.dialectName){try{var o=v.dialectName;o[0]===re&&(o=o[ce]);o=xa(o,!1,{convert:!1,retresult:!0});jt=1,_r=qr,t=o(r[se]),jt=-1}catch(e){throw"invalid dialectName option"}if(t[0]===ne)return a=We(t,We(Me(r[le]),me)),n=G(a),(e=S[n])||(S[n]=++F,W.push(n),R[F]=qa(n),F)}else v.nsignore||(ke(i)?(v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save modified binding for well-known symbol "+r[le]),l.set(r,!0)):v.debug&&!l.get(r)&&(Zi(Ui,"nfuncPackageEncode: cannot save "+Ne(r[se])+"::"+r[le]+" from "+Ne(d)),l.set(r,!0)))}}return(e=p.get(r))||(p.set(r,++F),j.push(r),R[F]=r,F)}if(r[0]===ee)return(we(r[1])&&r[2][1][ce]===r?L:D)(r);if(r[0]===ne)return n=r[pe],(e=k[n])||(k[n]=++F,A.push(n),R[F]=r,F);if(r[0]===te)return n=oo(r,{radix:s}),(e=w[n])||(w[n]=++F,T.push(n),Ba(r[ge])<Number.MAX_SAFE_INTEGER?R[F]=r:R[F]=n,F);if(r[0]===ie)return n=r[ve],(e=x[n])||(x[n]=++F,E.push(n),R[F]=r,F);if(r[0]!==oe)return v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save type "+oo(r)),l.set(r,!0),1;var f=r[he];if(ua(f))return K(f)?(e=b.get(r))||(n=U(xe(f)),b.set(r,++F),M.push(r),R[F]=n,F):f instanceof ca?e||(n=qa(n=function(e){var r;try{var n=v.objectEncoder;n[0]===re&&(n=n[ce]);n=xa(n,!1,{convert:!1,retresult:!0});jt=1,_r=qr,r=n(e),jt=-1}catch(e){throw"invalid objectEncoder option"}return G(r)}(r)),m.set(r,++F),q.push(r),R[F]=n,F):f instanceof oa?(e=y.get(r))||(n=U(function(e){for(var r=Object.getOwnPropertyNames(e),n=[],t=0;t<r.length;++t)n.push(Me(r[t]));for(var i=[],t=0;t<r.length;++t)i.push(e[r[t]]);return We(xe(n),We(xe(i),me))}(f)),y.set(r,++F),I.push(r),R[F]=n,F):f instanceof da?1:void 0;if(i=f,"undefined"!=typeof Buffer&&Nu(i,Buffer)||("undefined"!=typeof ArrayBuffer&&Nu(i,ArrayBuffer)||("undefined"!=typeof DataView&&Nu(i,DataView)||("undefined"!=typeof Uint8Array&&Nu(i,Uint8Array)||!("undefined"==typeof Blob||!Nu(i,Blob))))))return(n=function(e){let n;if("string"==typeof e){const d=new TextEncoder;n=Array.from(d.encode(e))}else if(e instanceof Uint8Array)n=Array.from(e);else{if(!(e instanceof ArrayBuffer))return!1;n=Array.from(new Uint8Array(e))}var r=8*n.length;for(n.push(128);n.length%64!=56;)n.push(0);for(let e=0;e<8;e++)n.push(r>>>8*e&255);let t=1732584193,i=4023233417,a=2562383102,u=271733878;var o=[7,12,17,22,7,12,17,22,7,12,17,22,7,12,17,22,5,9,14,20,5,9,14,20,5,9,14,20,5,9,14,20,4,11,16,23,4,11,16,23,4,11,16,23,4,11,16,23,6,10,15,21,6,10,15,21,6,10,15,21,6,10,15,21],f=Array.from({length:64},(e,r)=>Math.floor(4294967296*Math.abs(Math.sin(r+1))));for(let r=0;r<n.length;r+=64){const h=[];for(let e=0;e<16;e++)h[e]=n[r+4*e]|n[r+4*e+1]<<8|n[r+4*e+2]<<16|n[r+4*e+3]<<24;var c=t,s=i,l=a,p=u;for(let n=0;n<64;n++){let e,r;r=n<16?(e=i&a|~i&u,n):n<32?(e=u&i|~u&a,(5*n+1)%16):n<48?(e=i^a^u,(3*n+5)%16):(e=a^(i|~u),7*n%16);var g=u;u=a,a=i;var v=t+e+f[n]+h[r]|0,v=v<<o[n]|v>>>32-o[n];i=i+v|0,t=g}t=t+c|0,i=i+s|0,a=a+l|0,u=u+p|0}return[t,i,a,u].map(r=>{let n="";for(let e=0;e<4;e++)n+=(r>>>8*e&255).toString(16).padStart(2,"0");return n}).join("")}(f))?(e=O[n])||(O[n]=++F,$.push(n),R[F]=Me(function(e){var r=e instanceof Uint8Array?e:new Uint8Array(e);if("undefined"!=typeof process&&process.versions&&process.versions.node)return Buffer.from(r).toString("base64");for(var n="",t=r.length,i=0;i<t;i++)n+=String.fromCharCode(r[i]);return btoa(n)}(f)),F):(v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save binary "+f.constructor.name),l.set(r,!0),1);try{n=JSON.stringify(f)}catch(e){return v.debug&&!l.get(r)&&Zi(Ui,"nfuncPackageEncode: cannot save xobject "+f.constructor.name),l.set(r,!0),1}return(e=N[n])||(N[n]=++F,_.push(n),R[F]=Me(n),F)}function D(e){for(var r=[],n=e;n[0]===ee;)r.push(G(n[1])),n=n[2];var t=xe(r.map(function(e){return qa(e)})),r=r.join(","),e=u[r];return e||(u[r]=++F,o.push(r),R[F]=t,F)}function L(e){if(e[0]>=ae&&e[0]<=ue)return G(Me(oo(e)));var r=e[2][1],n=a.get(r);if(n)return n;if(e[0]!==ee)return e!==me&&v.debug&&!l.get(e)&&(Zi(Ui,"nfuncPackageEncode: cannot save procedure type "+oo(e)),l.set(e,!0)),1;e=qa(e=D(e));return a.set(r,++F),f.push(r),R[F]=e,F}function U(e){return qa(G(e))}var X,z,G=function(e){var r=h.get(e);return r||(r=B(e),h.set(e,r)),r};function J(e){if("number"==typeof e)return Zi(Ui,"nfuncPackageEncode: raw renumber: "+e),i[e];if(e[0]===te)return qa(i[Ba(e[ge])]);if(e[0]!==ee)return!1;for(var r=[],n=e;n[0]===ee;)r.push(J(n[1])),n=n[2];return xe(r)}try{d=t[se],C.push(d),C.push(Oe[1]),G(me);var Z=qa(G(c)),V=function(e){for(var r=[".closure",".base",".parent"],n=me,t=[],i=Su(d);i[0]===ee;)i[1][2]!==me&&t.push(i[1]),i=i[2];for(var a,u,o=Se(e),f=0;f<o.length;++f){if((a=o[f])[0]!==re)throw"non-symbol in root list";if(d===a[se])for(u=Sa(a[2]);u[0]===ee;)r.includes(u[1][1][pe])||(g=u[1][2])[0]===re&&o.indexOf(g)<0&&o.push(g),u=u[2]}for(f=0;f<o.length;++f)G(o[f]);for(f=o.length-1;0<=f;--f){a=o[f];for(var c=me,s=0;s<t.length;++s){var l=t[s];if(l!==a)for(u=Sa(a[2]);u[0]===ee;){var p,g=u[1];r.includes(u[1][1][pe])||g[2]!==a||(p=We(l,We(g[1],We(g[2],me))),c=We(p,c)),u=u[2]}}n=We(function(e,r,n){var t=e[ce],i=e[fe];if(i[0]===oe){var a,u=i[he];if(ua(u)){for(var o in u=Object.assign({},u),n)h.get(u[n[o]])||delete u[n[o]];u[".sourcemap"]&&(v.comments?u[".sourcemap"][0]===oe&&(a=u[".sourcemap"][he],delete(a=Object.assign({},a))[".map"],u[".sourcemap"]=fa(a)):delete u[".sourcemap"]),i=fa(u)}}return We(U(e),We(U(e[1]),We(U(i),We(qa(L(t)),We(U(r),me)))))}(a,c,r),n)}return n}(c);z=0,i={},Y(j,p),Y(P,g),Y(A,k),Y(T,w),Y(E,x),Y(M,b),Y(I,y),Y(o,u),Y(f,a),Y(W,S),Y($,O),Y(_,N),Y(q,m);var Q=We(Me("NaanPackage"),We(qa(1),We(qa(2),We(t,We(v.prereqs,me)))));return We(Q,We((X=0,Q=We(H(j,p),We(H(P,g),We(H(A,k),We(H(T,w),We(H(E,x),We(H(M,b,!0),We(H(I,y,!0),We(H(o,u,!0),We(H(f,a,!0),We(H(W,S,!0),We(H($,O),We(H(_,N),We(H(q,m,!0),me))))))))))))),We(qa(X),Q)),We(J(Z),We(J(V),me))))}catch(e){return"string"==typeof e?Me(e):Me("unknown encoding error: ".concat(e.toString()))}function H(e,r,n){for(var t=[],i=0;i<e.length;++i){var a="WeakMap"==r.constructor.name?r.get(e[i]):r[e[i]];a=R[a],n&&(a=J(a)),t.push(a),++X}var u=xe(t);return u===me?qa(0):u}function Y(e,r){for(var n=0;n<e.length;++n){var t="WeakMap"==r.constructor.name?r.get(e[n]):r[e[n]];i[t]=z++}}},ae],["host","editget",function(e){return A.hasOwnProperty("edit-get-string")?Me(A["edit-get-string"]()):me},ae],["host","editset",function(e){return A.hasOwnProperty("edit-set-string")?(A["edit-set-string"](oo(e)),e):me},ae],["host","future",function(e,r){var n=Ie(!1);return(r=new da(n,e,va(r))).cancel=r.signal,r.run=r.reset,delete r.signal,delete r.reset,n[x]=me,n[he]=r,n},ae],["host","futures",function(){for(var e=Object.getOwnPropertyNames(ga),r=me,n=0;n<e.length;++n){var t=ga[e[n]],i=new oa;i.nonce=t.nonce,i.start=qa(t.start),i.count=qa(t.count),t.delay&&(i.delay=qa(t.delay)),t.execute&&(i.execute=t.execute),t.waiting&&0<t.waiting.length&&(i.waiting=xe(t.waiting)),t.contins&&0<t.contins.length&&(i.continuations=xe(t.contins)),r=We(Ie(i),r)}return r},ae],["host","loadstate",Ao,ae],["host","milliseconds",function(){return qa((new Date).getTime())},ae],["host","mangled",mo,ae],["host","runaverage",function(e,r){var n,t;if(e===me)n=!1;else if(null===(n=Da(e,50))||n<0)return me;if(r===me)t=!1;else if(null===(t=Da(r,1e3))||t<10)return me;return ka(Zt(n,t),new WeakMap)},ae],["host","savestate",Po,ae],["host","sprint",function(){return Ia(),Re},ae],["host","wait",function(){return jt<0?(jt=0,Re):(jt=1,At)},ae],["stdio","textstream",yo,ae],["stdio","textstreams",function(e){var r=ho,n=bo;if(r===po&&e!==Re&&(r=me),n===po&&e!==Re&&(n=me),e[0]===ee){if(e[2][0]!==ee)return me;var t=e[1],e=e[2][1];if(t===me)t=po;else if(t===Re)t=ho;else if(yo(t)!==Re)return me;if(e===me)e=po;else if(e===Re)e=bo;else if(yo(e)!==Re)return me;go=(ho=t)[he].raw[he].read,vo=(bo=e)[he].raw[he].write}return We(r,We(n,me))},ae],["stdio","isbreak",function(e){return bo[he].isbreak[3](e)},ae],["stdio","newline",function(e){return bo[he].newline[3](e)},ae],["stdio","spaces",function(e){return bo[he].spaces[3](e)},ae],["stdio","printline",fo,S],["stdio","print",function(e,r){return bo[he].print[3](e,r)},S],["stdio","printloc",function(e){return bo[he].printloc[3](e)},ae],["stdio","printq",function(e,r){return bo[he].printq[3](e,r)},S],["stdio","printFlush",co,ae],["external","xapply",function(e,r,n){if(e[0]!==oe||r[0]===ee||r[0]===oe&&ua(r))return me;var t=n===me?[]:xa(n);if(!K(t))return me;var i=xa(r),a=null;if(e[0]===oe){if(ua(a=e[3])){if(a.hasOwnProperty(i)){e=a[i];if(K(e))return di(e,n)}return me}if(a instanceof WeakMap)return me}var u,o=me,f=a===Number||a===String||a===Boolean;try{return jt=1,_r=qr,r[0]===oe?o=ma(r[3].apply(a,t)):(a.prototype!==D&&(u=a.prototype[i])!==D||(f=!1,u=a[i]),u!==D&&(o=ma(f?u.apply(t[0],t.slice(1)):u.apply(a,t)))),jt=-1,o}catch(e){return jt=-1,xi(_e(["internal",'$xapply "'+i+'": '+e.toString()]),me)}},ae],["external","xcall",function(e,r){return e<2?me:Ta(r(0),r(1),e-2,2,r)},S],["external","xget",Pa,ae],["external","xdefined",Oa,ae],["external","xkeys",Na,ae],["external","xlock",ja,ae],["external","xnew",Ea,S],["external","xobject",function(e){return T(e[0]===oe&&!ua(e[3]))},ae],["external","xset",Aa,ae],["debug","breakpoint",ea,S],["debug","debuglog",Ki,S],["debug","jsdebugger",function(e,r){var n=Ii;Ii=Li,Ki(e,r),Ii=n;debugger;return Re},S],["debug","loglevel",function(e){var r=Ii;return null===(Ii=Da(e,9))&&(Ii=r),qa(r)},ae],["debug","stacktrace",function(){return Pi(bt)},ae],["debug","stacktrap",function(e,r,n){var t,i;if(null===(e=Da(e,65535))||e<0)return me;if(r===me)return Ai(e);if(r[0]===te){if(L.negative(r[3]))return me;t=r,i=n}else i=r;return(e=Ai(e,!0))!==me&&(e[he].trap=i,t?e[he].steps=t:delete e[he].steps),e},ae],["debug","symtrace",function(e){return e[1][0]!==re?me:(Gi=e[1],Ji=Gi[1],e[1])},ue]];function Mo(e,r,n){var t=nr[O],i=t[he][e];i||(i=fa(),ja(t[he][e]=i,X)),i[he][r]||(i[he][r]=n)}function Io(){var e=nr[O];e!==me&&e[0]===oe&&ua(e[he])||(ja(e=fa(),X),nr[O]=e);var r,n=R("App"),t=n[O];for(t!==me&&t[0]===oe&&ua(t[he])||(t=fa(),n[O]=t),r=0;r<Eo.length;++r){var i=Eo[r][0],a=Eo[r][1],u=Eo[r][2],o=Eo[r][3],f=(Eo[r][4],R(a));f!==me&&f[ce]!==me||(f=Pe(a,u,o)),_(a,z)||Mo(i,a,f)}e[he].module||(e[he].module=fa()),nr=R("Naan"),R("deref"),He=R("."),Ge=R("exception"),Je=R("escape"),me=R("false"),Qe=R("`"),Ze=R("this"),Ve=R("self"),qe=R("undefined"),Fe=R("null"),Re=R("true"),Ce=R("lambda"),Ye=R("body"),R("call"),er=R("catch"),Ue=R("closure"),Be=R("function"),De=R("function&"),Xe=R("let"),ze=R("let&"),Ke=R("loop"),Le=R("macro"),R("var"),tr=R("builtin"),R("list"),ir=R("tuple"),ar=R("symbol"),ur=R("integer"),or=R("float"),fr=R("numeric"),cr=R("string"),sr=R("array"),Nr=R("arraycall"),lr=R("dictionary"),pr=R("object"),vr=R("namespace"),dr=R("nonce"),R("save"),To=R("load"),mr=R("$"),hr=R("weakmap"),yr=R("sprint"),R("xget"),R("xset"),jr=R("xcall"),R("xapply"),gr=R("xobject"),br=R("textstream"),wr=R("space"),kr=R("cr"),ra=R("breakpoint"),rr=R("interrupt")}function Wo(){function e(e,r){Ku(ir,Me(e),R(r||e)[ce])}function r(e,r){Ku(ir,Me(e),r)}function n(e,r){Ku(ar,Me(e),R(r||e)[ce])}function t(e,r){Ku(cr,Me(e),R(r||e)[ce])}function i(e,r){Ku(ur,Me(e),R(r||e)[ce])}function a(e,r){Ku(or,Me(e),R(r||e)[ce])}function u(e,r){Ku(sr,Me(e),R(r||e)[ce])}function o(e,r){Ku(vr,Me(e),R(r||e)[ce])}function f(e,r){Ku(vr,Me(e),r)}e("atom"),e("insert"),e("length"),e("reverse"),e("tostring"),e("tuple"),e("typeof"),r("member",Pe("member",function(e,r){return Ju(r,e)},ae,!0)),r("toarray",Pe("toarray",function(e){return aa(sr,e)},ae,!0)),r("within",Pe("within",function(e,r){return Zu(r,e)},ae,!0)),n("atom"),n("copyproc"),n("copyann"),n("interned"),n("length"),n("namespace"),n("proc","getproc"),n("putproc"),n("symbol"),n("tostring"),n("typeof"),n("value","car"),t("append","strcat"),t("atom"),t("interned"),t("length"),t("string"),t("tostring"),t("unicode"),t("typeof"),i("atom"),i("even"),i("integer"),i("negate"),i("negative"),i("numeric"),i("length"),i("positive"),i("tofloat"),i("toint"),i("tostring"),i("typeof"),i("unicode"),i("zero"),a("atom"),a("even"),a("float"),a("negate"),a("negative"),a("numeric"),a("length"),a("positive"),a("tofloat"),a("toint"),a("tostring"),a("typeof"),a("zero"),u("atom"),u("tostring"),u("totuple"),u("typeof"),o("atom"),o("typeof"),f("tostring",Pe("tostring",function(e){return e[0]===w?e[j]:me},ae,!0)),f("length",Pe("length",function(e){var r;return e[0]===w&&0<=(r=Oe.indexOf(e))?qa(Oe[r][be].length):me},ae,!0)),f("symbols",Pe("symbols",function(e){if(e[0]===w&&0<=(r=Oe.indexOf(e))){var r=Oe[r][be].slice();return r[na]=ta,Ie(r)}return me},ae,!0)),f("index",Pe("index",function(e){var r;return e[0]===w&&0<=(r=Oe.indexOf(e))?aa(ma(Oe[r][ye]),me):me},ae,!0)),f("lookup",Pe("lookup",function(e,r){var n,r=to(r);if(e[0]===w&&0<=(n=Oe.indexOf(e))){r=Oe[n][ye][r],r=Oe[n][be][r];if(r)return r}return me},ae,!0))}function $o(){for(var e in s)s.hasOwnProperty(e)&&je(e,ma(s[e]))}function _o(){A.hasOwnProperty("init-load")&&A["init-load"]()}Ft(),Io(),Wo(),$o(),this.Process=function(e,r,n){try{return n=n||"false",0<e.length&&($a(),go.SetText(e),r&&vo.WriteString("\r")),Bt()||(Ft(),Rt(_e(["loop",["catch",[["driver",n]],[[["equal","exception","driver"]]],"false"]])),n="false"),Nt=0,Dt(!1),Bt()}catch(e){return Zi(Di,"Naan internal error (101): "+e.toString()),!1}},this.GetOutput=function(){return vo.TakeText()},this.SetInput=function(e,r){go.WriteString(e),r&&go.SetEOF()},this.RunOutput=function(){try{return Nt=0,Dt(!1),vo.TakeText()}catch(e){return Zi(Di,"Naan internal error (102): "+e.toString()),null}},this.Run=function(){try{return Nt=0,Dt(!1),Bt()}catch(e){return Zi(Di,"Naan internal error (103): "+e.toString()),!1}},this.Escape=function(){try{return $a(),go.ScanReset(),go.SetText(""),vo.TakeText(),Si(_e(["internal","escape"])),!1}catch(e){return Zi(Di,"Naan internal error (104): "+e.toString()),null}},this.Banner=function(){return vo.WriteString("\rWelcome to Naan v1.7.2+2\n"),!0},this.StateSave=function(e){e=No(e);return"string"==typeof e&&e},this.StateLoad=function(e){try{return jo(JSON.parse(e))!==me}catch(e){return Zi(Di,"Naan StateLoad failed: "+e.toString()),!1}},this.StateDefault=function(){return _o(),!0},this.On=function(e,r){r?A[e]=r:delete A[e]},this.Signal=function(){$a()},this.Status=Zt,this._InheritNamespace=function(e){for(var r=Z,n=0;n<Oe.length;++n){var t,i=Oe[n];if(Ee(i[j])==e){Z.indexOf(i)<0&&(t=Z.shift(),Z.unshift(i),t&&Z.unshift(t));break}}return r},this._SetNamespace=function(e,r){var n,t=Z;return"string"==typeof e?I(We(Q(Me(e)),xe(Z)),!0):K(e)?(n=Z[0],Z=e,!r&&Z.indexOf(n)<0&&Z.push(n)):Zi(Di,"_SetNamespace: invalid argument: "+e),t},this._AddNamedObject=function(e,r){if("string"!=typeof e||0===e.length||"object"!=typeof r)return!1;r=Ie(r);return Ar(e)[1]=r,!0},this._SetValue=function(e,r){if("string"!=typeof e||0===e.length)return!1;r=r===D?Ar(e):je(e,$e(r));return r!==me},this._AddSymbolWithTarget=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("string"!=typeof r||0===r.length)return!1;var n=R(r);return n===me&&(n=Ar(r)),Ar(e),je(e,n)!==me},this._AddPropertyList=function(e,r){return"string"==typeof e&&0!==e.length&&("object"==typeof r&&function(e,r){var n,t=$e(e);if(t===me)return me;for(n=0;n<r.length;++n){var i=r[n];if("object"!=typeof i)return me;if(!(i.length<2)){var a=i[0];if("string"!=typeof a)return me;Ku(t,$e(a),$e(i[1]))}}return t}(e,r)[le])},this._SetBindingList=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("object"!=typeof r)return!1;r="string"==typeof(r=Er(r=$e(r),Z[0]))?(Zi(Di,"can't create closure: "+r),me):r;return r!==me&&(Te(e,r),!0)},this._CopyBinding=function(e,r){if("string"!=typeof e||0===e.length)return!1;if("string"!=typeof r||0===r.length)return!1;e=R(e);return e!==me&&(Te(r,e[ce]),!0)},this._Execute=function(e){if("object"!=typeof e)return!1;var r=$e(e);if(r===me)return!1;e=jt;jt=-1;r=xa((Rt(r),Dt(!(Nt=0)),Mr));return jt=e,r},this._Export=function(e,r){if(!nr)return!1;if("string"!=typeof r||0===r.length)return!1;var n=R(r);return n!==me&&(Mo(e,r,n),!0)},this._Import=function(e,r,n){if(!nr)return!1;if(r===D){var t=nr[O][he][e];if(t===D)return!1;for(var i=Object.getOwnPropertyNames(t[he]),a=0;a<i.length;++a)this._Import(e,i[a]);return!0}if("string"!=typeof r||0===r.length)return!1;if(n===D)n=r;else if("string"!=typeof n||0===n.length)return!1;var u,t=Z.indexOf(X);0<=t&&Z.splice(t,1);try{u=nr[O][he][e][he][r]}catch(e){u=!1}return!!u&&(Te(n,u[ce]),!0)}}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
 
 /* Copyright (c) 2017-2026 by Zulch Laboratories, Inc. */
 !function(St){St.NaanChannel=function(t,e){"use strict";var r,s,o,a,u,n,c=t,i=new(St.LeemonBigIntegerLib?St:require("./bigint.js")).LeemonBigIntegerLib,h="",f=!1,d=0,l=!1,g=0,v=10,T=[],x=null,S=!1,b=[],k="\n!@^&*()+-={}[]|\\:;'<>?,./~`%",m="0123456789",C="0123456789abcdefghijklmnopqrstuvwxyz",O="bfnrt",L="\b\f\n\r\t",I=1e3,p=!1,w=new Array("::","++","--","~=","..",">>","<<","==","!=","<=",">=","%=","/.",".*","+=","-=","*=","/=","&=","|=","^=","||","&&","^^","**","@*","@=","@[","->","=>",";;",";>","$$",":=","$$$","===","!==","...","..<","<=>","<<=",">>=");function R(t){T.push(t),--d}e&&e.Line&&(g=e.Line),e&&e.Column&&(d=e.Column),this.Reset=function(){h="",l=f=!1,g=d=0,v=10,T=[],x=null,I=1e3,this.ScanReset()},this.SetHTML=function(t){p=t},this.Radix=function(){return v},this.SetRadix=function(t){var e=v;return v=t,e},this.NSinfix="::",this.IsBreak=function(t){return"\\"!=t&&0<=k.indexOf(t)},this.QuoteString=function(t){for(var e,n='"',i=0;i<t.length;++i){if("\\"==(e=t.substring(i,i+1))||'"'==e)n+="\\";else{if(0<=(r=L.indexOf(e))){n+="\\"+O.substring(r,r+1);continue}if(e.charCodeAt(0)<32){var r=e.charCodeAt(0).toString(16).toLowerCase();0===r.length?r="00":1==r.length&&(r="0"+r),n+="\\u00"+r;continue}}n+=e}return n+'"'},this.QuoteSymbol=function(t){var e=!1,n=!1;if(1<t.length){if(0<=w.indexOf(t))return t;for(var i,r="",s=0;s<t.length;++s)"#"==(i=t.substring(s,s+1))?(n&&(r+="\\"),n=!(e=!0)):e?n=e=!1:(" "==i||"\\"==i||'"'==i||0<=k.indexOf(i))&&(r+="\\",n=!0),r+=i;return r}return"\\"==t.charAt(0)||'"'==t.charAt(0)?"\\"+t.charAt(0):t},this.IntToString=function(t,e,n){if(e)return"0x"+i.bigInt2str(t,16).toLowerCase();n=n||v;e="";i.negative(t)&&(t=i.negate(t),e="-");n=i.bigInt2str(t,n).toLowerCase();return m.indexOf(n.substring(0,1))<0&&(e+="0"),e+n},this.FloatToString=function(t,e){e=t.toString(e);return!isNaN(t)&&isFinite(t)&&e.indexOf(".")<0&&e.indexOf("e")<0?e+".0":e},this.ListQuote=function(t){return"("==t||")"==t||","==t||"`"==t||"."==t?"`"+t:t},this.DottedPairToString=function(t,e){return this.ListQuote(t)+" . "+this.ListQuote(e)},this.ListToString=function(t){for(var e="(",n=0;n<t.length;++n)1<e.length&&(e+=" "),e+=this.ListQuote(t[n]);return e+=")"},this.EOF=function(){return 0===h.length&&f},this.SetEOF=function(){f||(f=!0,c.Signal(this))},this.Full=function(){return I&&h.length>I},this.SetWriteLimit=function(t){I="number"==typeof t?t:1e3},this.WriteString=function(t){var e,n,i=0===h.length;if(p)for(n=0;n<t.length;++n)"\n"===(e=t.substring(n,n+1))?(h+="<br>",d=0,++g):(h+=e,++d);else for(h+=t,n=0;n<t.length;++n)"\n"===(e=t.substring(n,n+1))?(d=0,++g):"\r"===e?d=0:++d;i&&c.Signal(this)},this.TextAvail=function(){return h.length},this.TakeText=function(){var t=h,e=this.Full();return h="",e&&c.Signal(),t},this.SetText=function(t){h=t,S&&c.Signal(this)},this.AddText=function(t){f=!1,h+=t,S&&c.Signal(this)},this.ReadChar=function(){var t;if(0<T.length)++d,t=T.pop();else{if(S=0===h.length)return null;if(t=h.substring(0,1),h=h.substring(1),"\r"==t||"\n"==t){if("\r"==x&&"\n"==t)return x=t,this.ReadChar();d=0,l=!(t="\n"),++g}else!l&&t.trim()&&(l=d),++d}return x=t},this.UnreadChar=function(t){R(t)},this.ReadReady=function(){var t=h.length;return t+=T.length},this.LastChar=function(t){return T.slice(-1)[0]},this.Line=function(){return g},this.Column=function(){return d},this.CommentLoc=function(){return b};this.Save=function(){var t={magic:"NaanIO_1.0"};return t.text=h,t.inputEOF=f,t.column=d,t.lineIndent=l,t.line=g,t.radix=v,t.scanLast=T,t.lastread=x,t.scanState=r,t.scanSkipQuote=s,t.token=o,t.codeString=a,t.nofloat=u,t.commentLoc=b,t.tokenStart=n,t},this.Load=function(t){return t.version!=kMagic?(Reset(),!1):(h=t.text,f=t.inputEOF,d=t.column,l=t.lineIndent,g=t.line,v=t.radix,T=t.scanLast,x=t.lastread,r=sstate.scanState,s=t.scanSkipQuote,o=t.token,a=t.codeString,u=t.nofloat,b=t.commentLoc,n=t.tokenStart,!0)};var A=34,F=39,y=42,N=47,Q=92,$=32,E=13,B=10,H=9,j=117,q=120,M=120,W=46,z=43,D=45,P=101,U=69,_=35,G=0,J=1,K=2,V=3,X=4,Y=5,Z=6,tt=7,et=8,nt=9,it=10,rt=11,st=12,ot=13,at=14,ut=15,ct=16,ht=17,ft=18,dt=19,lt=20,gt=21,vt=22,Tt=23,xt=24;this.ScanReset=function(){r=G,a=o="",u=!(T=[])},this.ScanReset(),this.kTTSymbol=1,this.kTTInteger=2,this.kTTHexInteger=3,this.kTTString=4,this.kTTComment=5,this.kTTCommentLine=6,this.kTTFloat=7,this.kTTNewline=8,this.ReadToken=function(){for(var t=null;;){if(r==G&&0===o.length&&(n={line:g,column:d}),null===(e=this.ReadChar())&&0===o.length)return null;if(null===e&&!f)return null;if(null===e||function(t){var e,n,i=t.charCodeAt(0);switch(i==E&&(i=B),r){case G:switch(i){case $:case H:return u=!1,0<o.length?1:void 0;case B:return u=!1,0===o.length?o="\n":R(t),1;case N:return 0<o.length?(R(t),1):(r=K,void(o=t));case Q:return void(r=Z);case A:return r=nt,void(s=l);case F:return void(r=ot);case _:return o+=t,void(r=et);case D:if(u&&0===o.length)return o=t,void(r=xt)}return 0<=k.indexOf(t)?0===o.length?(o=t,void(r=J)):(R(t),1):(0===o.length&&0<=m.indexOf(t)&&(r=ht),void(o+=t));case K:if(i==N)return r=Y,o+=t,void(b=[g,d-2]);if(i==y)return r=V,o+=t,void(b=[g,d-2]);r=J;case J:return 0<=w.indexOf(o+t)?void(o+=t):(R(t),1);case V:return o+=t,void(i==y&&(r=X));case X:return(o+=t,i==N)?1:void(i!=y&&(r=V));case Y:return i==B?1:void(o+=t);case Z:return i==B?void(r=G):0<=(e=O.indexOf(t))?(o+=L.substring(e,e+1),void(r=G)):(o+=t,void(r=i==_?et:tt));case tt:if(i==Q)r=Z;else{if(0<=k.indexOf(t)||i==$||i==H||i==B)return R(t),r=G,1;o+=t,r=G}return;case et:return o+=t,void(r=0<=k.indexOf(t)?tt:G);case xt:if("0"==t)return r=G,R(t),1;if(0<=m.indexOf(t))r=ht;else{if(!(0<=w.indexOf(o+t)))return r=G,R(t),1;r=J}return void(o+=t);case nt:return i==Q?void(r=it):i==A||(0===d&&i===B||!(d<=s)||t.trim())&&void(o+=t);case it:return i==q?(r=rt,void(a="")):i==j?(r=st,void(a="")):(0<=(e=O.indexOf(t))?o+=L.substring(e,e+1):o+=t,void(r=nt));case rt:return void(2<=(a+=t).length&&(o+=String.fromCharCode(parseInt(a,16)),r=nt));case st:return void(4<=(a+=t).length&&(o+=String.fromCharCode(parseInt(a,16)),r=nt));case ot:return i==Q?void(r=at):i==F||void(o+=t);case at:return i==q?(r=ut,void(a="")):i==j?(r=ct,void(a="")):(0<=(e=O.indexOf(t))?o+=L.substring(e,e+1):o+=t,void(r=ot));case ut:return void(2<=(a+=t).length&&(o+=String.fromCharCode(parseInt(a,16)),r=ot));case ct:return void(4<=(a+=t).length&&(o+=String.fromCharCode(parseInt(a,16)),r=ot));case ht:if(m.indexOf(t)<0)if(i==W){if(u)return R(t),1;r=lt}else if(i==P||i==U)r=vt;else if(0<=(n=C.indexOf(t.toLowerCase()))&&n<v)r=ft;else{if("0"!=o||i!=M)return R(t),1;r=dt}return void(o+=t);case ft:return(n=C.indexOf(t.toLowerCase()))<0||v<=n?(R(t),1):void(o+=t);case dt:return(n=C.indexOf(t.toLowerCase()))<0||16<=n?(R(t),1):void(o+=t);case lt:return m.indexOf(t)<0?(r=ht,R(t),R("."),1):(o+=t,void(r=gt));case gt:if(m.indexOf(t)<0){if(i!=P&&i!=U)return R(t),1;r=vt}return void(o+=t);case vt:return(r=Tt,m.indexOf(t)<0&&i!=z&&i!=D)?(R(t),1):void(o+=t);case Tt:return m.indexOf(t)<0?(R(t),1):void(o+=t)}}(e)){switch(r){case J:case G:case K:u="."==o,t="\n"==o?this.kTTNewline:this.kTTSymbol;break;case ht:case ft:o=o.charCodeAt(0)==D?i.negate(i.str2bigInt(o.substring(1),v,1)):i.str2bigInt(o,v,1),t=this.kTTInteger;break;case dt:o=i.str2bigInt(o.substring(2),16,1),t=this.kTTHexInteger;break;case nt:case ot:t=this.kTTString;break;case V:if(!f)return null;t=!1;break;case X:t=this.kTTComment;break;case Y:t=this.kTTCommentLine;break;case lt:case gt:case vt:case Tt:t=this.kTTFloat;break;default:t=!1}r=G;var e={token:o,type:t,loc:n};return o="",e}}}}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
 
 /* Copyright (c) 2017-2026 by Zulch Laboratories, Inc. */
-!function(e){e.BootLingo=function(e){"use strict";var t=e._SetNamespace("Lib");e._CopyBinding("equal","=="),e._CopyBinding("setq","="),e._CopyBinding("and","&&"),e._CopyBinding("or","||"),e._CopyBinding("loop","while"),e._Import("number","difference","-"),e._Import("number","greater",">"),e._Import("number","lesser","<"),e._Import("number","times","*"),e._Import("number","plus","+"),e._Import("number","quotient","/"),e._Import("number","quotient","/."),e._Import("number","mod","%"),e._SetValue("echo",[]),e._SetValue("err",[]),e._SetValue("rdsDriver"),e._SetBindingList("^",["macro","^",["ex1","ex2"],["list",["`","^"],"ex1","ex2"]]),e._SetBindingList("!",["macro","!",["ex1"],["list",["`","!"],"ex1"]]),e._SetBindingList("~",["macro","~",["ex1"],["list",["`","~"],"ex1"]]),e._SetBindingList("~=",["macro","~=",["ex1","ex2"],["list",["`","~="],"ex1","ex2"]]),e._SetBindingList("#[",["macro","#[",["ex1","ex2"],["list",["`","#["],"ex1","ex2"]]),e._SetBindingList("dereflist",["macro","dereflist","x",["cons","dereflist","x"]]),e._SetBindingList("!=",["function","!=",["ex1","ex2"],["not",["equal","ex1","ex2"]]]),e._SetBindingList(">=",["function",">=",["ex1","ex2"],["or",["greater","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("<=",["function","<=",["ex1","ex2"],["or",["lesser","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("\\.*",["function","\\.*",["expr"],["keys","expr"]]),e._SetBindingList("@",["macro","@",["sym","write"],["=","sym",["eval","sym"]],[[["eval","write"],["put","sym"]]],["cdr","sym"]]),e._SetBindingList("@*",["function","@*",["sym"],["keys",["cdr","sym"]]]),e._SetBindingList("!==",["function","!==",["ex1","ex2"],["not",["eq","ex1","ex2"]]]),e._SetBindingList("<=>",["function","<=>",["ex1","ex2"],[["not",["||","ex1","ex2"]],0],[["||",["<","ex1","ex2"],["not","ex2"]],-1],[["||",[">","ex1","ex2"],["not","ex1"]],1],0]),e._SetBindingList("\\..",["macro","\\..",["ex1","ex2"],["list",["`","\\.."],"ex1","ex2"]]),e._SetBindingList("\\..<",["macro","\\..<",["ex1","ex2"],["list",["`","\\..<"],"ex1","ex2"]]),e._SetBindingList("subat",["function","subat",["tree","reps","false","map","pair"],["global"],["=","map",{dictionary:{}}],[[["&&",["not",["tuple","reps"]],["not",["array","reps"]]],["return","tree"]]],[[["&&",["not",["tuple",[".","reps",0]]],["not",["array",[".","reps",0]]]],["=","reps",{array:["reps"]}]]],["for",["let","lambda",["iter"],["=","iter",["iterate","reps",["`","pair"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","pair",[".","iter","$value"]],["set[","map",[".","pair",0],"pair"]]]],["function","sarray",["items","false","out","item"],["=","out",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","items",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],[".","out","push",[["recur","item"]]]]]],"out"],["function","sdict",["items","false","out","key","data"],["=","out",{dictionary:{}}],["for",["let","lambda",["iter"],["=","iter",["iterate","items",["`",["key","data"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["key","data"],[".","iter","$value"]],[[["deref","map","key"],["=","key",[".",["deref","map","key"],1]]]],["set[","out","key",["recur","data"]]]]],"out"],["call",["function","recur",["sub","false","make"],[["tuple","sub"],["while","false",[["not",["not",["empty","sub"]]]],["push",["recur",["pop","sub"]],"make"]],["reverse","make"]],[["array","sub"],["sarray","sub"]],[["dictionary","sub"],["sdict","sub"]],[["&&",["deref","map","sub"],["==",["typeof","sub"],["typeof",[".",["deref","map","sub"],0]]]],[".",["deref","map","sub"],1]],"sub"],"tree"]]),e._SetBindingList("subatq",["macro","subatq",["tree","reps"],["subat","tree",["eval","reps"]]]),e._SetBindingList("prepad",["function","prepad",["value","length","padstr"],[[["not","padstr"],["=","padstr","$ "]]],["=","value",["tostring","value"]],[".",["strcat",[".","padstr","repeat",["length"]],"value"],"slice",[["-","length"]]]]),e._SetBindingList("postpad",["function","postpad",["value","length","padstr"],[[["not","padstr"],["=","padstr","$ "]]],["=","value",["tostring","value"]],[".",["strcat","value",[".","padstr","repeat",["length"]]],"slice",[0,"length"]]]),e._SetBindingList("map",["function","map",["targex","func","false","result","item","keylist"],[["array","targex"],["arraycall","targex","map","func"]],[["or",["dictionary","targex"],["xobject","targex"]],["=","result",["new","dictionary"]],["=","keylist",["keys","targex"]],["for",["let","lambda",["iter"],["=","iter",["iterate","keylist",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["xset","result","item",["call","func",["deref","targex","item"],"item","targex"]]]]],"result"],[["atom","targex"],"false"],["for",["let","lambda",["iter"],["=","iter",["iterate","targex",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","result",["cons",["call","func","item",["length","result"],"targex"],"result"]]]]],["reverse","result"]]),e._SetBindingList("iterate",["function","iterate",["target","varsym","false","iterdict","keysym"],[[["not",["||",["symbol","varsym"],["tuple","varsym"]]],["throw",["list","internal",["strcat","$iteration variable invalid: ","varsym"]]]]],["=","iterdict",{dictionary:{$target:"target",$final:"final_value"}}],["function","final_value",["dict"],"dict"],[[["tuple","target"],["=","keysym",["car","target"]],[[["&&",["symbol","keysym"],["deref",["@","keysym"],["`","\\.iterate"]]],["return",["call",["deref",["@","target"],["`","\\.iterate"]],"target","varsym"]]],[["&&",["symbol","keysym"],["deref",["@","iterate"],"keysym"]],["return",["call",["deref",["@","iterate"],"keysym"],"target","varsym"]]]],["set.","iterdict",["`","traverse"],"target"],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","last"],["-",["length","target"],1]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"tuple_next_value"]],["set.","iterdict",["`","next"],"tuple_next"]],["function","tuple_next_value",["dict"],[["empty",[".","dict","traverse"]],["set.","dict",["`","done"],"true"]],["preadjust",[".","dict","index"],"+",1],["set.","dict",["`","value"],["car",[".","dict","traverse"]]],["set.","dict",["`","traverse"],["cdr",[".","dict","traverse"]]],"false"],["function","tuple_next",["dict"],[["empty",[".","dict","traverse"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["list",["car",[".","dict","traverse"]],["preadjust",[".","dict","index"],"+",1]]],["set.","dict",["`","traverse"],["cdr",[".","dict","traverse"]]],"false"]],[["||",["array","target"],["&&",["xobject","target"],["not",["xkeys","target"]]]],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","last"],["-",[".","target","length"],1]],[[["not",[".","iterdict","last"]],["set.","iterdict",["`","last"],-1]]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"array_next_value"]],["set.","iterdict",["`","next"],"array_next"]],["function","array_next_value",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["deref",[".","dict","target"],["preadjust",[".","dict","index"],"+",1]]],"false"],["function","array_next",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["preadjust",[".","dict","index"],"+",1],["set.","dict",["`","value"],["list",["deref",[".","dict","target"],[".","dict","index"]],[".","dict","index"]]],"false"]],[["&&",["object","target"],[".","target","\\.iterate"]],["return",[".","target","\\.iterate",["target","varsym"]]]],[["||",["dictionary","target"],["object","target"],["xobject","target"]],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","keys"],[".",["keys","target"],"toarray"]],["set.","iterdict",["`","last"],["-",[".",[".","iterdict","keys"],"length"],1]],[[["not",[".","iterdict","last"]],["set.","iterdict",["`","last"],-1]]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"dict_next_key"]],["set.","iterdict",["`","next"],"dict_next"]],["function","dict_next_key",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["deref",[".","dict","keys"],["preadjust",[".","dict","index"],"+",1]]],"false"],["function","dict_next",["dict","false","index"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["=","key",["deref",[".","dict","keys"],["=","index",["preadjust",[".","dict","index"],"+",1]]]],["set.","dict",["`","value"],["list","key",["deref",[".","dict","target"],"key"],"index"]],"false"]],[["not","target"],["set.","iterdict",["`","last"],["set.","iterdict",["`","index"],-1]],["set.","iterdict",["`","next"],"empty_next"],["function","empty_next",["dict"],["set.","dict",["`","done"],"true"],"true"]],["throw",["list","internal",["strcat","$don't know how to iterate ",["typeof","target"]]]]],"iterdict"]),e._SetBindingList("sleep",["closure","sleep",["msec"],["=","msec",["||","msec",0]],[".",["future",["function","sleep","false","true"],"msec"],"wait","false"]]),e._SetBindingList("await",["closure","await",["promise","timeout","false","pending"],[[["not","promise"],["throw",["list","internal","$await on false promise"]]]],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[["identity","timeout"],[".","pending","wait",["timeout",["list",["Error",["strcat","$await timeout after ","timeout","$ msec"]]]]]],[".","pending","wait","false"]]),e._SetBindingList("asyncArray",["closure","asyncArray",["elements","maxActive","worker","false","pending","results"],[[["not",["numeric",[".","elements","length"]]],["return","false"]]],["=","results",{array:[]}],["=","pending",["new","nonce"]],["set.","pending",["`","active"],0],["set.","pending",["`","index"],0],["set.","pending",["`","running"],{array:[]}],["closure","processOne",["index","false","entry"],["preadjust",[".","pending","active"],"+",1],["set[",[".","pending","running"],"index","true"],["=","entry",["deref","elements","index"]],["function","cancel",["result"],["sprint"],["done","index","result"]],["future",["function","coProcess",["false","result"],["catch",[["=","result",["worker","entry","index","cancel"]]],"false",[["sprint"],["done","index","result"]]]],0]],["function","done",["index","result"],[[["deref",[".","pending","running"],"index"],["set[","results","index","result"],["preadjust",[".","pending","active"],"-",1],["set[",[".","pending","running"],"index","false"]]],["doMore"]],["function","doMore","false",[["&&",["==",[".","pending","active"],0],[">=",[".","pending","index"],[".","elements","length"]]],[".","pending","signal",["results"]]],["while","false",[["not",["&&",["<",[".","pending","active"],"maxActive"],["<",[".","pending","index"],[".","elements","length"]]]]],["processOne",["postadjust",[".","pending","index"],"+",1]]]],["doMore"],"pending"]),e._SetBindingList("syncAdapter",["function","syncAdapter","args",["call",["closure","syncWaiter",["proc","arglist","false","pending"],["=","pending",["new","nonce"]],["apply","proc",["reverse",["reverse","arglist"],["list",["function","lambda",["error","data"],[".","pending","signal",[["list","error","data"]]]]]]],[".","pending","wait",["proc"]]],["pop","args"],"args"]]),e._SetBindingList("asyncResult",["closure","asyncResult","args",[".",["future",["function","asyncResultF","false",["apply",["pop","args"],"args"]]],"run","false"]]),e._SetBindingList("jsInstanceOf",["function","jsInstanceOf",["item","constructor"],[["xobject","item","constructor"],["loop","false",[[["not","item"],"false",["break"]],[["eq","item",[".","constructor","prototype"]],["break"]],["=","item",[".",[".","js","o"],"getPrototypeOf",["item"]]]]]]]),e._SetBindingList("jsTypedArray",["function","jsTypedArray",["item"],[[["not",["xobject","jsTypedArrayType"]],[[".","js","w"],["=","jsTypedArrayType",[".",[".","js","o"],"getPrototypeOf",[[".",[".","js","w"],"Uint8Array"]]]]],["=","jsTypedArrayType",[".",[".","js","o"],"getPrototypeOf",[[".",[".","js","g"],"Uint8Array"]]]]]],["||",["jsInstanceOf","item","jsTypedArrayType"],["jsInstanceOf",[".","item","constructor"],"jsTypedArrayType"]]]),e._SetBindingList("makeActivator",["closure","makeActivator",["nslist","false","checkns","targns"],["=","checkns",["nscaller"]],[[["not","nslist"],["=","nslist",["nsactive"]]]],["=","targns",["car","nslist"]],["enclose",["function","lambda","false",[["eq","checkns",["nscaller"]],["nsactive","nslist"]],["throw",[".","$activate ","concat",[[".","nslist","tostring"],"$ needs ",[".","checkns","tostring"],"$ not ",[".",["nscaller"],"tostring"]]]]],"targns"]]),e._SetBindingList("dialect",["function","dialect",["id"],[["identity","id"],[[["==","id",0],["=","id",[".",["dialect"],0]]]],[".",[".",[".","module","exports"],"Registry"],"findName",["id"]]],[".",[".",[".","module","exports"],"Registry"],"dialects","false"]]),e._SetBindingList("RuntimeOperators",["function","RuntimeOperators","false",[".",[".","module","exports"],"operators"]]),e._AddPropertyList("RuntimeLibInit",[["$.lingoInit","true"]]),e._SetBindingList("RuntimeLibInit",["function","RuntimeLibInit",["modname","false","manifest","operlist","runtimelib"],["=","manifest",["`",["=","+","-","*","/","/.","%","<",">","&&","and","||","or","^","!","~","~=","`","#[","dereflist","==","!=",">=","<=","\\.*","@","@*","eq","not","while","for","===","!==","<=>","\\..","\\..<","\\...","subat","subatq","prepad","postpad","map","iterate","sleep","await","asyncArray","syncAdapter","asyncResult","jsInstanceOf","jsTypedArray","makeActivator","dialect","RuntimeOperators","RuntimeLibInit"]]],["=","operlist",["`",["=","+","-","*","/","/.","%","<",">","&&","and","||","or","^","!","~","~=","`","#[","==","!=",">=","<=","\\.*","@","@*","eq","not","while","for","===","!==","<=>","\\..","\\..<"]]],["=","runtimelib",["`",["dereflist","subat","subatq","prepad","postpad","map","iterate","defproc","defprop","sleep","await","asyncArray","syncAdapter","asyncResult","jsInstanceOf","jsTypedArray","makeActivator","dialect"]]],["function","nsCopyproc",["sym","proc"],[["nsrights","sym"],["copyproc","sym","proc"]],[["!=",[".","sym","proc"],"proc"],["debuglog","$no rights to set sym from proc","sym","proc"]]],[[["symbol","NideBuild"],["nsCopyproc",["`","="],"setq"],["nsCopyproc",["`","+"],"plus"],["nsCopyproc",["`","-"],"difference"],["nsCopyproc",["`","*"],"times"],["nsCopyproc",["`","/"],"quotient"],["nsCopyproc",["`","/."],"quotient"],["nsCopyproc",["`","%"],"mod"],["nsCopyproc",["`","<"],"lesser"],["nsCopyproc",["`",">"],"greater"],["nsCopyproc",["`","&&"],["`","and"]],["nsCopyproc",["`","||"],["`","or"]],["nsCopyproc",["`","while"],["`","loop"]],["nsCopyproc",["`","for"],"call"],["nsCopyproc",["`","=="],"equal"],["nsCopyproc",["`","==="],["`","eq"]],["sudo",["set[",["@","tuple","true"],["`","append"],"append"]],["sudo",["set[",["@","tuple","true"],["`","subat"],"subat"]],["sudo",["set[",["@","tuple","true"],["`","map"],"map"]],["sudo",["set[",["@","array","true"],["`","map"],"map"]]]],[[["not","modname"],["=","modname",[".","module","id"]]]],[".",[".","Naan","module"],"build",["modname","$RuntimeLib",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","subat"],"subat"],["set.",[".","modobj","exports"],["`","subatq"],"subatq"],["set.",[".","modobj","exports"],["`","prepad"],"prepad"],["set.",[".","modobj","exports"],["`","postpad"],"postpad"],["set.",[".","modobj","exports"],["`","map"],"map"],["set.",[".","modobj","exports"],["`","iterate"],"iterate"],["set.",[".","modobj","exports"],["`","operators"],[".",[".","Naan","module"],"export",["operlist"]]],["set.",[".","modobj","exports"],["`","runtimelib"],[".",[".","Naan","module"],"export",["runtimelib"]]],["sudo",["set.","Naan",["`","runtimelib"],[".",[".","modobj","exports"],"runtimelib"]]]]]]]),e._Execute(["RuntimeLibInit","$Lib"]),e._SetBindingList("defproc",["macro","defproc","exlist",["call",["function","lambda",["false","procname"],["=","procname",["caadr","exlist"]],[["!=",["namespace","procname"],["car",["nsactive"]]],["printline","$cannot define ",["car","exlist"],"$ ","procname","$ in ",["tostring",["car",["nsactive"]]]],"false"],["=","exlist",["enclose","exlist"]],[[["&&",["!=",["getproc","procname"],"exlist"],["getproc","procname"]],["printline","$ ==> redefined: ","procname"]]],["putproc","procname","exlist"],"procname"]]]),e._SetBindingList("defprop",["macro","defprop",["ex1","ex2","ex3","false","fbind","procname"],[["member",["car","ex3"],["`",["function","function&","macro","closure","let","let&"]]],["=","procname",["compress",["list","ex1","ex2"]]],[["!=",["namespace","procname"],["car",["nsactive"]]],["printline","$cannot define property ",["car","ex3"],"$ ","procname","$ in ",["tostring",["car",["nsactive"]]]],"false"],["=","fbind",["enclose",["cons",["car","ex3"],["cons","procname",["cddr","ex3"]]]]],[[["&&",["get","ex1","ex2"],["!=",["get","ex1","ex2"],"fbind"]],["print","$ ==> redefined: "],["printline","ex1","space","ex2"]]],["putproc","procname","fbind"],["put","ex1","ex2","procname"],"ex1"],[["==",["get","ex1","ex2"],"ex3"],"ex1"],[[["get","ex1","ex2"],["print","$ ==> redefined: "],["printline","ex1","space","ex2"]]],["put","ex1","ex2","ex3"],"ex1"]),e._SetBindingList("DefineLanguage",["closure","DefineLanguage",["langname","grammar","parser","unparser"],["closure","dialect",["name","operators","enterDNS","false","dobj"],["=","dobj",["new","object","this"]],["set.","dobj",["`","ns"],[".",["nsactive"],0]],["set.","dobj",["`","name"],"name"],["set.","dobj",["`","grammar"],["new","grammar"]],["set.","dobj",["`","operators"],"operators"],["set.","dobj",["`","exunparse"],{dictionary:{}}],["set.","dobj",["`","parser"],"parser"],["set.","dobj",["`","unparser"],"unparser"],["set.","dobj",["`","parse"],["function","parse",["source"],[".","dobj","parser",["source",[".","dobj","grammar"],[".","dobj","operators"]]]]],["set.","dobj",["`","parseErrorString"],["function","parseErrorString",["error"],["langParseErrorString","error"]]],["set.","dobj",["`","unparse"],["function","unparse",["expr","options"],[".","dobj","unparser",["expr","options",[".","dobj","grammar"],[".","dobj","exunparse"]]]]],["set.","dobj",["`","print"],["function","print",["expr","options"],[".",[".","dobj","unparser",["expr","options",[".","dobj","grammar"],[".","dobj","exunparse"]]],"string","false"]]],["set.","dobj",["`","defhook"],["function","defhook",["hook","false","returner","newsym"],["=","returner",["makeActivator"]],["enterDNS"],["=","newsym",["compress","hook"]],["copyproc","newsym","hook"],["returner"],"newsym"]],["set.","dobj",["`","defunparse"],["function","defunparse",["sym","proc"],["set[",[".","dobj","exunparse"],"sym","proc"]]],["set.","dobj",["`","redefine"],["function","redefine",["sym","proc","false","returner"],["=","returner",["makeActivator"]],["enterDNS"],["=","sym",["compress","sym"]],[[["tuple","proc"],["putproc","sym","proc"]],["copyproc","sym","proc"]],["returner"],"sym"]],["set.","dobj",["`","defatt"],["function","defatt",["sym","key","value","false","returner"],["=","returner",["makeActivator"]],["enterDNS"],["=","sym",["compress","sym"]],["put","sym","key","value"],["returner"],"sym"]],["set.","dobj",["`","defsym"],["function","defsym",["syms","false","cursyms"],["=","returner",["makeActivator"]],["enterDNS"],[[["atom","syms"],["=","cursyms",["compress","syms"]]],["while","false",[["not",["not",["atom","syms"]]]],["push",["compress",["pop","syms"]],"cursyms"]],["=","cursyms",["reverse","cursyms"]]],["returner"],"cursyms"]],["set.","dobj",["`","require"],["function","drequire",["path","reload","false","returner","result"],["=","returner",["makeActivator"]],["enterDNS"],["=","result",["require","path","options","dobj"]],["returner"],"result"]],["set.","dobj",["`","info"],["function","info","false",{dictionary:{$name:[".","dobj","name"],$grammar:[".","dobj","grammar"],$operators:[".","dobj","operators"],$parser:[".","dobj","parser"],$unparser:[".","dobj","unparser"],$namespace:[".","dobj","ns"]}}]],["set.","dobj",["`","destroy"],["function","destroy","false",[[["not",[".","dobj","module"]],["return","false"]]],[".",[".",[".","module","exports"],"Registry"],"unregister",["dobj"]],[".",[".","dobj","module"],"destroy","false"],["set.","dobj",["`","module"],"false"],"true"]],["set.","dobj",["`","derive"],["function","derive",["diname","operators","false","newdialect"],[[["not","operators"],["=","operators",[".","dobj","operators"]]]],[[[".",[".",[".","module","exports"],"Registry"],"findName",["diname"]],"false"]],["=","newdialect",["initialize","diname","operators"]],["set.","newdialect",["`","parent"],"dobj"],"newdialect"]],"dobj"],["function","initialize",["langname","operators","false","newdialect","dialsym"],[".",[".","Naan","module"],"build",[[".","$Lang_","concat",["langname"]],"$RuntimeLib",["function","lambda",["modobj","compobj","false","locops"],[".",[".","Naan","module"],"letimport",["operators"]],["=","dialsym",["compress","$Dialect"]],["=","locops",{dictionary:{}}],["for",["let","lambda",["iter"],["=","iter",["iterate","operators",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["set[","locops","key",["compress","key"]]]]],["set[","locops","dialsym","dialsym"],["=","newdialect",["dialect","langname","locops",["makeActivator"]]],["set.","newdialect",["`","module"],"modobj"],["call",["closure","lambda",["dialect"],["putproc","dialsym",["function","lambda","false","dialect"]]],"newdialect"],["assign","dialsym","newdialect"]]]],[".",[".",[".","module","exports"],"Registry"],"register",["langname","newdialect"]],"newdialect"],["initialize","langname",["RuntimeOperators"]]]),e._SetBindingList("Registry",["closure","Registry",["false","registry"],["=","registry",["new","object","this"]],["set.","registry",["`","languages"],{array:[]}],["set.","registry",["`","register"],["function","register",["name","dobj","false","lang"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["==",[".","lang","name"],"name"],["set.","lang",["`","dialect"],"dobj"],["return"]]]]]],[".",[".","registry","languages"],"push",[{dictionary:{$name:"name",$dialect:"dobj"}}]]]],["set.","registry",["`","unregister"],["function","unregister",["dobj"],["set.","registry",["`","languages"],[".",[".","registry","languages"],"filter",[["function","lambda",["item"],["!==",[".","item","dialect"],"dobj"]]]]],"true"]],["set.","registry",["`","findName"],["function","findName",["name","false","lang"],["=","name",["tostring","name"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["==",[".","lang","name"],"name"],["return",[".","lang","dialect"]]]]]]],"false"]],["set.","registry",["`","findNamespace"],["function","findNamespace",["ns","false","lang"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["===",[".",[".","lang","dialect"],"ns"],"ns"],["return",[".","lang","dialect"]]]]]]],"false"]],["set.","registry",["`","dialects"],["function","dialects","false",[".",[".",[".","registry","languages"],"map",[["function","lambda",["item"],[".","item","name"]]]],"totuple"]]],"registry"]),e._SetBindingList("ParsEnvironment",["closure","ParsEnvironment",["dialect","envName","false","penv","gohome","localnaan"],[[["not","envName"],["=","envName","$Parsenv"]]],["=","penv",["new","object","this"]],["=","gohome",["makeActivator"]],[[["||",["not",[".","dialect","parser"]],["not",[".","dialect","unparser"]]],["return","false"]]],["set.","penv",["`","ns"],["new","namespace","envName"]],[[["not",[".","penv","ns"]],["return","false"]]],["nsactive",["cons",[".","penv","ns"],[".",["nsactive"],-2]]],["set.","penv",["`","gons"],["makeActivator"]],["set.","penv",["`","saves"],{dictionary:{$exception:[".",["`","exception"],"proc"],$require:[".",["`","require"],"proc"],$sudo:[".",["`","sudo"],"proc"],$naan:"Naan"}}],["set.","penv",["`","locals"],["letlocal","Naan","require","sudo"]],["=","localnaan",[".",[".","penv","locals"],0]],["assign","localnaan",["new",[".",[".","penv","saves"],"naan"]]],["putproc",[".",[".","penv","locals"],1],["function","lambda","false",["return",{dictionary:{}}]]],["putproc",[".",[".","penv","locals"],2],"false"],["gohome"],["function","evalgo","false",[".","penv","gons","false"]],["function","evalhome","false",["gohome"]],["set.","penv",["`","eval"],["closure","evalf",["expr","false","result"],["evalgo"],["catch",[["=","result",["eval","expr"]]],[[["identity","true"],["=","result","exception"]]],[["evalhome"]]],"result"]],["set.","penv",["`","evalq"],["macro","evalq",["expr"],["evalf","expr"]]],["set.","penv",["`","parse"],["function","parse",["text","options","false","output","source","xchan","errors","error","expr","saves","errtext","row","lastrow","outext"],["=","output",{dictionary:{$errors:{array:[]},$annotations:{array:[]},$text:{array:[]},$exprs:{array:[]},$results:{array:[]}}}],["=","source",["new","textstream","text",["`","string"]]],["=","xchan",["textstreams",["list","source","source"]]],["catch",[[".","penv","gons","false"],["loop","false",["catch",[[".",[".","penv","saves"],"sudo",[["putproc",["`","exception"],"false"]]],["=",["errors","expr"],[".","dialect","parse",["source"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","errors",["`","error"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","error",[".","iter","$value"]],["=","errtext",["langParseErrorString","error"]],["=","row",[".",[".","error","at"],0]],[[["!=","row","lastrow"],[".",[".","output","$annotations"],"push",[{dictionary:{$row:"row",$column:[".",[".","error","at"],1],$text:"errtext",$type:"$error"}}]],["=","lastrow","row"]]],[".",[".","output","errors"],"push",["errtext"]]]]],[[["identity","expr"],[".",[".","output","exprs"],"push",["expr"]],["=","expr",["call",["function","lambda","false",["evalactive","expr"]]]],[".",[".","output","results"],"push",["expr"]],[[".","options","pretty"],["set.","output",["`","pretty"],{array:[]}],[["==",[".",[".","source","tokenlast","false"],"atom"],["`",";>"]],[".",[".","output","pretty"],"push",[["tostring","expr",{dictionary:{$quote:"true"}}]]]],[["!=",[".",[".","source","tokenlast","false"],"atom"],["`",";;"]],[".",[".","output","pretty"],"push",[[".","dialect","print",["expr"]]]]]]]]],"false",[[".",[".","penv","saves"],"sudo",[["putproc",["`","exception"],[".","saves","exception"]]]]]]]],[[["identity","true"],[["and",["==",["tostring",["car","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]]],[["and",["==",["tostring",["car","exception"]],"$internal"],["string",["second","exception"]]],[".",[".","output","errors"],"push",[["second","exception"]]]],[["ErrorObject","exception"],[".",[".","output","errors"],"push",[[".","$exception: ","concat",[["ErrorString","exception"]]]]]],[".",[".","output","errors"],"push",[[".","$exception: ","concat",["exception"]]]]]],[["gohome"],["textstreams","xchan"],["=","outext",[".",[".","source","taketext","false"],"trim","false"]],[[">",[".","outext","length"],0],["set.","output",["`","text"],["new",[".","outext","split",["$\n"]]]]]]],"output"]],["set.","penv",["`","unparse"],["function","unparse",["false","options","text","sym","didprop","key"],["=","options",{dictionary:{$wrapMaxCol:240}}],["=","text","$"],["for",["let","lambda",["iter"],["=","iter",["iterate",["symlist",[".","penv","ns"]],["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],[[["not",["eq","sym",["car","sym"]]],["=","text",[".","text","concat",["sym","$ = ",["car","sym"],"$;;\n\n"]]]]],["=","didprop","false"],["for",["let","lambda",["iter"],["=","iter",["iterate",["@*","sym"],["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],[[["!=",[".","key","charAt",[0]],"$."],["=","didprop","true"],["=","text",[".","text","concat",["sym","$@","key","$ = ",["deref",["@","sym"],"key"],"$;;\n"]]]]]]]],[[["identity","didprop"],["=","text",[".","text","concat",["$\n"]]]]],[[["eq",[".",[".",[".","sym","proc"],1],"namespace"],[".","penv","ns"]],["=","text",[".","text","concat",[[".","dialect","print",[[".","sym","proc"],"options"]],"$;\n\n"]]]]]]]],"text"]],["set.","penv",["`","destroy"],["function","destroy","false",["set.","penv",["`","ns"],["delete",[".","penv","ns"]]]]],"penv"]),e._AddPropertyList("LanguagesInit",[["$.lingoInit","true"]]),e._SetBindingList("LanguagesInit",["function","LanguagesInit",["false","manifest"],["=","manifest",["`",["defproc","defprop","DefineLanguage","Registry","ParsEnvironment","LanguagesInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$Languages",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DefineLanguage"],"DefineLanguage"],["set.",[".","modobj","exports"],["`","ParsEnvironment"],"ParsEnvironment"],["set.",[".","modobj","exports"],["`","Registry"],["Registry"]]]]]]),e._Execute(["LanguagesInit"]),e._SetBindingList("langParser",["function&","langParser",["source","lang","operators","false","result"],["catch",[["=","langErrors",{array:[]}],["=","result",["langParse1",["tokenread"],0]],[[["==",[".","langErrors","length"],0],["=","result",["langStrip","result","operators"]]]],[[["&&",["==",[".","langErrors","length"],0],"tokenlast",["!=",[".","tokenlast","atom"],"cr"],["not",["atTerminator"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$operator missing"}}]]],[["!=",[".","langErrors","length"],0],[".","source","comments","false"],["while","false",[["not",["not",["atTerminator"]]]],["tokenread"]]]],[[["!=",[".","langErrors","length"],0]]],"false"],[["!=",[".","langErrors","length"],0],["list","langErrors"]],["list","false","result"]]),e._SetBindingList("recurParse",["function","recurParse",["text","sloc"],["call",["function&","recurParse1",["source","false","result"],["catch",[["=","result",["langParse1",["tokenread"],0]],[["&&",["==",[".","langErrors","length"],0],"tokenlast",["!=",[".","tokenlast","atom"],"cr"],["not",["atTerminator"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$operator missing"}}]]],[[["identity","true"],"false"]],"false"],"result"],["new","textstream","text","sloc"]]]),e._SetBindingList("langParseErrorString",["function","langParseErrorString",["error","false","output"],[[[".","error","memo"],["=","output",[".","error","memo"]]],["=","output","$parse error"]],[[[".","error","at"],["=","output",[".","output","concat",["$ at (",["+",[".",[".","error","at"],0],1],"$, ",["+",[".",[".","error","at"],1],1],"$)"]]]]],[[[".","error","found"],["=","output",[".","output","concat",["$ found ",[".","error","found"]]]]]],[[[".","error","expected"],["=","output",[".","output","concat",["$ expected ",[".","error","expected"]]]]]],[[["||",[".","error","start"],[".","error","startat"]],["=","output",[".","output","concat",["$ starting"]]],[[["&&",[".","error","start"],["!=",[".","error","start"],"$\n"]],["=","output",[".","output","concat",["$ with ",[".","error","start"]]]]]],[[".","error","startat"],["=","output",[".","output","concat",["$ at (",["+",[".",[".","error","startat"],0],1],"$, ",["+",[".",[".","error","startat"],1],1],"$)"]]]]]],[".","output","replace",[["RegExp","$\n","$g"],"$␍"]]]),e._SetBindingList("tokenread",["function","tokenread","false",["=","tokenlast",[".","source","tokenread","false"]]]),e._SetBindingList("tokenpush",["function","tokenpush",["token"],["=","tokenlast",[".","source","tokenpush",["token"]]]]),e._SetBindingList("tokenmatch",["function","tokenmatch",["pattern","false","result"],["=","result",[".","source","tokenmatch",["pattern"]]],["=","tokenlast",[".","source","tokenlast","false"]],"result"]),e._SetBindingList("tokenpass",["function","tokenpass",["pattern"],["=","tokenlast",[".","source","tokenpass",["pattern"]]]]),e._SetBindingList("passNewline",["function","passNewline",["testeof"],["=","tokenlast",[".","source","tokenpass",["cr","testeof"]]]]),e._SetBindingList("atTerminator",["function","atTerminator","false",["tokenmatch",["`",[";",";;",";>"]]]]),e._SetBindingList("atDelimiter",["function","atDelimiter","false",["tokenmatch",["`",[";",";;",";>",")",",","}","]"]]]]),e._SetBindingList("langPassSeparator",["function","langPassSeparator","false",["=","tokenlast",[".","source","tokenpass",[["list","cr","comma"]]]]]),e._SetBindingList("langAtSeparator",["function","langAtSeparator","false",["or",["==",[".","tokenlast","atom"],"cr"],["==",[".","tokenlast","atom"],"comma"]]]),e._SetBindingList("langExprLoc",["function","langExprLoc",["expr"],[["dictionary","expr"],[".","expr","loc"]],[["atom","expr"],"false"],[["langExprLoc",["car","expr"]]],["langExprLoc",["cdr","expr"]]]),e._SetBindingList("langConsSym",["function","langConsSym",["sym","expr","exlist"],[[["tuple","sym"],["debuglog","$langConsSym warning - non-atomic token","sym"]]],["cons",{dictionary:{$atom:"sym",$loc:["langExprLoc","expr"]}},"exlist"]]),e._SetBindingList("langEnlistSym",["function","langEnlistSym","exlist",[[["tuple",["car","exlist"]],["debuglog","$langEnlistSym warning - non-atomic token",["car","exlist"]]]],["cons",{dictionary:{$atom:["car","exlist"],$loc:["langExprLoc",["second","exlist"]]}},["cddr","exlist"]]]),e._SetBindingList("langSyntax",["function","langSyntax",["expr","startoken","dict"],["=","dict",["new","dict"]],[[["identity","expr"],["set.","dict",["`","at"],["langExprLoc","expr"]],[["dictionary","expr"],["set.","dict",["`","found"],[".","expr","atom"]]]]],[[["identity","startoken"],["set.","dict",["`","start"],[".","startoken","atom"]],["set.","dict",["`","startat"],[".","startoken","loc"]]]],[".","langErrors","push",["dict"]],"false"]),e._SetBindingList("langDebuglog",["function","langDebuglog","args",["function","convlist",["expr"],[["defined","expr","atom"],[".","expr","atom"]],[["atom","expr"],"expr"],["cons",["convlist",["car","expr"]],["convlist",["cdr","expr"]]]],["call",["function","lambda",["args","false","arg","exlist"],["loop","false",[["empty","args"]],["=","arg",["pop","args"]],[[["eq","arg","`"],["push",["pop","args"],"exlist"]],["push",["convlist","arg"],"exlist"]]],["apply",[".",[".","Naan","debug"],"debuglog"],["reverse","exlist"]]],"args"]]),e._SetBindingList("langCleanup",["function","langCleanup",["tree","false","blocknest","inloop"],["function","debugCleanup","args",[["identity","false"],["apply","langDebuglog","args"]]],["function","inbody",["xbody"],[["atom","xbody"],"xbody"],["debugCleanup","$inbody:","xbody"],[[["and","inloop",["<=","blocknest",1]]],[["and",["not",["atom",["car","xbody"]]],["not",["atom",["caar","xbody"]]],["not",["atom",["caaar","xbody"]]]],["debugCleanup","$testing hoist in body:","xbody"],["=","xbody",["hoist","xbody"]]]],["cons",["inbodyitem",["car","xbody"]],["inbody",["cdr","xbody"]]]],["function","inbodyitem",["expr","false","sym"],["debugCleanup","$inbodyitem:","expr"],[["atom","expr"],"expr"],["=","sym",["car","expr"]],[["atom","sym"],["incall","expr"]],[["atom",["car","sym"]],["inwhen","expr"]],["inblock","expr","blocknest"]],["function","ineval",["expr"],[["atom","expr"],"expr"],[["atom",["car","expr"]],["incall","expr"]],["cons",["ineval",["car","expr"]],["inevalist",["cdr","expr"]]]],["function","inevalist",["expr"],[["atom","expr"],"expr"],["cons",["ineval",["car","expr"]],["inevalist",["cdr","expr"]]]],["function","inquote",["expr"],[["atom","expr"],"expr"],["cons",["inquote",["car","expr"]],["inquote",["cdr","expr"]]]],["function&","inloop",["pbody","blocknest","inloop"],["debugCleanup","$inloop:","pbody","blocknest","inloop"],["=","blocknest",0],["=","inloop","true"],["cons",["car","pbody"],["second","pbody"],["inbody",["cddr","pbody"]]]],["function&","inproc",["fbind","blocknest"],["debugCleanup","$inproc:","fbind","blocknest"],["=","blocknest",0],["cons",["car","fbind"],["cons",["second","fbind"],["cons",["inquote",["third","fbind"]],["inbody",["cdddr","fbind"]]]]]],["function","inconditem",["expr"],["debugCleanup","$inconditem:","expr"],[["atom","expr"],"expr"],["cons",["inwhen",["car","expr"]],["inconditem",["cdr","expr"]]]],["function&","incond",["expr","blocknest"],["debugCleanup","$incond:","expr"],["cons",["car","expr"],["inconditem",["cdr","expr"]]]],["function","incatch",["expr"],["debugCleanup","$incatch:","expr"],["list",["car","expr"],["inbody",["second","expr"]],["inconditem",["third","expr"]],["inbody",[".","expr",3]]]],["function","incall",["expr","false","sym"],["debugCleanup","$incall:","expr"],["=","sym",[".",["car","expr"],"atom"]],[["==","sym",["`","loop"]],["inloop","expr"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","expr"]],[["==","sym",["`","cond"]],["incond","expr",["+","blocknest",2]]],[["==","sym",["`","body"]],["inbody","expr"]],[["==","sym",["`","catch"]],["incatch","expr"]],[["==","sym","`"],["debugCleanup","$inquote:","expr"],["inquote","expr"]],["cons",["car","expr"],["inevalist",["cdr","expr"]]]],["function","inwhen",["expr","false","nexpr"],["debugCleanup","$inwhen:","expr"],["=","nexpr",["cdr","expr"]],[["&&",["not",["cdr","nexpr"]],["not",["or",["atom","nexpr"],["atom",["car","nexpr"]],["atom",["caar","nexpr"]],["atom",["caaar","nexpr"]]]]],["debugCleanup","$inwhen block","blocknest"],["=","nexpr",["hoist","nexpr"]],["cons",["incall",["car","expr"]],["inblock","nexpr","blocknest"]]],["cons",["incall",["car","expr"]],["hoist",["delbreak",["cdr","expr"],"blocknest"]]]],["function&","delbreak",["expr","blocknest"],["debugCleanup","$delbreak:","expr","blocknest"],[["atom","expr"],"expr"],[[["&&",["tuple",["car","expr"]],["tuple",["caar","expr"]],["tuple",["caaar","expr"]]],["preadjust","blocknest","+",1],["debugCleanup","$delbreak block:","blocknest"]]],["=","expr",["hoist","expr"]],[["and",["==",[".",["caar","expr"],"atom"],["`","break"]],["not",["cdr",["car","expr"]]],["<=","blocknest",1]],["debugCleanup","$did delbreak from:","expr"],["=","delbreak","true"],"false"],["cons",["inbodyitem",["car","expr"]],["delbreak",["cdr","expr"],"blocknest"]]],["function&","inblock",["expr","blocknest","false","nexpr","delbreak"],["debugCleanup","$inblock:","expr","blocknest"],[[["cdr","expr"],["=","blocknest",["+","blocknest",2]]],["=","blocknest",["+","blocknest",1]]],["=","nexpr",["inbodyitem",["car","expr"]]],[["identity","delbreak"],["debugCleanup","$did delbreak below:","nexpr"],"nexpr"],["cons","nexpr",["inbody",["cdr","expr"]]]],["function","hoist",["expr"],[["or",["cdr","expr"],["atom","expr"],["atom",["car","expr"]],["atom",["caar","expr"]],["atom",["caaar","expr"]]],"expr"],["debugCleanup","$hoisted:",["car","expr"]],["hoist",["car","expr"]]],["debugCleanup","$\n### in tree:","tree"],["=","blocknest",0],["ineval","tree"]]),e._SetBindingList("langErrorCheck",["function","langErrorCheck",["tree","false","xproc","proc_parent","xloop","loop_parent","xbody","blocknest"],["global","langDebuglog"],["function","debugErrorCheck","args",[["identity","false"],["apply","langDebuglog","args"]]],["function&","inbody",["lbody","xbody","false","item","more"],[["atom","lbody"],"lbody"],["debugErrorCheck","$inbody:","lbody"],["=","xbody",{dictionary:{$live:"true"}}],["=","item",["car","lbody"]],["=","more",["cdr","lbody"]],[[["atom","item"],[["&&","more",["not",["member",[".",["caar","more"],"atom"],["`",["break","return"]]]]],["langSyntax","item","false",{dictionary:{$memo:"$ignored atom in body"}}]],[["&&",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]]],["inbodyitem","item"],["inbody","more","xbody"]],["function","inbodyitem",["expr","false","sym"],["debugErrorCheck","$inbodyitem:","expr"],[["not",[".","xbody","live"]],[[["not",[".","xbody","dead"]],["langSyntax","expr","false",{dictionary:{$memo:"$dead code"}}]]],["set.","xbody",["`","dead"],"true"],"false"],[["atom","expr"],"expr"],["=","sym",["car","expr"]],[["atom","sym"],["incall","expr"]],[["atom",["car","sym"]],["inwhen","expr"]],["inblock","expr","blocknest"]],["function","ineval",["expr"],["debugErrorCheck","$ineval:","expr"],[["atom","expr"],"expr"],[["atom",["car","expr"]],["incall","expr"]],["inevalist","expr"]],["function","inevalist",["expr"],["debugErrorCheck","$inevalist:","expr"],[["atom","expr"],"expr"],["ineval",["car","expr"]],["inevalist",["cdr","expr"]]],["function","inquote",["expr","inside","false","item"],["debugErrorCheck","$inquote:","expr","inside"],[["atom","expr"],"expr"],["=","item",["car","expr"]],[[["&&","inside",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]],["inquote","item","true"],["inquote",["cdr","expr"],"inside"]],["function","inargs",["expr","proc","narg","false","item","quoted"],["debugErrorCheck","$inargs:","expr"],[["atom","expr"],"expr"],["=","item",["car","expr"]],["=","quoted",["quotedArg","proc","narg"]],[[["tuple","item"],[["identity","quoted"],["=","item",["inquote","item","true"]]],["=","item",["incall","item"]]],[["&&",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["not","quoted"],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]],["inargs",["cdr","expr"],"proc",["+","narg",1]]],["function","inparms",["expr","false","parm","sym"],["debugErrorCheck","$inparms:","expr"],[["atom","expr"],["=","sym",[".","expr","atom"]],[["identity","sym"],[["not",["symbol","sym"]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid parameter"}}]],["set[",[".","xproc","parameters"],"sym","expr"],[[".","xproc","dynbind"],["findLocalSymbol","sym",[".","xproc","parent"]]]]],["=","parm",["car","expr"]],["=","sym",[".","parm","atom"]],[[["||",["not",["symbol","sym"]],["&&",["not","sym"],["!==","sym","false"]]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid parameter"}}]],[["===","sym","false"],[[".","xproc","locals"],["langSyntax","parm","false",{dictionary:{$memo:"$duplicate `local"}}]],[["atom",["cdr","expr"]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid `local"}}]],["set.","xproc",["`","locals"],{dictionary:{}}],["set.","xproc",["`","unused"],{dictionary:{}}]],[["deref",[".","xproc","parameters"],"sym"],["langSyntax","parm","false",{dictionary:{$memo:"$duplicate parameter"}}]],["set[",[".","xproc","parameters"],"sym","parm"],[[[".","xproc","locals"],["set[",[".","xproc","unused"],"sym","parm"],["set[",[".","xproc","locals"],"sym","parm"]]],[[".","xproc","dynbind"],["findLocalSymbol","sym",[".","xproc","parent"]]]],["inparms",["cdr","expr"]]],["function&","inloop",["pbody","loop_parent","false","blocknest","xloop"],["debugErrorCheck","$inloop:","pbody"],["=","xloop",{dictionary:{$tag:[".",["second","pbody"],"atom"]}}],[[["identity","loop_parent"],["set.","xloop",["`","parent"],"loop_parent"]]],["=","loop_parent","xloop"],["=","blocknest",0],["inbody",["cddr","pbody"]]],["function&","inproc",["fbind","proc_parent","false","blocknest","xproc","sym","item"],["debugErrorCheck","$inproc:","fbind"],["=","xproc",{dictionary:{$ftype:["car","fbind"],$fname:["second","fbind"],$parms:["third","fbind"],$body:["cdddr","fbind"],$procNames:{dictionary:{}},$parameters:{dictionary:{}},$undeclared:{dictionary:{}},$dynbind:["member",[".",["car","fbind"],"atom"],["`",["function&","let&"]]]}}],[[["identity","proc_parent"],["set.","xproc",["`","parent"],"proc_parent"],[[[".","proc_parent","globals"],["set.","xproc",["`","globals"],{dictionary:{}}]]],[[[".","proc_parent","root"],["set.","xproc",["`","root"],[".","proc_parent","root"]]],["set.","xproc",["`","root"],"proc_parent"]],[["&&",["!=",[".",[".","xproc","fname"],"atom"],["`","lambda"]],["deref",[".","proc_parent","procNames"],[".",[".","xproc","fname"],"atom"]]],["langSyntax",[".","xproc","fname"],"false",{dictionary:{$memo:"$duplicate procedure name"}}]],["set[",[".","proc_parent","procNames"],[".",[".","xproc","fname"],"atom"],[".","xproc","fname"]]]],["=","proc_parent","xproc"],["=","blocknest",0],["inparms",[".","xproc","parms"]],["inbody",[".","xproc","body"]],[[["not",[".","xproc","dynbind"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","xproc","unused"],["`",["sym","item"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["sym","item"],[".","iter","$value"]],["langSyntax","item","false",{dictionary:{$memo:"$unused local variable"}}]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","xproc","undeclared"],["`",["sym","item"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["sym","item"],[".","iter","$value"]],[[["not",["deref",[".","xproc","procNames"],"sym"]],[["&&",[".","xproc","parent"],[".","xproc","globals"]],["set[",[".",[".","xproc","parent"],"undeclared"],"sym","item"]],["langSyntax","item","false",{dictionary:{$memo:"$undeclared global"}}]]]]]]],["function","inconditem",["expr"],["debugErrorCheck","$inconditem:","expr"],[["atom","expr"],"expr"],["inwhen",["car","expr"]],["inconditem",["cdr","expr"]]],["function&","incond",["expr","blocknest"],["debugErrorCheck","$incond:","expr"],["inconditem","expr"]],["function","incatch",["expr"],["debugErrorCheck","$incatch:","expr"],["list",["car","expr"],["inbody",["second","expr"]],["incond",["third","expr"]],["inbody",[".","expr",3]]]],["function","incall",["expr","false","sym","loopt","item"],["debugErrorCheck","$incall:","expr"],["=","sym",[".",["car","expr"],"atom"]],[["==",[".","sym","proc"],[".",["`","loop"],"proc"]],["inloop","expr","loop_parent"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","expr","proc_parent"]],[["==","sym",["`","cond"]],["incond","expr",["+","blocknest",2]]],[["==","sym",["`","body"]],["inbody",["cdr","expr"]]],[["==","sym",["`","catch"]],["incatch","expr"]],[["==","sym","`"],["inquote","expr"]],[["==","sym",["`","global"]],[["not","xproc"],["langSyntax","false","false",{dictionary:{$at:["langExprLoc",["car","expr"]],$memo:"$global forbidden outside of a procedure"}}]],[[".","xproc","dynbind"],["langSyntax","false","false",{dictionary:{$at:["langExprLoc",["car","expr"]],$memo:"$global forbidden in function& and let&"}}]],[[["not",[".","xproc","globals"]],["set.","xproc",["`","globals"],{dictionary:{}}]]],["=","loopt",["cdr","expr"]],["while","false",[["not",["not",["empty","loopt"]]]],["=","item",["pop","loopt"]],[[["not",["symbol",[".","item","atom"]]],["langSyntax","item","false",{dictionary:{$memo:"$invalid global symbol"}}]],["set[",[".","xproc","globals"],[".","item","atom"],"item"]]]],[["||",["==","sym",["`","break"]],["==","sym",["`","continue"]]],["set.","xbody",["`","live"],"false"],[["not","xloop"],["langSyntax",["car","expr"],"false",{dictionary:{$memo:["strcat","sym","$ without loop"]}}]],["=","sym",[".",["cadr","expr"],"atom"]],[["identity","sym"],["=","loopt","xloop"],["while","false",[["not","loopt"]],[[["==","sym",[".","loopt","tag"]],["break"]]],["=","loopt",[".","loopt","parent"]]],[["not","loopt"],["langSyntax",["cadr","expr"],"false",{dictionary:{$memo:"$enclosing loop tag not found"}}]]]],[[["||",["==","sym",["`","return"]],["==","sym",["`","throw"]]],["set.","xbody",["`","live"],"false"]],[["&&",["not","sym"],["tuple",["car","expr"]]],["incall",["car","expr"]],["=","expr",["cdr","expr"]]]],["inargs",["cdr","expr"],["car","expr"],0]],["function","inwhen",["expr","false","nexpr"],["debugErrorCheck","$inwhen:","expr"],["=","nexpr",["cdr","expr"]],[["&&",["not",["cdr","nexpr"]],["not",["or",["atom","nexpr"],["atom",["car","nexpr"]],["atom",["caar","nexpr"]],["atom",["caaar","nexpr"]]]]],["debugErrorCheck","$in whenblock","blocknest"],["incall",["car","expr"]],["inblock","nexpr","blocknest"]],["incall",["car","expr"]],["inbody",["cdr","expr"]]],["function&","inblock",["expr","blocknest"],["debugErrorCheck","$inblock:","expr","blocknest"],[[["cdr","expr"],["=","blocknest",["+","blocknest",2]]],["=","blocknest",["+","blocknest",1]]],["inbodyitem",["car","expr"]],["inbody",["cdr","expr"]]],["function","findLocalSymbol",["sym","start","false","proct"],[[["==","sym",["`","Dialect"]],["return","true"]]],[[["identity","start"],["=","proct","start"]],["=","proct","xproc"]],["while","false",[["not","proct"]],[[["deref",[".","proct","procNames"],"sym"],["break"]]],[[["deref",[".","proct","parameters"],"sym"],[[[".","proct","unused"],["set[",[".","proct","unused"],"sym","undefined"]]],["break"]]],[[["deref",[".","proct","globals"],"sym"],["break"]]],["=","proct",[".","proct","parent"]]],["not",["not","proct"]]],["function","quotedArg",["proc","narg"],[[["&&",["===",[".",[".","proc","atom"],"proc"],[".",["`","."],"proc"]],["==","narg",1]],["return","true"]]],[[["&&",["===",[".",[".","proc","atom"],"proc"],[".",["`","="],"proc"]],["==","narg",0]],["return","true"]]],"false"],["debugErrorCheck","$\n### langErrorCheck tree:","tree"],["=","blocknest",0],["ineval","tree"],"tree"]),e._SetBindingList("langCorrelateComments",["function","langCorrelateComments",["locmap","false","comments","locations","locdex","loc"],["function","tupleCompare",["a","b"],[["<",[".","a",0],[".","b",0]],-1],[[">",[".","a",0],[".","b",0]],1],[["<",[".","a",1],[".","b",1]],-1],[[">",[".","a",1],[".","b",1]],1],0],["=","comments",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",["reverse",[".","source","comments","false"]],["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],[".","comments","push",[["append",[".","acom","loc"],[".","acom","text"]]]]]]],[".","comments","sort",["tupleSort"]],["=","locations",{array:[]}],["=","locdex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","locmap",["`","loc"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","loc",[".","iter","$value"]],[[["identity","loc"],[".","locations","push",[["list",[".","loc",0],[".","loc",1],"locdex"]]]]],["preadjust","locdex","+",1]]]],[".","locations","sort",["tupleSort"]],["call",["let","lambda",["false","acom","curloc","output","nextdex","nextloc"],["=","locdex",0],["=","curloc",["deref","locations",["postadjust","locdex","+",1]]],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","comments",["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["while","false",[["not",[">",[".","acom",0],[".","curloc",0]]]],["=","curloc",["deref","locations",["postadjust","locdex","+",1]]]],[[["not","curloc"],[".","output","push",[["list","false","false",[".","acom",2]]]]],[["<",[".","acom",0],[".","curloc",0]],[".","output","push",[["list",[".","curloc",2],-1,[".","acom",2]]]]],["=","nextdex","locdex"],["=","nextloc","curloc"],["while","false",[["not",["&&",["==",[".","acom",0],[".","nextloc",0]],[">",[".","acom",1],[".","nextloc",1]]]]],["=","nextloc",["deref","locations",["postadjust","nextdex","+",1]]]],[["==",[".","acom",0],[".","nextloc",0]],[".","output","push",[["list",[".","nextloc",2],0,[".","acom",2]]]],["=","locdex","nextdex"],["=","curloc","nextloc"]],[".","output","push",[["list",[".","curloc",2],1,[".","acom",2]]]]]]]],"output"]]]),e._SetBindingList("langStrip",["function","langStrip",["tree","operators","valproc"],["=","tree",["langCleanup","tree"]],["langErrorCheck","tree"],["langStripLoc","tree","operators","valproc"]]),e._SetBindingList("langStripLoc",["function","langStripLoc",["tree","operators","valproc","false","procnest","fname","locmap","nodecount","curns","nscurrent","nscore","sourcemap"],["=","curns",["nsactive"]],["=","nscurrent",[".","curns",0]],["=","nscore",[".",["nsactive","true"],1]],["function","topmap",["expr"],["function","remap",["expr"],[["dictionary","expr"],["preadjust","nodecount","+",1],[".","locmap","push",[[".","expr","loc"]]]],[["atom","expr"],["preadjust","nodecount","+",1],["debuglog","$langStripLoc: found atom:","expr"],[".","locmap","push",["false"]]],["remap",["car","expr"]],[["cdr","expr"],["remap",["cdr","expr"]]]],[["atom","expr"],"false"],[["==",[".",["car","expr"],"atom"],"`"],"true"],[["member",[".",["car","expr"],"atom"],["`",["function","function&","macro","closure","let","let&"]]],["remap","expr"],"true"],[["topmap",["car","expr"]],"true"],["topmap",["cdr","expr"]]],["function","moveatom",["item","false","sym"],[["not",["symbol",[".","item","atom"]]],[".","item","atom"]],[["&&",["interned",[".","item","atom"]],["dictionary","operators"],["deref","operators",[".","item","atom"]]]],[["&&",[".",[".","item","atom"],"proc"],["!=",[".",[".","item","atom"],"namespace"],"nscurrent"],["!=",[".",[".","item","atom"],"namespace"],"nscore"]],["=","sym",["interned",[".",[".","item","atom"],"tostring"]]],[["&&",["eq",[".","sym","namespace"],"nscurrent"],[".","sym","proc"]],"sym"],[".","item","atom"]],[".","item","atom"]],["function","inbody",["xbody","false","sym"],[["atom","xbody"],["moveatom","xbody"]],["=","sym",[".",["car","xbody"],"atom"]],[["==","sym","`"],["inquote","xbody"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","xbody","procnest"]],["split","xbody"]],["function","inquote",["expr"],[["atom","expr"],["moveatom","expr"]],["cons",["inquote",["car","expr"]],["inquote",["cdr","expr"]]]],["function","split",["expr"],[["atom","expr"],["moveatom","expr"]],["cons",["inbody",["car","expr"]],["split",["cdr","expr"]]]],["function&","inproc",["pbody","procnest","false","wasnest","fbind"],[[["=","wasnest","procnest"]],["=","procnest","true"]],["=","fbind",["cons",["split",["car","pbody"]],["split",["second","pbody"]],["split",["third","pbody"]],["split",["cdddr","pbody"]]]],[["identity","wasnest"],"fbind"],["=","fname",["second","fbind"]],[["and",["&&",["not","valproc"],"fname"],["not",["lambda","fname"]],["not",["eq",["car","fbind"],["`","let"]]]],["cons",["`","defproc"],"fbind"]],["enclose","fbind"]],["function","lmCompress",["locmap","false","entry","lastrow","lastcol","nextrow","nextcol"],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","locmap",["`","entry"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","entry",[".","iter","$value"]],["=","nextrow",[".","entry",0]],["=","nextcol",[".","entry",1]],[[["not","entry"],[".","output","push",["false"]]],[["not","lastrow"],[".","output","push",["entry"]]],[["==","lastrow","nextrow"],[".","output","push",[["-","nextcol","lastcol"]]]],[".","output","push",[["list",["-","nextrow","lastrow"],"nextcol"]]]],["=","lastrow","nextrow"],["=","lastcol","nextcol"]]]],"output"],["=","locmap",{array:[]}],["=","nodecount",0],["topmap","tree"],["=","tree",["inbody","tree"]],[[["and","fname",[">",["length","locmap"],1]],["=","comments",["langCorrelateComments","locmap"]],["=","sourcemap",{dictionary:{$count:"nodecount",$comments:"comments"}}],[[["identity","false"],["set.","sourcemap",["`","map"],["lmCompress","locmap"]]]],["put","fname",["`","\\.sourcemap"],"sourcemap"]]],"tree"]),e._SetBindingList("langParse1",["function&","langParse1",["ltoken","riplop","false","rtoken"],["function&","naryCoalesce",["optoken","lexpr","rexpr","false","opsym"],["=","opsym",[".","optoken","atom"]],[["and",["defined","optoken","atom"],["symbol","opsym"],["deref",[".","lang","naryop"],"opsym"]],[["and",["tuple","lexpr"],["==","opsym",[".",["car","lexpr"],"atom"]]],[["and",["tuple","rexpr"],["==","opsym",[".",["car","rexpr"],"atom"]]],["cons","optoken",["append",["cdr","lexpr"],["cdr","rexpr"]]]],["cons","optoken",["append",["cdr","lexpr"],["list","rexpr"]]]],[["and",["tuple","rexpr"],["==","opsym",[".",["car","rexpr"],"atom"]]],["cons","optoken",["append",["list","lexpr"],["cdr","rexpr"]]]],["list","optoken","lexpr","rexpr"]],["list","optoken","lexpr","rexpr"]],["function&","leprop",["false","nlToken"],[["==",[".","tokenlast","atom"],"cr"],["=","nlToken","tokenlast"],[[["not",["passNewline","true"]],["return","false"]]],[["and",["not",["string",[".","tokenlast","atom"]]],["deref",[".","lang","left"],[".","tokenlast","atom"]]],[["deref",[".","lang","prefix"],[".","tokenlast","atom"]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$ambiguous newline (use \\ or ,)"}}]],["deref",[".","lang","left"],[".","tokenlast","atom"]]],["tokenpush","nlToken"],"false"],["deref",[".","lang","left"],[".","tokenlast","atom"]]],["=","ltoken",["passNewline"]],[["atDelimiter"],["langSyntax","ltoken","false",{dictionary:{$memo:"$incomplete expression"}}]],["=","rtoken",["tokenread"]],[[["string",[".","ltoken","atom"]]],[["deref",[".","lang","prefix"],[".","ltoken","atom"]],["=","ltoken",["eval",["deref",[".","lang","prefix"],[".","ltoken","atom"]]]]],[["deref",[".","lang","left"],[".","ltoken","atom"]],["langSyntax","ltoken","false",{dictionary:{$memo:"$not a prefix operator"}}]],[["deref",[".","lang","right"],[".","ltoken","atom"]],["=","ltoken",["list","ltoken",["langParse1","rtoken",["deref",[".","lang","right"],[".","ltoken","atom"]]]]]]],["loop","false",["=","rtoken","tokenlast"],[[["string",[".","ltoken","atom"]],[[["tokenmatch","string"],["=","ltoken",{dictionary:{$atom:["strcat",[".","ltoken","atom"],[".","tokenlast","atom"]],$loc:[".","ltoken","loc"]}}],["tokenread"],["continue"]]],[[".","lang","string"],["=","ltoken",["eval",[".","lang","string"]]]]]],[[["and",["&&",["not",["string",[".","rtoken","atom"]]],["<","riplop",["deref",[".","lang","postleft"],[".","rtoken","atom"]]]],["deref",[".","lang","postfix"],[".","rtoken","atom"]]],["=","ltoken",["eval",["deref",[".","lang","postfix"],[".","rtoken","atom"]]]],["=","rtoken",["tokenread"]]]],[["not",["<","riplop",["leprop"]]],"ltoken"],["=","rtoken","tokenlast"],["tokenread"],[[["string",[".","rtoken","atom"]]],[["deref",[".","lang","infix"],[".","rtoken","atom"]],["=","ltoken",["eval",["deref",[".","lang","infix"],[".","rtoken","atom"]]]]],[["deref",[".","lang","right"],[".","rtoken","atom"]],["=","ltoken",["naryCoalesce","rtoken","ltoken",["langParse1","tokenlast",["deref",[".","lang","right"],[".","rtoken","atom"]]]]]],["=","ltoken",["list","rtoken","ltoken"]]]]]),e._SetBindingList("langParseTo",["function&","langParseTo",["delim","sloc","doval","false","inerrors","expr"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","lptFound","false"],["langPassSeparator"],["=","inerrors",[".","langErrors","length"]],["loop","false",[["tokenmatch","delim"],["=","lptFound","tokenlast"],["tokenread"],["reverse","expr"]],[[["atDelimiter"],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"delim",$memo:"$delimiter not found"}}],[["atTerminator"],["break"]]],[[["identity","doval"],["push",["langValueParse"],"expr"]],["push",["langParse1","tokenlast",0],"expr"]],[[["tokenmatch","delim"],["=","lptFound","tokenlast"],["tokenread"],["reverse","expr"],["break"]]],[["&&",["not",["langAtSeparator","delim"]],["==","inerrors",[".","langErrors","length"]]],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"delim",$memo:"$mismatched delimiter"}}],[["atTerminator"],["break"]]]],["tokenread"]]]),e._SetBindingList("langParseToList",["function&","langParseToList",["delim","sloc","false","expr"],["=","expr",["langParseTo","delim","sloc"]],[[["not","expr"],["=","expr",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]]],"expr"]),e._SetBindingList("langReadExpr",["function&","langReadExpr",["false","expr"],["=","expr",["passNewline"]],[["tokenmatch","rpar"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$mismatched parens"}}]],[["tokenmatch","quote"],["=","expr",["tokenread"]],["tokenread"],"expr"],[["tokenmatch","{"],["tokenread"],["langBraceParse","false","expr"]],[["tokenmatch","["],["tokenread"],["langBracketParse","false","false","expr"]],[["not",["tokenmatch","lpar"]],["tokenread"],"expr"],["tokenread"],["=","expr","false"],["loop","false",["passNewline"],[[["tokenmatch","comma"],["tokenread"],[["||",["not","expr"],["tokenmatch",["list","rpar","comma"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$extra comma"}}]]]],[["tokenmatch","rpar"],["tokenread"],["reverse","expr"]],["push",["langReadExpr"],"expr"],[[["tokenmatch","period"],["tokenread"],["=","expr",["reverse",["cdr","expr"],["cons",["car","expr"],["langReadExpr"]]]],[[["tokenmatch","rpar"],["tokenread"],"expr"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$invalid dotted pair"}}],"false"],["break"]]]]]),e._SetBindingList("langTemplateStringParse",["function&","langTemplateStringParse",["strtoken","false","sloc","rxTS","terms","found","result","exlist","item","add"],[[["<",[".",[".","strtoken","atom"],"indexOf",[["`","\\${"]]],0],["return","strtoken"]]],["=","sloc",["langExprLoc","strtoken"]],["=","rxTS",["RegExp","$((?:[^$]|[$](?![{$])|[$]+[{][^}]*$)*)([$]+[{].*?[}])?","$g"]],["=","rxT",["RegExp","$[$]+[{](.*)[}]"]],["=","terms",{array:[]}],["loop","false",["=","found",[".","rxTS","exec",[[".","strtoken","atom"]]]],[["||",["not","found"],["==",[".","found",0],"$"]]],[[[".","found",1],[".","terms","push",[[".","found",1]]]]],[[[".","found",2],[".","terms","push",[[".","found",2]]]]]],["=","exlist",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","terms",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","found",[".","rxT","exec",["item"]]],[[[".","item","startsWith",["$$$"]],[".","exlist","push",[{dictionary:{$atom:[".","item","slice",[1]],$loc:"sloc"}}]]],[[".","found",1],[".","exlist","push",[["recurParse",[".",[".","found",1],"concat",["$;"]],["list",[".","sloc",0],["+",[".","sloc",1],2]]]]]],[[">",[".","item","length"],0],[".","exlist","push",[{dictionary:{$atom:"item",$loc:"sloc"}}]]]],["=","sloc",["list",[".","sloc",0],["+",[".","sloc",1],[".","item","length"]]]]]]],["langConsSym",["`","strcat"],"strtoken",[".","exlist","totuple"]]]),e._SetBindingList("langBraceParse",["function&","langBraceParse",["doeval","sloc","false","obj","expr","value","exlist"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","obj",{dictionary:{}}],["loop","false",["passNewline"],[["tokenmatch",["`","}"]],["tokenread"],["=","expr",["setobj","exlist",["new","dictionary"]]]],[["atDelimiter"],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"$}",$memo:"$delimiter not found"}}]],["=","expr","tokenlast"],[["deref","obj",[".","expr","atom"]],["langSyntax","expr","false",{dictionary:{$memo:"$duplicate key in dictionary",$found:[".","expr","atom"]}}]],["tokenread"],["passNewline"],[[["==",[".","expr","atom"],"`"],["=","expr","tokenlast"],["tokenread"],["passNewline"]]],[["not",["tokenmatch",["`",":"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$missing : in dictionary"}}]],["tokenread"],["passNewline"],["=","value",["langValueParse","doeval"]],["set[","obj",[".","expr","atom"],"value"],[["tokenmatch",["`","}"]],["tokenread"]],[["not",["langAtSeparator"]],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"$, or }",$memo:"$malformed dictionary entry"}}]],["tokenread"]],{dictionary:{$atom:"obj",$loc:["langExprLoc","sloc"]}}]),e._SetBindingList("langBracketParse",["function&","langBracketParse",["doeval","ltoken","sloc","false","exlist"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","exlist",["langParseTo",["`","]"],"sloc",["not","ltoken"]]],[["identity","ltoken"],[["atom",["cdr","exlist"]],["langEnlistSym","deref","sloc","ltoken",["car","exlist"]]],["langEnlistSym","dereflist","sloc","ltoken","exlist"]],[[["&&","doeval",["==",[".","langErrors","length"],0]],["=","exlist",["cdr",["eval",["cons","false","exlist"]]]]]],{dictionary:{$atom:["new","array","exlist"],$loc:[".","sloc","loc"]}}]),e._SetBindingList("langValueParse",["function","langValueParse",["doeval","false","value"],["=","value",["langParse1","tokenlast",0]],[[["==",[".","langErrors","length"],0],["=","value",["langStrip","value","operators","true"]],[["identity","doeval"],["=","value",["eval","value"]]]]],"value"]),e._SetBindingList("langGenIterate",["function","langGenIterate",["calltok","tagtok","varex","target","xbody","false","sloc","forsym","itersym","bodyloc","iterlist"],["=","sloc",[".","calltok","loc"]],["=","forsym",["unintern",["`","lambda"]]],["=","itersym",["unintern",["`","iter"]]],["=","bodyloc",["langExprLoc","xbody"]],["=","iterlist",["langEnlistSym","itersym","sloc"]],[[["&&",["atom","varex"],["not",["&&",["defined","varex","atom"],["symbol",[".","varex","atom"]],[".","varex","atom"]]]],["return",["langSyntax","varex","false",{dictionary:{$memo:"$invalid iteration variable",$found:[".","varex","atom"]}}]]]],["langConsSym",[".","calltok","atom"],"sloc",["cons",["langEnlistSym",["`","let"],"sloc",{dictionary:{$atom:"forsym",$loc:["langExprLoc","sloc"]}},"iterlist",["langEnlistSym",["`","="],"varex",{dictionary:{$atom:"itersym",$loc:["langExprLoc","varex"]}},["langEnlistSym",["`","iterate"],"varex","target",["langEnlistSym","`","varex","varex"]]],["langConsSym",["`","loop"],"xbody",["cons","tagtok",["list",["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$next",$loc:"bodyloc"}},"iterlist"],["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$final",$loc:"bodyloc"}},"iterlist"]],["langEnlistSym",["`","="],"xbody","varex",["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$value",$loc:"bodyloc"}}]],"xbody"]]]]]]),e._SetBindingList("langParseRule",["function","langParseRule",["lang","sym"],["or",["deref",[".","lang","left"],"sym"],["deref",[".","lang","right"],"sym"],["deref",[".","lang","prefix"],"sym"],["deref",[".","lang","infix"],"sym"],["deref",[".","lang","postfix"],"sym"]]]),e._AddPropertyList("LangLibInit",[["$.lingoInit","true"]]),e._SetBindingList("LangLibInit",["function","LangLibInit",["false","manifest"],["=","manifest",["`",["langParser","recurParse","langParseErrorString","tokenread","tokenpush","tokenmatch","tokenpass","passNewline","atTerminator","atDelimiter","langPassSeparator","langAtSeparator","langExprLoc","langConsSym","langEnlistSym","langSyntax","langDebuglog","langCleanup","langErrorCheck","langCorrelateComments","langStrip","langStripLoc","langParse1","langParseTo","langParseToList","langReadExpr","langTemplateStringParse","langBraceParse","langBracketParse","langValueParse","langGenIterate","langParseRule","LangLibInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$LangLib",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","ParseErrorString"],"langParseErrorString"]]]]]),e._Execute(["LangLibInit"]),e._SetNamespace("Lingo"),e._Execute([".",[".","Naan","module"],"letlocal",["module"]]),e._Execute([".",[".","Naan","module"],"letinherit",["$Lib"]]),e._AddPropertyList("LingoPreload",[["$.lingoInit","true"]]),e._SetBindingList("LingoPreload",["function","LingoPreload","false",[".",[".","Naan","module"],"letinherit",["$Lib"]]]),e._SetBindingList("LingoParser",["function","LingoParser",["source","grammar","operators"],["=","SynLoop","false"],["=","InProc","false"],["langParser","source","grammar","operators"]]),e._SetValue("lingoGrammar",{dictionary:{$left:{dictionary:{"$(":520,"$[":520,"$@[":520,"$.":500,"$.*":500,"$@":500,"$@*":500,"$=":420,"$+=":420,"$-=":420,"$*=":420,"$/=":420,"$%=":420,"$^":380,"$*":340,"$/.":340,"$/":340,"$%":340,"$+":330,"$-":330,"$<<":320,"$>>":320,"$..":310,"$..<":310,"$<=":300,"$>=":300,"$<":300,"$>":300,"$!=":300,"$==":300,$eq:300,"$===":300,"$!==":300,"$<=>":300,"$&&":220,$and:220,"$||":200,$or:200,"$~":120}},$right:{dictionary:{"$.":540,"$@":540,"$^":375,"$++":360,"$--":360,"$*":340,"$/.":340,"$/":340,"$%":340,"$+":330,"$-":330,"$<<":320,"$>>":320,"$..":310,"$..<":310,"$<=":300,"$>=":300,"$<":300,"$>":300,"$!=":300,"$==":300,$eq:300,"$===":300,"$!==":300,"$<=>":300,$not:230,"$!":230,"$&&":220,$and:220,"$||":200,$or:200,"$~":120,"$=":100,"$+=":100,"$-=":100,"$*=":100,"$/=":100,"$%=":100}},$rightSign:360,$rightEqual:100,$highBind:1e3,$prefix:{dictionary:{"$,":"false","$[":["constObject",["lingoBracketParse","false","false","ltoken"]],"$#[":["langConsSym",["`","#["],"tokenlast",["lingoParseTo",["`","#]"],"tokenlast"]],$try:["catchParse"],"$(":["parenParse"],"$`":["quoteParse"],$function:["procParse",["`","function"]],$macro:["procParse",["`","macro"]],$closure:["procParse",["`","closure"]],$let:["procParse",["`","let"]],$if:["ifParse","IfBody"],$else:["keywordParse","ltoken"],$body:["bodyParse"],$cond:["condParse"],$loop:["loopParse"],$break:["deloopParse",["`","break"]],$continue:["deloopParse",["`","continue"]],$return:["returnParse"],$while:["whileParse"],$for:["for2Parse"],$switch:["switchParse"],"$+":["lingoParse1","tokenlast",[".","lingoGrammar","rightSign"]],"$-":["negateParse"],"$!":["notParse"],"$++":["preCrementParse","rtoken",["`","++"],["`","+"]],"$--":["preCrementParse","rtoken",["`","--"],["`","-"]],"${":["constObject",["lingoBraceParse","false","ltoken"]],"$@":["atPrefixParse"]}},$infix:{dictionary:{"$/":["quotientParse","ltoken"],"$/.":["quotientParse","ltoken"],"$@":["atParse","ltoken"],"$@[":["atBracketParse","ltoken","rtoken"],"$[":["constObject",["lingoBracketParse","false","ltoken","rtoken"]],"$=":["equalParse","ltoken",["`","="]],"$+=":["opEqualParse","ltoken",["`","+"]],"$-=":["opEqualParse","ltoken",["`","-"]],"$*=":["opEqualParse","ltoken",["`","*"]],"$/=":["opEqualParse","ltoken",["`","/"]],"$%=":["opEqualParse","ltoken",["`","%"]],"$(":["lparParse","ltoken"]}},$postfix:{dictionary:{"$++":["postCrementParse","ltoken",["`","++"],["`","+"]],"$--":["postCrementParse","ltoken",["`","--"],["`","-"]],"$!":["postBangParse","ltoken"]}},$postleft:{dictionary:{"$++":420,"$--":420,"$!":400}},$naryop:{dictionary:{"$&&":"true",$and:"true","$||":"true",$or:"true"}},$string:["langTemplateStringParse","ltoken"]}}),e._SetBindingList("lingoParse1",["function&","lingoParse1",["arg1","arg2","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParse1","arg1","arg2"]]),e._SetBindingList("lingoReadExpr",["function&","lingoReadExpr",["false","IfBody"],["=","IfBody",["`","IfBody"]],["langReadExpr"]]),e._SetBindingList("lingoBraceParse",["function&","lingoBraceParse",["arg1","arg2","false","IfBody"],["=","IfBody",["`","IfBody"]],["langBraceParse","arg1","arg2"]]),e._SetBindingList("lingoBracketParse",["function&","lingoBracketParse",["arg1","arg2","arg3","false","IfBody"],["=","IfBody",["`","IfBody"]],["langBracketParse","arg1","arg2","arg3"]]),e._SetBindingList("lingoParseTo",["function&","lingoParseTo",["arg1","bloc","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParseTo","arg1","bloc"]]),e._SetBindingList("lingoParseToList",["function&","lingoParseToList",["arg1","bloc","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParseToList","arg1","bloc"]]),e._SetBindingList("constObject",["function","constObject",["tok"],["xlock",[".","tok","atom"]],"tok"]),e._SetBindingList("parenParse",["function","parenParse",["false","expr","sloc"],["=","sloc","tokenlast"],["=","expr",["lingoParse1","tokenlast",0]],[["tokenmatch","rpar"],["tokenread"],"expr"],["langSyntax",["tokenread"],"false",{dictionary:{$expected:"rpar",$memo:"$) or operator not found"}}]]),e._SetBindingList("negateParse",["function","negateParse",["false","expr"],["=","expr",["lingoParse1","tokenlast",[".","lingoGrammar","rightSign"]]],[["numeric",[".","expr","atom"]],{dictionary:{$atom:["negate",[".","expr","atom"]],$loc:[".","expr","loc"]}}],["langEnlistSym",["`","-"],"expr","expr"]]),e._SetBindingList("notParse",["function","notParse",["false","expr"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","!"]]]],["langEnlistSym",["`","not"],"expr","expr"]]),e._SetBindingList("postBangParse",["function","postBangParse",["expr","false","sloc"],["=","sloc","tokenlast"],["langEnlistSym",[".","tokenlast","atom"],"sloc","expr"]]),e._SetBindingList("atPrefixParse",["function","atPrefixParse",["false","expr","ltoken","destoken"],["=","ltoken","tokenlast"],["=","expr",["lingoParse1","ltoken",["deref",[".","lingoGrammar","right"],["`","@"]]]],["=","destoken",{dictionary:{$atom:["`","annotations"],$loc:["langExprLoc","ltoken"]}}],[[["not",["dictionary","annotations"]],["=","annotations",{dictionary:{}}]]],["=","expr",["langEnlistSym","`","expr","expr"]],["langEnlistSym","set.","ltoken","destoken","expr","expr"]]),e._SetBindingList("atParse",["function","atParse",["ltoken","false","expr"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","@"]]]],["langEnlistSym",["`","deref"],"ltoken",["langEnlistSym",["`","@"],"ltoken","ltoken"],["langEnlistSym","`","expr","expr"]]]),e._SetBindingList("atBracketParse",["function","atBracketParse",["ltoken","rtoken"],["lingoBracketParse","false",["langEnlistSym",["`","@"],"ltoken","ltoken"],"rtoken"]]),e._SetBindingList("quotientParse",["function","quotientParse",["lhs","false","rhs"],["=","rhs",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","/"]]]],["langEnlistSym",["`","quotient"],"lhs","lhs","rhs"]]),e._SetBindingList("ifParse",["function&","ifParse",["IfBody"],[[["eq","IfBody",["`","IfBody"]],["return",["langConsSym",["`","cond"],"tokenlast",["ifParse"]]]]],["call",["let","lambda",["notcond","false","expr","nexpr","bloc"],["=","IfBody","true"],[[["tokenmatch","lpar"],["=","bloc","tokenlast"],["tokenread"],["=","expr",["car",["lingoParseTo","rpar","bloc"]]]],["=","expr",["lingoParse1","tokenlast",0]]],[[["dictionary","expr"],["=","expr",["langEnlistSym",["`","identity"],"expr","expr"]]]],[[["not",["tokenmatch","{"]],["langPassSeparator"],["=","expr",["list","expr",["langParse1","tokenlast",0]]]],["=","bloc","tokenlast"],["tokenread"],["=","expr",["cons","expr",["langParseTo",["`","}"],"bloc"]]]],[["not",["tokenmatch",["`","else"]]],["list","expr"]],["tokenread"],[["identity","notcond"],[["tokenmatch",["`","if"]],["tokenread"],["list","expr",["ifParse","true"]]],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["cons","expr",["langParseTo",["`","}"],"bloc"]]],["list","expr",["langParse1","tokenlast",0]]],[["tokenmatch",["`","if"]],["tokenread"],["cons","expr",["ifParse","false"]]],["=","nexpr",["langConsSym",["`","identity"],"tokenlast",["langConsSym",["`","true"],"tokenlast"]]],[[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["=","nexpr",["cons","nexpr",["langParseTo",["`","}"],"bloc"]]]],["=","nexpr",["list","nexpr",["langParse1","tokenlast",0]]]],["list","expr","nexpr"]],"IfBody"]]),e._SetBindingList("keywordParse",["function&","keywordParse",["token"],["langSyntax","token","false",{dictionary:{$memo:"$stray keyword"}}]]),e._SetBindingList("bodyParse",["function&","bodyParse",["false","IfBody"],["call",["let","lambda",["bloc"],[["tokenmatch","lpar"],["=","IfBody","true"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","body"],"tokenlast",["langParseTo","rpar","bloc"]]],{dictionary:{$atom:["`","body"],$loc:["langExprLoc","tokenlast"]}}]]]),e._SetBindingList("ifsParse",["function&","ifsParse",["to","false","IfBody"],["call",["let","lambda",["bloc","conds","expr"],["=","bloc","tokenlast"],["=","conds",["apply","append",["langParseTo","to","bloc"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","conds",["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[["not",["tuple",["car","expr"]]],["langSyntax","expr","false",{dictionary:{$memo:"$if expression required"}}]]]]],"conds"]]]),e._SetBindingList("condParse",["function&","condParse",["false","IfBody"],[[["tokenmatch","lpar"],["tokenread"]],["return",{dictionary:{$atom:["`","cond"],$loc:["langExprLoc","tokenlast"]}}]],["langConsSym",["`","cond"],"tokenlast",["ifsParse","rpar"]]]),e._SetBindingList("loopParse",["function&","loopParse",["false","SynLoop","IfBody"],["call",["let","lambda",["tagex","sloc","bloc"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["atom",["caar","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$loop tag must be an atom"}}]],["=","SynLoop","true"],["=","IfBody","true"],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","loop"],"sloc",["cons","tagex",["langParseTo",["`","}"],"bloc"]]]],["langConsSym",["`","loop"],"sloc",["cons","tagex",["list",["langParse1","tokenlast",0]]]]]]]),e._SetBindingList("deloopParse",["function","deloopParse",["keyword","false","tagex","sloc"],[["not","SynLoop"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$only allowed within loops"}}]],["=","sloc","tokenlast"],[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]],[["not",["atom",["caar","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$tag must be an atom"}}]],["langEnlistSym","keyword","tokenlast","tagex"]],["langConsSym","keyword","tokenlast"]]),e._SetBindingList("returnParse",["function","returnParse","false",[["tokenmatch","lpar"],["langEnlistSym",["`","return"],"tokenlast",["lingoParse1","tokenlast",0]]],["langConsSym",["`","return"],"tokenlast"]]),e._SetBindingList("whileParse",["function&","whileParse",["false","SynLoop","IfBody"],["call",["let","lambda",["sloc","expr","tagex","testex","bloc"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["dictionary",["car","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$while tag must be an atom"}}]],[[["tokenmatch","lpar"],["=","bloc","tokenlast"],["tokenread"],["=","expr",["car",["lingoParseTo","rpar","bloc"]]]],["=","expr",["lingoParse1","tokenlast",0]]],["=","testex",["list",["langEnlistSym",["`","not"],"expr","expr"]]],["=","SynLoop","true"],["=","IfBody","true"],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","while"],"sloc",["cons","tagex","testex",["langParseTo",["`","}"],"bloc"]]]],["langPassSeparator"],["langConsSym",["`","while"],"sloc",["cons","tagex","testex",["list",["langParse1","tokenlast",0]]]]]]]),e._SetBindingList("for2Parse",["function&","for2Parse",["false","SynLoop","IfBody"],["call",["let","lambda",["sloc","varex","tagex","targex","bloc","bodyex"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["defined","tagex","atom"]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$for tag must be an atom"}}]],["=","varex",["lingoParse1","tokenlast",0]],[[["==",[".",["car","varex"],"atom"],"quote"],["=","varex",["cadr","varex"]]]],[["not",["tokenmatch",["`","in"]]],["langSyntax","tokenlast","false",{dictionary:{$expected:"$in",$memo:"$malformed for loop"}}]],["tokenread"],["=","targex",["lingoParse1","tokenlast",0]],["=","SynLoop","true"],["=","IfBody","true"],[[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["=","bodyex",["langParseTo",["`","}"],"bloc"]]],["=","bodyex",["cons",["langParse1","tokenlast",0]]]],["langGenIterate",{dictionary:{$atom:["`","for"],$loc:"sloc"}},"tagex","varex","targex","bodyex"]]]]),e._SetBindingList("switchParse",["function","switchParse",["false","sloc"],["=","sloc","tokenlast"],["langSyntax","sloc",{dictionary:{$memo:"$switch not implemented"}}]]),e._SetBindingList("procParse",["function&","procParse",["begin","false","InProc","IfBody"],["function","convlocal",["parms","false","ptoken","result"],[["atom","parms"],"parms"],["loop","false",["=","ptoken",["pop","parms"]],[[["==",[".","ptoken","atom"],"local"],["=","result",["cons",{dictionary:{$atom:"false",$loc:[".","ptoken","loc"]}},"result"]]],["=","result",["cons","ptoken","result"]]],[["atom","parms"],["reverse","result"]]]],["function","checkparms",["parms","false","sym"],[["not","parms"],"false"],[["&&",["dictionary","parms"],["not",["not",["=","sym",[".","parms","atom"]]]]],[["||",["not",["symbol","sym"]],["langParseRule","lingoGrammar","sym"]],["langSyntax","parms","false",{dictionary:{$memo:"$invalid parameter"}}]]],[["tuple","parms"],["checkparms",["car","parms"]],["checkparms",["cdr","parms"]]]],["call",["let","lambda",["expr","procname","parms","sloc","akey","bloc"],["=","InProc","true"],["=","sloc","tokenlast"],["=","expr",["langReadExpr"]],[[["==",[".","expr","atom"],["`","&"]],[["eq","begin",["`","function"]],["=","begin","function&"],["=","expr",["langReadExpr"]]],[["eq","begin",["`","let"]],["=","begin","let&"],["=","expr",["langReadExpr"]]],["langSyntax","sloc","false",{dictionary:{$memo:"$only function& and let& allowed"}}],["return"]]],[[["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["=","procname",{dictionary:{$atom:["unintern",[".","expr","atom"]],$loc:["langExprLoc","sloc"]}}],["assign",[".","procname","atom"],[".","expr","atom"]],["=","parms",["langReadExpr"]]],["=","procname",{dictionary:{$atom:["unintern","lambda"],$loc:["langExprLoc","sloc"]}}],["=","parms","expr"]],[[["dictionary","annotations"],["for",["let","lambda",["iter"],["=","iter",["iterate","annotations",["`","akey"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","akey",[".","iter","$value"]],["put",[".","procname","atom"],"akey",["deref","annotations","akey"]]]]],["=","annotations",["`","annotations"]]]],[[["||",["&&",["dictionary","parms"],["not",[".","parms","atom"]]],["not","parms"]],["=","parms",{dictionary:{$atom:"false",$loc:["langExprLoc","tokenlast"]}}]],["=","parms",["convlocal","parms"]]],["checkparms","parms"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc",{dictionary:{$memo:"$missing { at start of procedure body"}}]],["=","IfBody","true"],["=","bloc","tokenlast"],["tokenread"],["langConsSym","begin","sloc",["cons","procname",["cons","parms",["langParseTo",["`","}"],"bloc"]]]]]]]),e._SetBindingList("catchParse",["function","catchParse",["false","sloc1","sloc2","sloc3","exbod","catbod","ccond","finbod","bloc"],["=","sloc1","tokenlast"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc1",{dictionary:{$memo:"$missing { after try"}}]],["tokenread"],["=","exbod",["langParseToList",["`","}"],"sloc1"]],["=","sloc2","tokenlast"],[[["tokenmatch",["`","catch"]],["tokenread"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc2",{dictionary:{$memo:"$missing { after catch"}}]],["=","bloc","tokenlast"],["tokenread"],[[["tokenmatch",["`","if"]],["=","ccond",["ifsParse",["`","}"]]]],[["tokenmatch",["`","}"]],["tokenread"]],["=","catbod",["langParseTo",["`","}"],"bloc"]]],[["not","ccond"],[[["not","catbod"],["=","catbod",["langConsSym",["`","false"],"bloc"]]]],["=","ccond",["list",["cons",["langConsSym",["`","identity"],"bloc",["langConsSym",["`","true"],"bloc"]],"catbod"]]]]]],["=","sloc3","tokenlast"],[[["tokenmatch",["`","finally"]],["tokenread"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc3",{dictionary:{$memo:"$missing { after finally"}}]],["=","bloc","tokenlast"],["tokenread"],["=","finbod",["langParseToList",["`","}"],"bloc"]]]],[["not","ccond"],[["not","finbod"],["langSyntax","tokenlast","sloc1",{dictionary:{$memo:"$try requires catch or finally"}}]],["=","ccond",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc2"]}}],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]],[["not","finbod"],["=","finbod",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc3"]}}],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]]),e._SetBindingList("equalParse",["function","equalParse",["lhs","op","false","rhs","atex","equex"],["=","rhs",["lingoParse1","tokenlast",[".","lingoGrammar","rightEqual"]]],["=","equex",["call",["let","lambda","false",[["&&",["defined","lhs","atom"],["symbol",[".","lhs","atom"]]],["langEnlistSym","op","lhs","lhs","rhs"]],[["==",[".",["car","lhs"],"atom"],"quote"],["langEnlistSym","op","lhs",["second","lhs"],"rhs"]],[["==",[".",["car","lhs"],"atom"],"period"],["langEnlistSym","set.","lhs",["second","lhs"],["langEnlistSym","quote",["third","lhs"],["third","lhs"]],"rhs"]],[["and",["==",[".",["car","lhs"],"atom"],"set."],["eq",[".",["second","lhs"],"atom"],["`","annotations"]]],["langEnlistSym","set.","lhs",["second","lhs"],["third","lhs"],"rhs"]],[["or",["==",[".",["caar","lhs"],"atom"],"deref"],["==",[".",["caar","lhs"],"atom"],"dereflist"]],["=","atex",["second","lhs"]],[[["==",[".",["car","atex"],"atom"],["`","@"]],["=","atex",["langEnlistSym",["`","@"],"atex",["second","atex"],{dictionary:{$atom:"true",$loc:[".",["car","atex"],"loc"]}}]]]],["langEnlistSym","set[","lhs","atex",["third","lhs"],"rhs"]],["return",["langSyntax","rhs","lhs",{dictionary:{$memo:"$bad assignment"}}]]]]],[["eq","op",["!",["`","="]]],["langEnlistSym",["`","not"],"lhs","equex"]],"equex"]),e._SetBindingList("opEqualParse",["function","opEqualParse",["lhs","op","false","rhs"],["=","rhs",["lingoParse1","tokenlast",[".","lingoGrammar","rightEqual"]]],[["&&",["defined","lhs","atom"],["symbol",[".","lhs","atom"]]],["langEnlistSym","preadjust","lhs","lhs",{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],[["==",[".",["car","lhs"],"atom"],"quote"],["langEnlistSym","preadjust","lhs",["second","lhs"],{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],[["member",[".",["car","lhs"],"atom"],["`",[".","deref","dereflist"]]],["langEnlistSym","preadjust","lhs","lhs",{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],["langSyntax","rhs","lhs",{dictionary:{$memo:"$bad operator assignment"}}]]),e._SetBindingList("lparParse",["function","lparParse",["expr","false","bloc"],["=","bloc","tokenlast"],[["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["cons","expr",["lingoParseTo","rpar","bloc"]]],[["==",[".",["car","expr"],"atom"],"period"],["langEnlistSym","period","expr",["second","expr"],["third","expr"],["lingoParseToList","rpar","bloc"]]],[["member",[".",["car","expr"],"atom"],["`",["function","function&","macro","closure","let","let&"]]],[[["not","InProc"],["set[",["@",[".",[".","expr",1],"atom"],"true"],["`","\\.lingoInit"],"true"]]],["langConsSym",["`","call"],"expr",["cons","expr",["lingoParseTo","rpar","bloc"]]]],[["or",["==",[".",["caar","expr"],"atom"],"deref"],["==",[".",["caar","expr"],"atom"],"dereflist"]],["langEnlistSym",[".",["caar","expr"],"atom"],"expr",["second","expr"],["third","expr"],["lingoParseToList","rpar","bloc"]]],["langSyntax","bloc","false",{dictionary:{$memo:"$operator missing before ("}}]]),e._SetBindingList("preCrementParse",["function","preCrementParse",["rtoken","opsym","adjuster","false","sloc","expr"],["=","sloc","tokenlast"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],"opsym"]]],[["or",["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["member",[".",["car","expr"],"atom"],["`",[".","deref","dereflist"]]]],["langEnlistSym","preadjust","sloc","expr",{dictionary:{$atom:"adjuster",$loc:["langExprLoc","sloc"]}},{dictionary:{$atom:1,$loc:["langExprLoc","sloc"]}}]],["langSyntax","expr","false",{dictionary:{$memo:"$not an lvalue"}}]]),e._SetBindingList("postCrementParse",["function","postCrementParse",["expr","opsym","adjuster","false","sloc"],["=","sloc","tokenlast"],[["or",["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["member",[".",["car","expr"],"atom"],["`",[".","deref","dereflist"]]]],["langEnlistSym","postadjust","sloc","expr",{dictionary:{$atom:"adjuster",$loc:["langExprLoc","sloc"]}},{dictionary:{$atom:1,$loc:["langExprLoc","sloc"]}}]],["langSyntax","expr","false",{dictionary:{$memo:"$not an lvalue"}}]]),e._SetBindingList("quoteParse",["function","quoteParse",["false","expr"],["=","expr","tokenlast"],[["member",[".","expr","atom"],["`",["quote",")","{","[","`","\n"]]],["tokenread"],"expr"],["langEnlistSym","`","expr",["langReadExpr"]]]),e._AddPropertyList("LingoInit",[["$.lingoInit","true"]]),e._SetBindingList("LingoInit",["function","LingoInit",["modname","false","manifest"],["=","manifest",["`",["LingoPreload","LingoParser","lingoGrammar","lingoParse1","lingoReadExpr","lingoBraceParse","lingoBracketParse","lingoParseTo","lingoParseToList","constObject","parenParse","negateParse","notParse","postBangParse","atPrefixParse","atParse","atBracketParse","quotientParse","ifParse","keywordParse","bodyParse","ifsParse","condParse","loopParse","deloopParse","returnParse","whileParse","for1Parse","for2Parse","switchParse","procParse","catchParse","equalParse","opEqualParse","lparParse","preCrementParse","postCrementParse","quoteParse","LingoInit"]]],[[["not","modname"],["=","modname",[".","module","id"]]]],[".",[".","Naan","module"],"build",["modname","$Parse",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],[".",[".","Naan","module"],"letinherit",["$Lib"]],["set.",[".","modobj","exports"],["`","Base"],["DefineLanguage","$Lingo","lingoGrammar","LingoParser","LingoUnparser"]],["=","lingoOperators",[".",[".",[".",[".","modobj","exports"],"Base"],"info","false"],"operators"]]]]]]),e._Execute(["LingoInit","$Lingo"]),e._SetBindingList("LingoPrinter",["function","LingoPrinter",["expr","options"],[".",["LingoUnparser","expr","options"],"string","false"]]),e._SetBindingList("LingoUnparser",["closure","LingoUnparser",["origexpr","options","grammar","extensions","false","unparser","sink","formatter","key","expr","rbp","lbp","owntuple","hookif"],["=","unparser",["new","object","this"]],["set.","unparser",["`","expression"],"origexpr"],[[["not","grammar"],["=","grammar","lingoGrammar"]]],["set.","unparser",["`","sink"],["=","sink",{dictionary:{$row:0,$col:0,$incol:0,$hangdent:0,$wrapping:"true",$rowtokens:{array:[{array:[]}]},$procnesting:0,$endprocNL:"true",$quoteDict:["RegExp","$[`:,}]$"],$breaks:"false",$mirrors:"false",$mirroroot:"false",$tuplemap:"false",$maxmarklen:0,$markdict:"false",$nocycles:["new","weakmap"],$maproot:"false",$defoptions:{dictionary:{$point:"false",$quoted:"true",$indentSize:4,$wrapMinAmount:29,$wrapMaxCol:79,$leftMargin:0,$compact:"true",$maxKeyLength:20,$maxElements:1024,$maxStringLength:["*",64,1024],$noComments:"false",$commentCol:64}}}}]],["call",["let","lambda",["false","item"],[[["not",["dictionary","options"]],["=","options",[".","sink","defoptions"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","options",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["set[",[".","sink","defoptions"],"item",["deref","options","item"]]]]],["=","options",[".","sink","defoptions"]]],["set.","unparser",["`","options"],"options"]]],["set.","sink",["`","incol"],[".","options","leftMargin"]],["=","formatter",{dictionary:{"$`":"uhook`","$=":"uhook=",$deref:"uhookderef",$dereflist:"uhookderef","$set.":"uhookset.","$set[":"uhookset[","$.":"uhook.","$.*":"uhookref*","$@*":"uhookref*",$quotient:"uhookquotient",$catch:"uhookcatch",$for:"uhookfor",$call:"uhookcall",$while:"uhookwhile",$loop:"uhookloop",$cond:"uhookcond",$return:"uhookreturn",$continue:"uhookbreco",$break:"uhookbreco",$preadjust:"uhookpreadjust",$postadjust:"uhookpostadjust",$not:"uhooknot","$!":"uhookbang",$let:"uhookproc","$let&":"uhookproc",$closure:"uhookproc",$macro:"uhookproc",$function:"uhookproc","$function&":"uhookproc"}}],["for",["let","lambda",["iter"],["=","iter",["iterate","extensions",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["set[","formatter","key",["deref","extensions","key"]]]]],["function","earlier",["loc1","loc2"],[["<",["car","loc1"],["car","loc2"]],"loc1"],[[">",["car","loc1"],["car","loc2"]],"loc2"],[["<",["second","loc1"],["second","loc2"]],"loc1"],[[">",["second","loc1"],["second","loc2"]],"loc2"],"loc1"],["function","later",["loc1","loc2"],[[">",["car","loc1"],["car","loc2"]],"loc1"],[["<",["car","loc1"],["car","loc2"]],"loc2"],[[">",["second","loc1"],["second","loc2"]],"loc1"],[["<",["second","loc1"],["second","loc2"]],"loc2"],"loc1"],["function","indentadj",["delta"],["preadjust",[".","sink","incol"],"+",["*","delta",[".","options","indentSize"]]],[["<",[".","sink","incol"],0],["set.","sink",["`","incol"],0]]],["function","nextline","false",["set[",[".","sink","rowtokens"],["preadjust",[".","sink","row"],"+",1],{array:[]}],["set.","sink",["`","col"],[".","sink","incol"]],[[">",[".","sink","hangdent"],0],["preadjust",[".","sink","col"],"+",[".","options","indentSize"]]]],["function&","outoken",["strs","false","str","toklen","outok","sym"],[[["<",[".","sink","col"],[".","sink","incol"]],["set.","sink",["`","col"],[".","sink","incol"]]]],["while","false",[["not",["not",["atom","strs"]]]],["=","str",["pop","strs"]],[[["not",["atom","str"]],["=","owntuple","str"],["continue"]]],[[["symbol","str"],["=","sym","str"],["=","str",["tostring","sym",{dictionary:{$quote:"true",$nonamespace:"true"}}]]]],[[[">",[".","str","length"],[".","options","maxStringLength"]],["=","str",[".","$[String ","concat",[[".","str","length"],"$]"]]]]],[[["==","str","$\n"],["nextline"],["continue"]],[[[">=",[".","str","indexOf",["$\n"]],0],["=","str",["totuple",[".","str","split",["$\n"]]]],["=","outok","false"],["loop","false",["push",["pop","str"],"outok"],[["empty","str"]],["push","$\n","outok"]],["outoken",["reverse","outok"]],["continue"]]]],["=","toklen",["length","str"]],[[["!=",[".","str","trim","false"],"$"],[[["&&",[".","sink","wrapping"],[">",["+",[".","sink","col"],"toklen"],[".","options","wrapMaxCol"]],[">",["-",[".","sink","col"],[".","sink","incol"]],[".","options","wrapMinAmount"]]],["nextline"]]],["=","outok",{dictionary:{$str:"str",$column:[".","sink","col"],$tuple:"owntuple"}}],[[["identity","sym"],["set.","outok",["`","symbol"],"sym"]]],[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"push",["outok"]]]],["preadjust",[".","sink","col"],"+","toklen"]]],["function","mktok","strs",["outoken","strs"]],["function","mktokil","strs",["call",["function","lambda",["false","result"],["set.","sink",["`","wrapping"],"false"],["=","result",["apply","mktok","strs"]],["set.","sink",["`","wrapping"],"true"],"result"]]],["function","spaces",["lop1"],[["not",["and","lop1",["atom","lop1"]]],[["identity","spaceout"],["mktok","space"]]],[["<",["deref",[".","grammar","right"],"lop1"],"lbp"],["mktok","space"]],[["<",["deref",[".","grammar","left"],"lop1"],"rbp"],["mktok","space"]],[["identity","spaceout"],["mktok","space"]],[["not",["isbreak","lop1"]],["mktok","space"]]],["function","parens",["str"],[["deref",[".","grammar","right"],"lop1"],[[">","lbp",["deref",[".","grammar","right"],"lop1"]],["mktokil","str"]],[["deref",[".","grammar","left"],"lop1"],[["<","rbp",["deref",[".","grammar","left"],"lop1"]]],["mktokil","str"]],["=","spaceout","false"]],[["deref",[".","grammar","left"],"lop1"],[["<","rbp",["deref",[".","grammar","left"],"lop1"]]],["mktokil","str"]]],["macro","getokens",["outputter","false","rowstart","colstart"],["function","dequeue",["false","rowdex","coldex","outqueue","col"],["=","outqueue",{array:[]}],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowstart"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[">=",[".","col","column"],"colstart"],["=","outqueue",[".","outqueue","concat",[[".",["deref",[".","sink","rowtokens"],"rowstart"],"splice",["coldex"]]]]],["set.","sink",["`","col"],[".","col","column"]]],["preadjust","coldex","+",1]]]],["set.","sink",["`","row"],"rowstart"],["set.","sink",["`","col"],"colstart"],["=","rowdex","rowstart"],["while","false",[["not",["<",["preadjust","rowdex","+",1],[".",[".","sink","rowtokens"],"length"]]]],[".","outqueue","push",[["`","row"]]],["=","outqueue",[".","outqueue","concat",[[".",["deref",[".","sink","rowtokens"],"rowdex"],"splice",[0]]]]]],[".",["deref",[".","sink","rowtokens"],"rowdex"],"splice",[["+","rowstart",1]]],"outqueue"],["=","rowstart",[".","sink","row"]],["=","colstart",[".","sink","col"]],[["eval","outputter"],["dequeue"]]],["function","putokens",["tokens","false","item"],["for",["let","lambda",["iter"],["=","iter",["iterate","tokens",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],[[["eq","item",["`","row"]],["nextline"]],[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"push",["item"]],["set.","sink",["`","col"],["+",[".","item","column"],["length",[".","item","str"]]]]]]]]],["function","tokenmark","false",{dictionary:{$rowstart:[".","sink","row"],$colstart:[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"length"],$col:[".","sink","col"],$incol:[".","sink","incol"]}}],["function","tokentruncate",["mark"],[".",["deref",[".","sink","rowtokens"],[".","mark","rowstart"]],"splice",[[".","mark","colstart"]]],[".",[".","sink","rowtokens"],"splice",[["+",[".","mark","rowstart"],1]]],["set.","sink",["`","row"],[".","mark","rowstart"]],["set.","sink",["`","col"],[".","mark","col"]],["set.","sink",["`","incol"],[".","mark","incol"]]],["function","exarray",["arr","false","adex","separator"],[[["deref",[".","sink","nocycles"],"arr"],["mktokil","$[","$<cyclic>","$]"],["return"]]],["set[",[".","sink","nocycles"],"arr","true"],["=","adex",0],["=","separator","space"],["while","false",[["not",["<","adex",[".","arr","length"]]]],[[["dictionary",["deref","arr",["postadjust","adex","+",1]]],["=","separator","$\n"],["break"]]]],["mktok","$["],[[["==","separator","$\n"],["nextline"],["indentadj",1]]],["=","adex",0],["while","false",[["not",["<","adex",[".","arr","length"]]]],[[[">=","adex",[".","options","maxElements"]],["mktok","$<...>"],["break"]]],[[[">","adex",0],["mktokil","$,","separator"]]],["exoutput",["deref","arr",["postadjust","adex","+",1]],"arr",0,0]],[[["==","separator","$\n"],["indentadj",-1]]],["mktok","$]"],["set[",[".","sink","nocycles"],"arr","false"]],["function","exdictionary",["dict","false","depths","dictmap","completed"],["function","render",["whitespace","keypad","false","mark","startrow","notfirst","keylen","keystr","savehang","key"],["=","mark",["tokenmark"]],["=","startrow",[".","sink","row"]],["=","savehang",[".","sink","hangdent"]],["set.","sink",["`","hangdent"],0],["set.","sink",["`","endprocNL"],"false"],[[["identity","keypad"],["mktok","{","$\n"]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],[[["||",["eq",["typeof",["deref","dict","key"]],"dictionary"],["eq",["typeof",["deref","dict","key"]],"array"]],["tokentruncate","mark"],["return","false"]]]]]],["mktok","{"]],[[["identity","keypad"],["indentadj",1]]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["=","keystr","key"],[[["&&",[".","options","quoted"],[".",[".","sink","quoteDict"],"test",["keystr"]]],["=","keystr",[".",'$"',"concat",["keystr",'$"']]]]],["=","keylen",["length","keystr"]],[[["&&","keypad",[">","keypad","keylen"]],["=","keystr",[".","keystr","concat",[[".","space","repeat",[["-","keypad","keylen"]]]]]]]],[[["identity","notfirst"],["mktokil","$,","whitespace"]],[[">",[".","sink","col"],[".","sink","incol"]],["mktokil","space"]]],["=","notfirst","true"],["mktokil","keystr","$:","space"],[[["eq",["typeof",["deref","dict","key"]],["typeof","dict"]],[["||",["deref",[".","sink","nocycles"],["deref","dict","key"]],["deref","dictmap",["deref","dict","key"]]],["mktokil","${","$<cyclic>","$}"]],["set[","dictmap",["deref","dict","key"],"true"],["outputdict",["deref","dict","key"],["+","depth",1]],["set[","dictmap",["deref","dict","key"],"false"]],["exoutput",["deref","dict","key"],"dict",0,0]],[[["&&",["not","keypad"],["!=",[".","sink","row"],"startrow"]],["tokentruncate","mark"],["return","false"]]]]]],[[["identity","keypad"],["indentadj",-1]]],["mktokil","space",["`","}"]],["set.","sink",["`","endprocNL"],"true"],["set.","sink",["`","hangdent"],"savehang"],["return","true"]],["function","computeMaxKeyLengths",["dict","depth","false","key","keylen"],[[["deref","dictmap","dict"],["return"]]],[[[">",["preadjust","completed","+",1],[".","options","maxElements"]],["return"]]],["set[","dictmap","dict","true"],[[["not",["deref","depths","depth"]],["set[","depths","depth",0]]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["=","keylen",["length","key"]],[[["<",["deref","depths","depth"],"keylen"],["set[","depths","depth","keylen"]]],[[["eq",["typeof",["deref","dict","key"]],["typeof","dict"]],["computeMaxKeyLengths",["deref","dict","key"],["+","depth",1]]]]]]],[[[">",["deref","depths","depth"],[".","options","maxKeyLength"]],["set[","depths","depth",[".","options","maxKeyLength"]]]],["set[","dictmap","dict","false"]],["function&","outputdict",["dict","depth","false","keypad"],[[[">",["preadjust","completed","+",1],[".","options","maxElements"]],["mktok","$<...>"],["return"]]],["=","keypad",["deref","depths","depth"]],[[["&&",[">","depth",0],["<","keypad",["+",["deref","depths",["-","depth",1]],[".","options","indentSize"]]]],["=","keypad",["+",["deref","depths",["-","depth",1]],[".","options","indentSize"]]]]],[["not",["render","$ "]],["render","$\n","keypad"]]],[[["deref",[".","sink","nocycles"],"dict"],["mktokil","${","$<cyclic>","$}"],["return","true"]]],["set[",[".","sink","nocycles"],"dict","true"],["=","depths",{array:[]}],["=","dictmap",["new","weakmap"]],["=","completed",0],["computeMaxKeyLengths","dict",0],["=","completed",0],["set[","dictmap","dict","true"],["outputdict","dict",0],["set[",[".","sink","nocycles"],"dict","false"],"true"],["function","exobject",["obj","false","str"],["=","str",["deref",["@","obj"],["`","\\.tostring"],["obj"]]],[[["not","str"],["=","str",["tostring","obj"]]]],["mktok","str"]],["function","exlist",["lex1","owner","paramlist","false","ex1","xpar","savetup","savenest"],["=","savetup","owntuple"],["=","savenest",[".","sink","procnesting"]],["set.","sink",["`","procnesting"],0],[[["identity","owner"],["=","owntuple","owner"]]],[[["empty","lex1"],["mktokil","$(","$)"]],["=","xpar","lex1"],["=","ex1",["pop","lex1"]],["mktok","$("],["preadjust",[".","sink","hangdent"],"+",1],["loop","false",[[["&&","paramlist",["not","ex1"]],["=","ex1","local"]]],["exoutput","ex1","xpar"],[[["empty","lex1"],[[["identity","lex1"],["mktokil","space","$.","space","lex1"]]],["break"]]],[[["eq","ex1","local"],["mktokil","space"]],["mktokil","$,","space"]],["=","xpar","lex1"],["=","ex1",["pop","lex1"]]],["preadjust",[".","sink","hangdent"],"-",1],["mktokil","$)"]],["set.","sink",["`","procnesting"],"savenest"],["=","owntuple","savetup"]],["function","exannotation",["lex1"],["exoutput",["cadar","lex1"],"owntuple",0,["deref",[".","grammar","left"],["`","@"]]],["mktok",["`","@"]],[["==",["caadr","lex1"],"`"],["exoutput",["cadadr","lex1"],"owntuple",["deref",[".","grammar","right"],["`","@"]],0]],["mktok","$["],["exoutput",["second","lex1"],"owntuple",0,0],["mktok","$]"]],["function&","exoutput",["expr","owntuple","rbp","lbp","spaceout","false","ex1","lop1","lex1"],[[["not","rbp"],["=","rbp",0]]],[[["not","lbp"],["=","lbp",0]]],[["atom","expr"],[["dictionary","expr"],["exdictionary","expr"]],[["array","expr"],["exarray","expr"]],[["object","expr"],["exobject","expr"]],[["and",["float","expr"],["or",["positive",[".","options","point"]],["zero",[".","options","point"]]]],["mktok",[".","expr","toFixed",["point"]]]],[["and",["negative","expr"],[">","lbp",[".","grammar","rightSign"]]],["mktok","$(",["tostring","expr"],"$)"]],[["symbol","expr"],["mktok","expr"]],[[".","options","quoted"],["mktok",["tostring","expr",{dictionary:{$quote:"true"}}]]],["mktok",["tostring","expr"]]],["=","owntuple","expr"],["=","lop1",["car","expr"]],["=","lex1",["cdr","expr"]],[["and","lex1",["empty","lex1"]],[[".","options","quoted"],["mktok",["tostring","expr",{dictionary:{$quote:"true"}}]]],["mktok",["tostring","expr"]]],[["not",["symbol","lop1"]],["exlist","expr"]],[["apply",["deref","formatter","lop1"],["list","lex1","lop1","rbp","lbp","hookif"]]],[["and",["not",["deref",[".","grammar","left"],"lop1"]],["not",["deref",[".","grammar","right"],"lop1"]],["not",["getproc","lop1"]]],["exlist","expr"]],[["empty","lex1"],["mktok","lop1"],["mktokil","$(","$)"]],[["==","lop1","quote"],["mktok","lop1"],["exoutput","ex1","owntuple",[".","grammar","highBind"],0]],["=","ex1",["pop","lex1"]],[["empty","lex1"],["parens","$("],[["deref",[".","grammar","right"],"lop1"],["mktok","lop1"],["spaces","lop1"],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"]],[["deref",[".","grammar","left"],"lop1"],["exoutput","ex1","owntuple",0,["deref",[".","grammar","left"],"lop1"]],["spaces","lop1"],["mktok","lop1"],["parens","$)"]],["mktok","lop1"],["exlist",["cdr","expr"],"expr"]],[["and",["deref",[".","grammar","right"],"lop1"],["deref",[".","grammar","left"],"lop1"]],["parens","$("],["exoutput","ex1","owntuple",0,["deref",[".","grammar","left"],"lop1"]],["loop","false",["=","ex1",["pop","lex1"]],["spaces","lop1"],["mktok","lop1"],["spaces","lop1"],[["empty","lex1"]],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],["deref",[".","grammar","left"],"lop1"]]],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"]],["mktok","lop1"],["exlist",["cdr","expr"],"expr"]],["function&","exbody",["upbody","inloop","nobrace","false","startin","lastitem"],["function","debugExbody","args",[["identity","false"],["apply",[".",[".","Naan","debug"],"debuglog"],"args"]]],["function","braceOpen","false",[[[".","options","compact"],["mktokil","space","${"]],["nextline"],["mktok","${"]],["indentadj",1]],["function","braceClose",["goleft"],["indentadj",-1],[["&&",["and",[".","options","compact"],["not","goleft"]],[">",[".","sink","incol"],"startin"]],["mktokil","space","$}"]],["nextline"],["mktok","$}"]],["function","mkiftest",["test","didif"],["nextline"],["preadjust",[".","sink","hangdent"],"+",1],[[["==","test",["`",["identity","true"]]],["mktok","test","$else"]],[[["identity","didif"],["mktok","test","$else if","space"]],["mktok","test","$if","space"]],[["==",["car","test"],["`","identity"]],["exoutput",["second","test"],"test",0,0,"true"]],["exoutput","test","test",0,0,"true"]],["preadjust",[".","sink","hangdent"],"-",1]],["function","mkindented",["upbody","inloop","elseafter"],[["||",[">=",["length",["cdr","upbody"]],2],["&&",["atom",["caar","upbody"]],[">=",["length","upbody"],2]],["&&","upbody","inloop"],["&&","elseafter",["tuple",["car","upbody"]],["tuple",["caar","upbody"]]],["dictionary",["car","upbody"]]],["debugExbody","$mkindented 0","upbody","$|","inloop","$|","elseafter"],["braceOpen"],["mkitems","upbody","false","false"],[[["identity","inloop"],["nextline"],["mktok","$break"]]],["braceClose"]],["debugExbody","$mkindented 1","upbody","$|","inloop","$|","elseafter"],["indentadj",1],["mkitems","upbody","false","false"],[[["identity","inloop"],["mktokil","space","$break"]],[["not","upbody"],["mktokil","space","${ }"]]],["indentadj",-1]],["function","mkitems",["upbody","didif","inloop","false","item","fitem","ffitem","fffitem"],[["empty","upbody"]],[[["deref",[".","sink","tuplemap"],"upbody"],["set.",["deref",[".","sink","tuplemap"],"upbody"],["`","bp"],"true"]]],["=","item",["car","upbody"]],["=","fitem",["car","item"]],["=","ffitem",["car","fitem"]],["=","fffitem",["car","ffitem"]],["debugExbody","$mkitems 0","item","$|","fitem","$|","ffitem","$|","fffitem","$>",["cdr","upbody"]],[[["and","didif",["or",["atom","item"],["atom","fitem"],["and",["not",["atom","ffitem"]],["atom","fffitem"]]]],["debugExbody","$mkitems 1","didif"],["nextline"],["mktok","$else"],["mkindented","upbody","false",["&&",["not",["atom","item"]],["not",["atom","fitem"]]]],["=","upbody","false"]],[["or",["atom","item"],["atom","fitem"]],["debugExbody","$mkitems 2"],[[["&&","lastitem",["array","item"]],["mktok","$,"]]],["nextline"],["exoutput","item","upbody",0,0,"true"]],[["atom","ffitem"],["debugExbody","$mkitems 3","didif","inloop",["atom",["cddr","item"]],["tuple",["cdr","upbody"]],["atom",["caaadr","upbody"]]],["mkiftest",["car","item"],"didif"],["mkindented",["cdr","item"],"inloop",["&&",["atom",["cddr","item"]],["tuple",["cdr","upbody"]],["atom",["caaadr","upbody"]]]],["=","didif",["not","inloop"]]],["mkiftest",["caar","item"],"didif"],["debugExbody","$mkitems 4",["cdar","item"],"$|",["cadr","item"],"$|",["caadr","item"]],["mkindented",["cdar","item"],"false",["tuple",["&&",["caaar","item"],["tuple",["cadr","item"]]]]],["mkitems",["cdr","item"],"true","false"],["=","didif","false"]],["=","lastitem","item"],["mkitems",["cdr","upbody"],"didif","inloop"]],["=","startin",[".","sink","incol"]],["debugExbody","$=====","upbody","nobrace"],[["identity","nobrace"],["indentadj",1],["mkitems","upbody","false","inloop"],["indentadj",-1]],["braceOpen"],["mkitems","upbody","false","inloop"],["braceClose",["&&",["==",[".","sink","procnesting"],1],[".","sink","endprocNL"]]]],["=","hookif",{dictionary:{$parens:"parens",$spaces:"spaces",$mktok:"mktok",$mktokil:"mktokil",$nextline:"nextline",$indentadj:"indentadj",$grammar:"grammar",$exlist:"exlist",$exannotation:"exannotation",$exoutput:["function","lambda",["expr","owner","rbp","lbp","spaceout"],[[["not","owner"],["=","owner","owntuple"]]],["exoutput","expr","tuple","rbp","lbp","spaceout"]],$exbody:["function","lambda",["upbody","inloop","nobrace"],["preadjust",[".","sink","procnesting"],"+",1],["exbody","upbody","inloop","nobrace"],["preadjust",[".","sink","procnesting"],"-",1]]}}],["function","uhookproc",["lex1","proctype","false","fname","fbind","parms"],["preadjust",[".","sink","procnesting"],"+",1],["=","fname",["car","lex1"]],[[["&&",["not",[".","options","noComments"]],["not",[".","sink","maproot"]],["deref",["@","fname"],["`","\\.sourcemap"]]],["set.","sink",["`","maproot"],["cons","proctype","lex1"]]]],["=","fbind","lex1"],["mktok",["tostring","proctype",{dictionary:{$noquote:"true"}}]],["mktok","space"],[[["not",["lambda","fname"]],["exoutput","fname","lex1",0,0,"true"]]],["=","parms",["cadr","fbind"]],[[["identity","parms"],[["atom","parms"],["mktok","space","parms"]],["exlist","parms",["cdr","fbind"],"true"]],["mktok","$(","$)"]],["exbody",["cddr","fbind"]],[[["deref",["@","fname"],["`","\\.lingoInit"]],["mktok","$(","$)"]]],[[["and",[">",[".","sink","procnesting"],1],[".","sink","endprocNL"]],["nextline"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhook`",["lex1","lop1","false","ex1"],["parens","$("],["mktok","lop1"],["=","ex1",["car","lex1"]],[[["atom","ex1"],["exoutput","ex1","owntuple",0,0]],["exlist","ex1"]],["parens","$)"],"true"],["function","uhook=",["lex1","lop1"],["parens","$("],[[["tuple",["car","lex1"]],["mktok","quote"]]],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","space","lop1","space"],["exoutput",["second","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0,"true"],["parens","$)"],"true"],["function","uhookpreadjust",["lex1","lop1","false","target","adjuster","value"],["parens","$("],["=","target",["car","lex1"]],["=","adjuster",["second","lex1"]],["=","value",["third","lex1"]],[[["==","value",1],["mktok","adjuster","adjuster"],["exoutput","target","owntuple",0,["deref",[".","grammar","right"],"adjuster"]]],["exoutput","target","owntuple",0,["deref",[".","grammar","left"],["`","="]]],["mktok","space","adjuster",["`","="],"space"],["exoutput","value","expr",["deref",[".","grammar","right"],["`","="]],0]],["parens","$)"],"true"],["function","uhookpostadjust",["lex1","lop1","false","target","adjuster","value"],["=","target",["car","lex1"]],["=","adjuster",["second","lex1"]],["=","value",["third","lex1"]],[["==","value",1],["parens","$("],["exoutput","target","owntuple",0,["deref",[".","grammar","right"],"adjuster"]],["mktok","adjuster","adjuster"],["parens","$)"],"true"]],["function","uhookbreco",["lex1","lop1"],[["identity","lex1"],["mktok","lop1","space","$:",["tostring",["car","lex1"],{dictionary:{$quote:"true",$nonamespace:"true"}}]]],["mktok","lop1"],"true"],["function","uhookreturn",["lex1","lop1"],[["identity","lex1"],["mktok","lop1","space","$("],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","$)"]],["mktok","lop1"],"true"],["function","uhookcond",["lex1","lop1"],["mktok","lop1","$("],["preadjust",[".","sink","procnesting"],"+",1],["exbody","lex1"],["preadjust",[".","sink","procnesting"],"-",1],["mktok","$)"],"true"],["function","uhookloop",["lex1","lop1","false","looptag"],["=","looptag",["pop","lex1"]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1"]],["preadjust",[".","sink","procnesting"],"+",1],["exbody","lex1","true",["not",["cdr","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookwhile",["lex1","lop1","false","flex","looptag"],["=","looptag",["pop","lex1"]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1","space"]],["=","flex",["car","lex1"]],[[["==",["caar","flex"],["`","not"]],["exoutput",["cadar","flex"],"owntuple",0,0,"true"]],["exoutput","flex","owntuple",0,0,"true"]],["preadjust",[".","sink","procnesting"],"+",1],["exbody",["cdr","lex1"],"true",["not",["cddr","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookfor",["lex1","lop1","false","flex","looptag","targex","varex","upbody"],["=","flex",["car","lex1"]],["=","looptag",[".",[".","flex",4],1]],["=","targex",[".",[".",[".","flex",3],2],1]],["=","varex",[".",[".",[".",[".","flex",3],2],2],1]],["=","upbody",[".",[".","flex",4],-4]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1","space"]],["exoutput","varex","owntuple",0,0,"true"],["mktok","space","$in","space"],["exoutput","targex","owntuple",0,0,"true"],["preadjust",[".","sink","procnesting"],"+",1],["exbody","upbody","true",["not",["cdr","upbody"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookcall",["lex1","lop1","false","callee"],["=","callee",["car","lex1"]],["set.","sink",["`","endprocNL"],"false"],["preadjust",[".","sink","procnesting"],"+",1],["lprAdjust","uhookProc",1],[[["procedure","callee"],["exoutput","callee","owntuple",0,0],["mktokil","space","$("]],["mktokil","lop1","$("],["exoutput","callee","owntuple",0,0],[["not",["empty",["cdr","lex1"]]],["mktok","$,","space"]]],["set.","sink",["`","endprocNL"],"true"],["=","lex1",["cdr","lex1"]],["loop","false",[["empty","lex1"]],["exoutput",["pop","lex1"],"owntuple",0,0],[["empty","lex1"]],["mktok","$,","space"]],["mktokil","$)"],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookquotient",["lex1","lop1","false","op"],[[["==",["deref",[".","grammar","infix"],["`","/"]],["deref",[".","grammar","infix"],["`","/."]]],["=","op",["`","/"]]],["=","op",["`","/."]]],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","space","op","space"],["exoutput",["second","lex1"],"owntuple",["deref",[".","grammar","right"],"op"],0,"true"],["parens","$)"],"true"],["function&","uhookcatch",["lex1","lop1"],["set.","sink",["`","endprocNL"],"false"],["mktok","$try"],["preadjust",[".","sink","procnesting"],"+",1],["exbody",["car","lex1"]],[[["not",["second","lex1"]]],["nextline"],["mktok","$catch"],["exbody",["second","lex1"]]],[[["not",["third","lex1"]]],["nextline"],["mktok","$finally"],["exbody",["third","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],["set.","sink",["`","endprocNL"],"true"],"true"],["function","uhook.",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"lop1"]],["mktok",["`","."]],["exoutput",["second","lex1"],"owntuple",0,0],[[["not",["empty",["cddr","lex1"]]],["exlist",["caddr","lex1"]]]],["parens","$)"],"true"],["function","uhookset.",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"lop1"]],["mktok",["`","."]],["exoutput",["cadadr","lex1"],"owntuple",0,0],["mktok","space",["`","="],"space"],["exoutput",["third","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"],"true"],["function","uhookset[",["lex1","lop1","false","expr"],["parens","$("],[[["==",["caar","lex1"],["`","@"]],["exannotation","lex1"]],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"$["]],["mktok","$["],["=","expr",["second","lex1"]],[[["||",["empty","expr"],["getproc",["car","expr"]]],["exoutput","expr","owntuple",0,0]],["loop","false",["exoutput",["pop","expr"],"owntuple",0,0],[["empty","expr"]],["mktok","$,"]]],["mktok","$]"]],["mktok","space",["`","="],"space"],["exoutput",["third","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"],"true"],["function","uhookderef",["lex1","lop1","false","expr"],["parens","$("],[[["==",["caar","lex1"],["`","@"]],["exannotation","lex1"]],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"$["]],["mktok","$["],["=","expr",["second","lex1"]],[[["==","lop1",["`","deref"]],["exoutput","expr","owntuple",0,0]],["loop","false",["exoutput",["pop","expr"],"owntuple",0,0],[["atom","expr"]],["mktok","$,"]]],["mktok","$]"]],[[["not",["empty",["cddr","lex1"]]],["exlist",["caddr","lex1"]]]],["parens","$)"],"true"],["function","uhookref*",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,0],["mktok","lop1"],["parens","$)"],"true"],["function","uhooknot",["lex1","lop1"],[[["==",["caar","lex1"],["!",["`","="]]],["return",["uhook=",["cdar","lex1"],["!",["`","="]]]]]],["parens","$("],["mktok","$!"],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","right"],"lop1"]],["parens","$)"],"true"],["function","uhookbang",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","postleft"],"lop1"]],["mktok","$!"],["parens","$)"],"true"],["function","commentInject",["comments","false","newrows","readx","added","acom","type","textlines","text","col"],["function","addcol",["row","str","col"],[".","row","push",[{dictionary:{$str:"str",$column:"col"}}]],"row"],["=","newrows",{array:[]}],["=","readx",0],["=","added",0],["for",["let","lambda",["iter"],["=","iter",["iterate","comments",["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["=","type",[".","acom",2]],["=","col",[".","acom",1]],["=","textlines",[".",[".","acom",3],"split",["$\n"]]],["while","false",[["not",[">",[".","textlines","length"],0]]],["=","text",[".","textlines","shift","false"]],[[["not",[".","acom",0]],[".","newrows","push",[["addcol",{array:[]},"text",[".","acom",1]]]],["preadjust","added","+",1]],["while","false",[["not",["&&",["<",[".","newrows","length"],["+",[".","acom",0],"added"]],["<","readx",[".",[".","sink","rowtokens"],"length"]]]]],[".","newrows","push",[["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]]]]],[[["||",["<=","type",0],[">=","readx",[".",[".","sink","rowtokens"],"length"]]],[".","newrows","push",[["addcol",{array:[]},"text","col"]]],["preadjust","added","+",1]],[[["<","col",[".","options","commentCol"]],["=","col",[".","options","commentCol"]]]],[".","newrows","push",[["addcol",["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]],"text","col"]]],["=","type",0]]]]]]],["while","false",[["not",["<","readx",[".",[".","sink","rowtokens"],"length"]]]],[".","newrows","push",[["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]]]]],["set.","sink",["`","rowtokens"],"newrows"],["set.","sink",["`","row"],[".","newrows","length"]]],["function","commentMap",["false","locmap","nodecount","sourcemap","output","acom","nodeloc"],["function","remap",["expr","nodeloc"],[["atom","expr"],["preadjust","nodecount","+",1],[".","locmap","push",[[".","nodeloc","first"]]]],["=","nodeloc",["deref",[".","sink","tuplemap"],"expr"]],["remap",["car","expr"],"nodeloc"],[["cdr","expr"],["remap",["cdr","expr"],"nodeloc"]]],[[["not",[".","sink","maproot"]],["return","false"]]],["=","locmap",{array:[]}],["=","nodecount",0],["remap",[".","sink","maproot"]],["=","sourcemap",["deref",["@",[".",[".","sink","maproot"],1]],["`","\\.sourcemap"]]],[[["!=",[".","sourcemap","count"],"nodecount"],["debuglog",[".","$sourcemap mismatch in ","concat",[[".",[".","sink","maproot"],1],"$: "]],"nodecount","$vs",[".","sourcemap","count"]]]],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sourcemap","comments"],["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["=","nodeloc",["deref","locmap",[".","acom",0]]],[".","output","push",[["list",[".","nodeloc",0],[".","nodeloc",1],[".","acom",1],[".","acom",2]]]]]]],"output"],["function","indextuples",["false","remaining"],["function","enqueue",["expr","false","node"],[["atom","expr"],"expr"],["=","node",{dictionary:{$tuple:"expr",$sink:"sink"}}],[".",[".","sink","mirrors"],"push",["node"]],[".","remaining","push",["node"]],["set[",[".","sink","tuplemap"],"expr","node"]],["function","dequeue",["false","node"],["while","false",[["not",[">",[".","remaining","length"],0]]],["=","node",[".","remaining","pop","false"]],["set.","node",["`","car"],["enqueue",["car",[".","node","tuple"]]]],["set.","node",["`","cdr"],["enqueue",["cdr",[".","node","tuple"]]]]]],["=","remaining",{array:[]}],["set.","sink",["`","mirrors"],{array:[]}],["set.","sink",["`","tuplemap"],["new","weakmap"]],["set.","sink",["`","mirroroot"],["enqueue","origexpr"]],["dequeue"]],["function","tuplelocupdate",["false","tuplex","data","rowdex","col","nodemap"],["function","childloc",["node","false","ex1","lex1","loc","retloc"],[[["not",["dictionary","node"]],["return","false"]]],[[["deref","nodemap","node"],["return",["deref","nodemap","node"]]]],["set[","nodemap","node","true"],["=","lex1","node"],["while","false",[["not",["eq",[".","lex1","sink"],"sink"]]],["=","ex1",[".","lex1","car"]],[[["&&",["dictionary","ex1"],["eq",[".","ex1","sink"],"sink"]],["=","loc",["childloc","ex1"]]],["=","loc","false"]],[[["identity","loc"],[[["not",[".","lex1","first"]],["set.","lex1",["`","first"],[".","loc","first"]],["set.","lex1",["`","last"],[".","loc","last"]]],["set.","lex1",["`","first"],["earlier",[".","loc","first"],[".","lex1","first"]]],["set.","lex1",["`","last"],["later",[".","loc","last"],[".","lex1","last"]]]]]],[[["not","retloc"],["=","retloc",{dictionary:{$first:[".","lex1","first"],$last:[".","lex1","last"]}}]],[[[".","lex1","first"],["set.","retloc",["`","first"],["earlier",[".","lex1","first"],[".","retloc","first"]]],["set.","retloc",["`","last"],["later",[".","lex1","last"],[".","retloc","last"]]]]]],["=","lex1",[".","lex1","cdr"]]],["=","lex1","node"],["while","false",[["not",["eq",[".","lex1","sink"],"sink"]]],[[["not",[".","lex1","first"]],["set.","lex1",["`","first"],[".","retloc","first"]],["set.","lex1",["`","last"],[".","retloc","last"]]]],["=","lex1",[".","lex1","cdr"]]],["set[","nodemap","node","retloc"],"retloc"],["=","tuplex",0],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","data",["deref",[".","sink","mirrors"],["postadjust","tuplex","+",1]]],["set.","data",["`","first"],"undefined"]],["=","rowdex",0],["while","false",[["not",["<=","rowdex",[".","sink","row"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowdex"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],["=","data",["deref",[".","sink","tuplemap"],[".","col","tuple"]]],[[["not","data"],["continue"]]],[[["not",[".","data","first"]],["set.","data",["`","first"],["list","rowdex",[".","col","column"]]]]],["set.","data",["`","last"],["list","rowdex",["+",[".","col","column"],["length",[".","col","str"]]]]]]]],["preadjust","rowdex","+",1]],["=","nodemap",["new","weakmap"]],["childloc",[".","sink","mirroroot"]],"true"],["function","indexbps",["false","tuplex","node"],["set.","sink",["`","breaks"],{array:[]}],["=","tuplex",0],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","node",["deref",[".","sink","mirrors"],"tuplex"]],[[[".","node","bp"],[".",[".","sink","breaks"],"push",["node"]]]],["preadjust","tuplex","+",1]],[".",[".","sink","breaks"],"sort",[["function","lambda",["a","b"],["=","compare",["<=>",[".",[".","a","first"],0],[".",[".","b","first"],0]]],[[["==","compare",0],["=","compare",["<=>",[".",[".","a","first"],1],[".",[".","b","first"],1]]]]],"compare"]]]],["function","updatecheck",["false","update","comments"],[[["not",[".","sink","tuplemap"]],["set.","sink",["`","rowtokens"],{array:[{array:[]}]}],["indextuples"],["=","update","true"]]],[[["||",["<",[".",[".","sink","rowtokens"],"length"],1],["&&",["==",[".",[".","sink","rowtokens"],"length"],1],["<",[".",["deref",[".","sink","rowtokens"],0],"length"],1]]],["exoutput","origexpr","origexpr",0,0,"true"]]],[["identity","update"],["tuplelocupdate"],["indexbps"],[[".","sink","maproot"],["=","comments",["commentMap"]],[["identity","comments"],["commentInject","comments"],["tuplelocupdate"]]]]],["set.","unparser",["`","dumptuples"],["function","dumptuples",["false","tuplex","data","bp","mismatch","summary"],["updatecheck"],["=","tuplex",0],["debuglog","$=====tuples====="],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","data",["deref",[".","sink","mirrors"],"tuplex"]],[[["eq",["deref",[".","sink","tuplemap"],[".","data","tuple"]],"data"],["=","mismatch","$"]],["=","mismatch","$mismatch"]],[[[".","data","bp"],["=","bp","$bp"]],["=","bp","$  "]],["=","summary",[".",["tostring",[".","data","tuple"]],"substr",[0,80]]],["debuglog",["prepad","tuplex",4],["prepad",[".","data","first"],9],["prepad",[".","data","last"],9],"bp","mismatch","summary"],["preadjust","tuplex","+",1]]]],["set.","unparser",["`","dumptokens"],["function","dumptokens",["false","rowdex","data","summary","col"],["updatecheck"],["=","rowdex",0],["debuglog","$=====tokens====="],["while","false",[["not",["<=","rowdex",[".","sink","row"]]]],["debuglog","$row","rowdex"],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowdex"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],["=","data",["deref",[".","sink","tuplemap"],[".","col","tuple"]]],["=","summary",[".",["tostring",[".","col","tuple"]],"substr",[0,80]]],["debuglog",["prepad",[".","col","column"],6],["prepad",[".","col","str"],9],"$  ","summary"]]]],["preadjust","rowdex","+",1]]]],["set.","unparser",["`","breakpoints"],["function","breakpoints",["false","result","data"],["updatecheck"],["=","result",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sink","breaks"],["`","data"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","data",[".","iter","$value"]],[".","result","push",[{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]]]],"result"]],["set.","unparser",["`","findbreak"],["function","findbreak",["location","false","data"],["updatecheck"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sink","breaks"],["`","data"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","data",[".","iter","$value"]],[[["&&",["<=",["car","location"],["car",[".","data","first"]]],["||",["not",["second","location"]],["<=",["second","location"],["second",[".","data","first"]]]]],["return",{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]]]]],"false"]],["set.","unparser",["`","findtoken"],["function","findtoken",["location","false","col"],["updatecheck"],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],["car","location"]],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["||",["not",["second","location"]],["&&",[">=",["second","location"],[".","col","column"]],["<",["second","location"],["+",[".","col","column"],["length",[".","col","str"]]]]]],["return",{dictionary:{$first:[".","col","column"],$last:["+",[".","col","column"],["length",[".","col","str"]]],$str:[".","col","str"],$symbol:[".","col","symbol"],$tuple:[".","col","tuple"]}}]]]]]],"false"]],["set.","unparser",["`","findtuple"],["function","findtuple",["expr","false","data"],["updatecheck"],["=","data",["deref",[".","sink","tuplemap"],"expr"]],[["identity","data"],{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]],["set.","unparser",["`","setmarks"],["function","setmarks",["dict","false","mark","marklen"],["set.","sink",["`","maxmarklen"],0],["set.","sink",["`","markdict"],"dict"],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","mark"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","mark",[".","iter","$value"]],["=","marklen",[".",["tostring",["deref","dict","mark"]],"length"]],[[["<",[".","sink","maxmarklen"],"marklen"],["set.","sink",["`","maxmarklen"],"marklen"]]]]]],"dict"]],["set.","unparser",["`","string"],["function","string",["firstloc","lastloc","soptions","false","margin","rowdex","row","col","found","outstr","colpos","lineno","linepad"],["updatecheck"],[[["numeric",[".","soptions","leftMargin"]],["=","margin",[".","space","repeat",[[".","soptions","leftMargin"]]]]],["=","margin","$"]],[[["numeric",[".","soptions","lineNumbers"]],["=","lineno",["toint",[".","soptions","lineNumbers"]]],["=","linepad",["+",["length",["tostring",["+","lineno",[".",[".","sink","rowtokens"],"length"]]]],1]]]],[[["dictionary","firstloc"],["=","lastloc",[".","firstloc","last"]],["=","firstloc",[".","firstloc","first"]]]],[[["identity","firstloc"],[[["not",["apply","numeric","firstloc"]],["return","false"]]],["=","rowdex",["car","firstloc"]],[["identity","lineno"],["preadjust","lineno","+","rowdex"]]],["=","rowdex",0]],["=","found",["not",["&&","firstloc",["second","firstloc"]]]],[[["&&","lastloc",["not",["apply","numeric","lastloc"]]],["return","false"]]],["loop","false",[["||",[">=","rowdex",[".",[".","sink","rowtokens"],"length"]],["&&","lastloc",[">","rowdex",["car","lastloc"]]]]],["=","row",["deref",[".","sink","rowtokens"],"rowdex"]],[[["identity","outstr"],["=","outstr",[".","outstr","concat",["$\n","margin"]]]],["=","outstr","margin"]],[[["identity","lineno"],["=","outstr",[".","outstr","concat",[["prepad","lineno","linepad"],"$ "]]],[[[".","sink","maxmarklen"],[["deref",[".","sink","markdict"],"lineno"],["=","outstr",[".","outstr","concat",[["deref",[".","sink","markdict"],"lineno"],"$ "]]]],["=","outstr",[".","outstr","concat",[[".","space","repeat",[["+",[".","sink","maxmarklen"],1]]]]]]]],["preadjust","lineno","+",1]]],["=","colpos",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["not","found"],["=","colpos",["second","firstloc"]],[[["<=",["+",[".","col","column"],["length",[".","col","str"]]],["second","firstloc"]],["continue"]]],["=","found","true"]]],[["&&","lastloc",["second","lastloc"],[">=","rowdex",["car","lastloc"]],[">=",[".","col","column"],["second","lastloc"]]]],[[["<","colpos",[".","col","column"]],["=","outstr",[".","outstr","concat",[[".","space","repeat",[["-",[".","col","column"],"colpos"]]],[".","col","str"]]]]],["=","outstr",[".","outstr","concat",[[".","col","str"]]]]],["=","colpos",["+",[".","col","column"],["length",[".","col","str"]]]]]]],["preadjust","rowdex","+",1]],"outstr"]],"unparser"]),e._AddPropertyList("LingoUnparseInit",[["$.lingoInit","true"]]),e._SetBindingList("LingoUnparseInit",["function","LingoUnparseInit",["false","manifest"],["=","manifest",["`",["LingoPrinter","LingoUnparser","LingoUnparseInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$Unparse",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],[".",[".","Naan","module"],"letinherit",["$Lib"]],["set.",[".","modobj","exports"],["`","Printer"],"LingoPrinter"],["set.",[".","modobj","exports"],["`","LingoUnparser"],"LingoUnparser"]]]]]),e._Execute(["LingoUnparseInit"]),e._SetNamespace(t.slice(1),!0),e._SetNamespace("CLI"),e._Execute([".",[".","Naan","module"],"letinherit",["$Lang_Lingo"]]),e._SetBindingList("Utils",["closure","Utils",["options","false","utils","registry","upcache"],["=","utils",["new","object","this"]],[[["not","options"],["=","options",{dictionary:{}}]]],[[["not",[".","options","cacheSize"]],["set.","options",["`","cacheSize"],50]]],["=","registry",[".",[".",[".",["modlist"],"Lib"],"exports"],"Registry"]],["set.","utils",["`","calculateDialects"],["function","calculateDialects",["expr","false","nsmap","nslist","ns","dialect","langs"],["function","travProc",["trav"],[[["&&",["symbol","trav"],"trav"],[[["not",["deref","nsmap",[".","trav","namespace"]]],["push",[".","trav","namespace"],"nslist"],["set[","nsmap",[".","trav","namespace"],"true"]]],["return"]]],["while","false",[["not",["tuple","trav"]]],["travProc",["car","trav"]],["=","trav",["cdr","trav"]]]],["=","nsmap",["new","weakmap"]],["travProc","expr"],["for",["let","lambda",["iter"],["=","iter",["iterate","nslist",["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],["=","dialect",[".","registry","findNamespace",["ns"]]],[[["&&","dialect",["not",["member","dialect","langs"]]],["push","dialect","langs"]]]]]],"langs"]],["set.","utils",["`","unparseInfo"],["function","unparseInfo",["expr","false","up"],[[["not","upcache"],["=","upcache",["new","nonce"]],["set.","upcache",["`","map"],["new","weakmap"]],["set.","upcache",["`","lru"],{array:[]}]],["=","up",["deref",[".","upcache","map"],"expr"]],[["&&","up",["!==",["deref","lru",["-",[".","lru","length"],1]],"up"]],["set.","upcache",["`","lru"],[".",[".","upcache","lru"],"filter",[["function","lambda",["entry"],["!==","entry","up"]]]]],[".",[".","upcache","lru"],"push",["up"]]]],[[["not","up"],["=","up",{dictionary:{$expression:"expr",$dialects:[".","utils","calculateDialects",["expr"]]}}],["set.","up",["`","dialect"],[".",[".","up","dialects"],0]],[[["not",[".","up","dialect"]],["set.","up",["`","dialect"],[".","registry","findName",[[".",[".","registry","dialects","false"],0]]]]]],[[[".","up","dialect"],["set.","up",["`","unparser"],[".",[".","up","dialect"],"unparse",["expr"]]]]],["set[",[".","upcache","map"],"expr","up"],[".",[".","upcache","lru"],"push",["up"]],[[">",[".",[".","upcache","lru"],"length"],[".","options","cacheSize"]],["set[",[".","upcache","map"],[".",[".",[".","upcache","lru"],"shift","false"],"expression"],"undefined"]]]],"up"]],["set.","utils",["`","unparser"],["function","unparser",["expr"],[".",["unparseInfo","expr"],"unparser"]]],["set.","utils",["`","sourcelist"],["function","sourcelist",["procdef","start","end","marks","false","up"],["=","up",[".","utils","unparser",["procdef"]]],[".","up","setmarks",["marks"]],[[["identity","start"],["=","start",["list",["-","start",1]]],[["identity","end"],["=","end",["list",["-","end",1]]]],["=","end","start"]]],[".","up","string",["start","end",{dictionary:{$lineNumbers:1}}]]]],["set.","utils",["`","symns"],["function","symns",["name","ns"],[[["symbol","name"],["return","name"]]],[[["not","ns"],["=","ns",[".",["nsactive"],0]]]],[".","ns","lookup",["name"]]]],["set.","utils",["`","findns"],["function","findns",["nstr","false","ns"],[[["not",["string","nstr"]],["return","nstr"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["nsactive"],["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],[[["==","nstr",["namespace","ns"]],["return","ns"]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["nsactive","true"],["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],[[["==","nstr",["namespace","ns"]],["return","ns"]]]]]],"false"]],["set.","utils",["`","makeLocation"],["function","makeLocation",["sym","task","false","start"],[[["identity","task"],["=","tuplespec",[".",[".","utils","unparser",[["getproc","sym"]]],"findtuple",["task"]]],["=","start",["+",[".",[".","tuplespec","first"],0],1]]]],["list",[".",[".","sym","namespace"],"tostring"],"sym","start"]]],["set.","utils",["`","resolveLocation"],["function","resolveLocation",["location","symbols","false","path","procname","procsym","ns","procdef"],["function","pathmatch",["parent","path","false","segment"],[[["empty","path"],["return","parent"]]],["=","segment",["tostring",["pop","path"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",["@","parent"],["`","\\.children"]],["`","child"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","child",[".","iter","$value"]],[[["==",["tostring","child"],"segment"],["return",["pathmatch","child","path"]]]]]]],"false"],["function","findsym",["name"],["for",["let","lambda",["iter"],["=","iter",["iterate","symbols",["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],[[["==","sym","name"],["return","sym"]]]]]],"false"],["=","path",[".","location",1]],[[["symbol","path"],["=","procsym","path"]],[[["tuple","path"],["=","procname",["car","path"]]],["=","procname","path"]],["=","procsym",["findsym","procname"]],[[["not","procsym"],[[".","location",0],[[["string",[".","location",0]],["=","ns",[".","utils","findns",[[".","location",0]]]]],["=","ns",[".","location",0]]],["=","procsym",[".","utils","symns",["procname","ns"]]]],["=","procsym",["interned","procname"]]]],[["tuple","path"],["=","procsym",["pathmatch","procsym",["cdr","path"]]]]],["=","procdef",["getproc","procsym"]],[[["||",["not",["tuple","procdef"]],["not",["cdddr","procdef"]]],["=","procdef","false"]]],"procdef"]],["set.","utils",["`","breakLocation"],["function","breakLocation",["location","symbols","false","procdef"],["=","procdef",[".","utils","resolveLocation",["location","symbols"]]],[[["not","procdef"],["return"]]],[[".","location",2],[".",[".",[".","utils","unparser",["procdef"]],"findbreak",[["list",["-",[".","location",2],1]]]],"tuple"]],["cdddr","procdef"]]],["set.","utils",["`","locationString"],["function","locationString",["location","false","output"],[[["symbol",[".","location",1]],["=","output",[".","utils","procname",[[".","location",1]]]]],[["tuple",[".","location",1]],["=","output",[".",["new","array",[".","location",1]],"join",["$."]]]],["=","output",["tostring",[".","location",1]]]],[[[".","location",0],["=","output",[".",[".","location",0],"concat",["$::","output"]]]]],[[[".","location",2],["=","output",[".","output","concat",["$:",[".","location",2]]]]]],[[[".","location",3],["=","output",[".","output","concat",["$:",[".","location",3]]]]]],"output"]],["set.","utils",["`","alignColumns"],["function","alignColumns",["lex1","widths","false","ex1"],["function","calcrow",["row","false","col","coldex"],["function","cf",["field","prev","false","width"],["=","width",[".",["tostring","field"],"length"]],[[["<","width","prev"],["=","width","prev"]]],"width"],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["not",["deref","widths","coldex"]],["set[","widths","coldex",0]]],["set[","widths","coldex",["cf","col",["deref","widths","coldex"]]],["preadjust","coldex","+",1]]]]],["=","widths",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","lex1",["`","ex1"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ex1",[".","iter","$value"]],["calcrow","ex1"]]]],"widths"]],["set.","utils",["`","proclist"],["function","proclist",["name","false","result"],["while","false",[["not","name"]],["=","result",["cons","name","result"]],["=","name",["deref",["@","name"],["`","\\.parent"]]]],"result"]],["set.","utils",["`","procname"],["function","procname",["name"],[".",[".",[".",["proclist","name"],"toarray"],"map",[["function","lambda",["x"],["tostring","x"]]]],"join",["$."]]]],["set.","utils",["`","procstring"],["function","procstring",["proc","false","output","parm"],[[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$()"]]]]],[[["atom",[".","proc",2]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$ ",[".","proc",2]]]]]],["=","output",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",["parm","$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","utils",["`","callstring"],["function","callstring",["proc","dons","false","output","parm","name"],["=","name",["procname",[".","proc",1]]],[[["identity","dons"],["=","name",[".",[".",[".",[".","proc",1],"namespace"],"tostring"],"concat",["$::","name"]]]]],[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],[".","name","concat",["$()"]]],[["atom",[".","proc",2]],[".","name","concat",["space",[".","proc",2]]]],["=","output",[".","name","concat",["$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",[["car","parm"],"$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","utils",["`","getnumargs"],["function","getnumargs",["cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\d+)\\s*$"]]]],[[["identity","args"],["return",["toint",["deref","args",1]]]]],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\d+)\\s*:\\s*(\\d+)\\s*$"]]]],[[["identity","args"],["return",["list",["`","range"],["toint",["deref","args",1]],["toint",["deref","args",2]]]]]],["=","args",[".","cmdargs","match",[["RegExp","$\\d+","$g"]]]],[[["identity","args"],["return",["cons",["`","set"],["totuple",[".","args","map",[["function","lambda",["nstr"],["toint","nstr"]]]]]]]]],"false"]],["set.","utils",["`","getnameargs"],["function","getnameargs",["cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s*$"]]]],[[["identity","args"],["return",["deref","args",1]]]],["=","args",[".","cmdargs","match",[["RegExp","$\\S+","$g"]]]],[[["identity","args"],["return",["totuple","args"]]]],"false"]],["set.","utils",["`","getprocarg"],["function","getprocarg",["cmdargs","false","args","procpath"],["=","args",[".","cmdargs","match",[["RegExp","$^(\\S*::)?([^\\s:]+)(:\\s*\\d*)?(:\\s*\\d*)?\\s*$"]]]],[["identity","args"],["=","procpath",[".",["deref","args",2],"split",["$."]]],[[["==",[".","procpath","length"],1],["=","procpath",[".","procpath",0]]],["=","procpath",["totuple","procpath"]]],["list",[".",["deref","args",1],"substring",[0,["-",[".",["deref","args",1],"length"],2]]],"procpath",["toint",[".",[".",["deref","args",3],"substring",[1]],"trim","false"]],["toint",[".",[".",["deref","args",4],"substring",[1]],"trim","false"]]]],"false"]],"utils"]),e._SetBindingList("Info",["closure","Info",["console","false","info"],["=","info",["new","object","this"]],["set.","info",["`","utils"],["Utils"]],["set.","info",["`","options"],{dictionary:{$indent:4,$wrapMinAmount:29,$wrapMaxCol:79,$maxColWidth:60,$maxSymColWidth:40}}],["function","plist",["itemlist","depth","false","item","first","width"],["=","first","$"],["for",["let","lambda",["iter"],["=","iter",["iterate","itemlist",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","width",[".",["tostring","item"],"length"]],[[["&&",[">",["+","width",[".",[".","console","printloc","false"],1]],[".",[".","info","options"],"wrapMaxCol"]],[">=",[".",[".","console","printloc","false"],1],[".",[".","info","options"],"wrapMinAmount"]]],[".","console","print",["$,\n"]],["=","first",[".","space","repeat",[["*",[".",[".","info","options"],"indent"],"depth"]]]]]],[".","console","print",["first","item"]],["=","first","$, "]]]]],["function","prows",["rows","depth","widths","false","coldex","row"],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],"depth"]]]]],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[[">",[".","col","length"],["deref","widths","coldex"]],[".","console","print",[[".","col","substring",[0,["-",["deref","widths","coldex"],1]]],"$…","space"]]],[".","console","print",["col",[".","space","repeat",[["+",["-",["deref","widths","coldex"],[".","col","length"]],1]]]]]],["preadjust","coldex","+",1]]]],[".","console","newline","false"]]]]],["function","printmods",["onemod","false","modid"],["function","pexports",["mod","false","xid","maxwidth"],[".","console","printline",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$exports:"]],["=","maxwidth",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","exports"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[[["<","maxwidth",[".",["tostring","xid"],"length"]],["=","maxwidth",[".",["tostring","xid"],"length"]]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","exports"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],2]]],"xid",[".","space","repeat",[["-","maxwidth",[".",["tostring","xid"],"length"]]]],"$: "]],[[["symbol",["deref",[".","mod","exports"],"xid"]],[".","console","print",[[".",[".","info","utils"],"procstring",[["getproc",["deref",[".","mod","exports"],"xid"]]]]]]],[".","console","print",[["deref",[".","mod","exports"],"xid"]]]],[".","console","newline","false"]]]]],["function","pcomponents",["mod","false","xid","maxwidth"],["printline",[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$components:"],["=","maxwidth",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","components"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[[["<","maxwidth",[".",["tostring","xid"],"length"]],["=","maxwidth",[".",["tostring","xid"],"length"]]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","components"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],2]]],"xid",[".","space","repeat",[["-","maxwidth",[".",["tostring","xid"],"length"]]]],"$: "]],[[["not",[".",["deref",[".","mod","components"],"xid"],"manifest"]],[".","console","print",["$<empty manifest>"]]],["plist",[".",["deref",[".","mod","components"],"xid"],"manifest"],3]],[".","console","newline","false"]]]]],["function","pdetailmod",["mod"],[".","console","printline",[[".","mod","id"]]],[[["\\.*",[".","mod","exports"]],["pexports","mod"]]],[["\\.*",[".","mod","components"]],["pcomponents","mod"]]],["function","psummarymod",["mod"],[".","console","printline",[[".","mod","id"]]],[[["\\.*",[".","mod","exports"]],[".","console","print",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$exports: "]],["plist",[".","mod","exports"],3],[".","console","newline","false"]]],[["\\.*",[".","mod","components"]],[".","console","print",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$components: "]],["plist",[".","mod","components"],3],[".","console","newline","false"]]],[["identity","onemod"],["pdetailmod","onemod"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".",[".","Naan","module"],"modlist","false"],["`","modid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","modid",[".","iter","$value"]],["psummarymod",["deref",[".",[".","Naan","module"],"modlist","false"],"modid"]]]]]],["function","printsyms",["syms","false","sym","rows","row","coldex","nprops","bound","widths"],["=","rows",["cons",["list","$symbol","$namespace","$value","$procedure","$attr."]]],["for",["let","lambda",["iter"],["=","iter",["iterate","syms",["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],["=","bound",["getproc","sym"]],[[["tuple","bound"],["=","bound",["tostring",[".","bound",0]]]],[["not","bound"],["=","bound","$"]]],[[["rest","sym"],["=","nprops",["prepad",["length",["rest","sym"]],3]]],["=","nprops","$"]],["push",["list",["tostring","sym"],["namespace",["namespace","sym"]],["tostring",["car","sym"]],"bound","nprops"],"rows"]]]],["=","widths",[".",[".","info","utils"],"alignColumns",["rows"]]],["=","coldex",0],["while","false",[["not",["<","coldex",[".","widths","length"]]]],[[[">",["deref","widths","coldex"],[".",[".","info","options"],"maxSymColWidth"]],["set[","widths","coldex",[".",[".","info","options"],"maxSymColWidth"]]]],["push",[".","$-","repeat",[["deref","widths",["postadjust","coldex","+",1]]]],"row"]],["=","row",["reverse","row"]],["=","rows",["reverse","rows"]],["=","rows",["cons",["car","rows"],"row",["cdr","rows"]]],["prows","rows",1,"widths"]],["set.","info",["`","setDefloc"],["function","setDefloc",["location"],["set.","info",["`","defloc"],"location"]]],["function","getDefproc",["cmdargs","nochain","false","location","procdef"],[[["||",["not","cmdargs"],["==","cmdargs","$"]],["=","location",[".","info","defloc"]],[["identity","nochain"],["=","location",["list",[".","location",0],["car",[".","location",1]]]]]]],[[["not","location"],["=","location",[".",[".","info","utils"],"getprocarg",["cmdargs"]]]]],[[["not","location"],[".","console","printline",['$error: "',"cmdargs",'$" not a valid procedure specification']],["return"]]],["=","procdef",[".",[".","info","utils"],"resolveLocation",["location"]]],[[["not","procdef"],[[["||",["not","cmdargs"],["==","cmdargs","$"]],["=","cmdargs",[".",[".","info","utils"],"locationString",["location"]]]]],[".","console","printline",['$error: procedure "',"cmdargs",'$" not found']],["return","false"]]],["list","location","procdef"]],["set.","info",["`","infoproc"],["function","infoproc",["cmdargs","false","location","procdef","child"],["=",["location","procdef"],["getDefproc","cmdargs","true"]],[[["not","location"],["return"]]],[".","console","printline",[[".",[".","info","utils"],"locationString",["location"]]]],["=","syms",["reverse",["deref",["@",[".","procdef",1]],["`","\\.children"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","syms",["`","child"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","child",[".","iter","$value"]],["=","procdef",["getproc","child"]],[[["not","procdef"],["continue"]]],[".","console","printline",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],[".",[".","info","utils"],"procstring",["procdef"]]]]]]]]],["set.","info",["`","infolist"],["function","infolist",["cmdargs","false","location","procdef","start","end"],["=",["location","procdef"],["getDefproc","cmdargs"]],[[["not","location"],["return"]]],["=","start",[".","location",2]],["=","end",[".","location",3]],[[["&&","start",["not","end"]],["=","end",["+","start",10]]]],[".","console","print",[[".",[".","info","utils"],"sourcelist",["procdef","start","end"]]]]]],["set.","info",["`","infomod"],["function","infomod",["cmdargs","false","modlist","modid","mod"],[[["not","modlist"],["=","modlist",[".",[".","info","utils"],"getnameargs",["cmdargs"]]]]],[["not","modlist"],["printmods"]],[[["string","modlist"],["=","modlist",["list","modlist"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","modlist",["`","modid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","modid",[".","iter","$value"]],["=","mod",["deref",[".",[".","Naan","module"],"modlist","false"],"modid"]],[[["identity","mod"],["printmods","mod"]],[".","console","printline",['$error: module "',"modid",'$" not found']]]]]]]],["set.","info",["`","infofind"],["function","infofind",["cmdargs","false","args","pattern","ns","found"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s*$"]]]],[[["identity","args"],["=","pattern",["deref","args",1]]],["=","args",[".","cmdargs","match",[["RegExp","$\\S+","$g"]]]],["=","pattern",["deref","args",0]],[["&&",["==",[".","args","length"],3],["==",["deref","args",1],"$in"]],["=","ns",[".",[".","info","utils"],"findns",[["deref","args",2]]]],[["not","ns"],[".","console","printline",['$error: namespace "',["deref","args",2],'$" not found']],["return"]]],[["&&",["==",[".","args","length"],2],["==",["deref","args",1],"$all"]],["=","ns","true"]],[".","console","printline",['$error: cannot interpret "',"cmdargs",'$"']],["return"]],["catch",[[[".","pattern","match",[["RegExp",'$".*"']]],["=","found",["exists",["RegExp",[".","$^","concat",[[".","pattern","slice",[1,-1]],"$$"]]],"ns"]]],["=","found",["exists",["RegExp","pattern","$i"],"ns"]]],[[["identity","true"],[".","console","printline",['$error: regular expression "',"cmdargs",'$" not valid']],["return"]]],"false"],[[["==","ns","true"],["=","locstr","$in all namespaces"]],[["identity","ns"],["=","locstr","$in namespace "]],["=","locstr","$in active namespaces"]],[["identity","found"],[[[">",["length","found"],1],[".","console","print",[["length","found"],"$ symbols "]]],[".","console","print",["$one symbol "]]],[".","console","printline",['$matching "',"pattern",'$" ',"locstr","$:"]],["printsyms","found"]],[".","console","printline",['$no symbols match "',"pattern",'$" ',"locstr"]]]],["set.","info",["`","infofutures"],["function","infofutures",["cmdargs","false","pending","rows","row","item","procstr","waiting","delays","delayms","widths","coldex"],["function","procReference",["procdef","prefix","false","str"],[[["not","prefix"],["=","prefix","$"]]],[["identity","procdef"],[[["&&",["symbol","procdef"],[".","procdef","proc"]],["=","procdef",[".","procdef","proc"]]]],[[["procedure","procdef"],["=","str",[".",[".","info","utils"],"callstring",["procdef","true"]]]],["=","str",[".","procdef","tostring"]]],[".","prefix","concat",["str"]]],"$"],["=","pending",["reverse",["futures"]]],[[["not","pending"],[".","console","printline",["$no futures pending"]],["return"]]],[".","console","printline",[["length","pending"],"$ futures pending:"]],["=","rows",["cons",["list","$start","$count","$delay","$procedures"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","pending",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","procstr",["procReference",[".","item","execute"],"$x "]],["=","waiting",[".","item","waiting"]],[[["==",[".","procstr","length"],0],["=","procstr",["procReference",["pop","waiting"],"$w "]]]],["=","delayms",[".","Math","trunc",[[".","item","delay"]]]],["=","delays",[".","Math","trunc",[["quotient","delayms",1e3]]]],["preadjust","delayms","-",["*","delays",1e3]],["push",["list",[".","item","start"],["prepad",[".","item","count"],4],[".",["tostring","delays"],"concat",["$.",["prepad","delayms",3,"$0"]]],"procstr"],"rows"],["while","false",[["not",["not",["empty","waiting"]]]],["push",["list","$","$","$",["procReference",["pop","waiting"],"$w "]],"rows"]]]]],["=","widths",[".",[".","info","utils"],"alignColumns",["rows"]]],["=","coldex",0],["while","false",[["not",["<","coldex",[".","widths","length"]]]],[[[">",["deref","widths","coldex"],[".",[".","info","options"],"maxColWidth"]],["set[","widths","coldex",[".",[".","info","options"],"maxColWidth"]]]],["push",[".","$-","repeat",[["deref","widths",["postadjust","coldex","+",1]]]],"row"]],["=","row",["reverse","row"]],["=","rows",["reverse","rows"]],["=","rows",["cons",["car","rows"],"row",["cdr","rows"]]],["prows","rows",1,"widths"]]],"info"]),e._AddPropertyList("CliUtilsInit",[["$.lingoInit","true"]]),e._SetBindingList("CliUtilsInit",["function","CliUtilsInit",["false","manifest"],["=","manifest",["`",["CliUtilsPreload","Utils","Info","CliUtilsInit"]]],[".",[".","Naan","module"],"build",["$CLI","$CliUtils",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","Utils"],"Utils"],["set.",[".","modobj","exports"],["`","Info"],"Info"]]]]]),e._Execute(["CliUtilsInit"]),e._SetBindingList("driver_chmods",["function","driver_chmods",["driverob","cmdword","cmdargs"],[".",[".","Naan","module"],"chns",["cmdargs"]]]),e._SetBindingList("driver_debugs",["function","driver_debugs",["driverob","cmdword","cmdargs"],["debugger"]]),e._SetBindingList("driver_helps",["function","driver_helps",["driverob","cmdword","cmdargs","false","text"],["=","text",["call",["let","lambda",["proc"],[["eq","proc","driver_chmods"],"$    /ch[mod]                       - list modules\n    /ch[mod] <module>              - change active module\n"],[["eq","proc","driver_debugs"],"$    /d[ebug]                       - enter debugger\n"],[["eq","proc","driver_helps"],"$    /help                          - display overall help\n    /help <command>                - display help for <command>\n"],[["eq","proc","driver_infos"],["return",["driver_infos","driverob","cmdword","$"]]],[["eq","proc","driver_languages"],"$    /dialect                       - list available dialects\n    /dialect <name>                - change the CLI dialect\n"],[["eq","proc","driver_list"],"$    /list [<namespace>::]<procedure-name>[.<nestedname>]*[:start[:end]]\n"],[["eq","proc","driver_options"],["return",["driver_options","driverob","cmdword","$"]]],[["eq","proc","driver_quit"],"$    /quit                          - decamp / depart / absquatulate\n"],"$About Naan: https://github.com/naanlang/naan#readme\n/commands:\n    /ch[mod]   [<module>]          - change active module\n    /d[ebug]                       - enter debugger\n    /help      [<command>]         - help [command]\n    /i[nfo]    [<topic>]           - info on topic\n    /op[tions]                     - view or modify options\n    /r[estart]                     - restart REPL\n    /q[uit]                        - decamp / depart / absquatulate\n"],["deref","driverCmds","cmdargs"]]],[".",[".","driverob","console"],"print",["text"]]]),e._SetBindingList("driver_infos",["function","driver_infos",["driverob","cmdword","cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".",[".","driverob","console"],"print",["$/info topics:\n    /i[nfo] (f)ind         <regex>                     - find matching symbols in active namespaces\n                           <regex> all | in <namespace>    ...in all or specified namespace\n    /i[nfo] f(u)tures                                  - show pending futures\n    /i[nfo] (m)odules      [<name> [<name> ...]]       - show modules and components\n    /i[nfo] (p)rocedure    <name>                      - summarize a procedure\n"]]],[["||",["==","cmdword","$f"],["==","cmdword","$find"]],[".",[".","driverob","info"],"infofind",["cmdargs"]]],[["||",["==","cmdword","$u"],["==","cmdword","$future"],["==","cmdword","$futures"]],[".",[".","driverob","info"],"infofutures",["cmdargs"]]],[["||",["==","cmdword","$m"],["==","cmdword","$module"],["==","cmdword","$modules"]],[".",[".","driverob","info"],"infomod",["cmdargs"]]],[["||",["==","cmdword","$p"],["==","cmdword","$proc"],["==","cmdword","$procedure"]],[".",[".","driverob","info"],"infoproc",["cmdargs"]]],[".",[".","driverob","console"],"printline",["$info topic ","cmdword","$ not implemented"]]]),e._SetBindingList("driver_languages",["function","driver_languages",["driverob","cmdword","cmdargs","false","dialob"],[["==","cmdword","$dialect"],[["!=","cmdargs","$"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",["cmdargs"]]],[["not","dialob"],[".",[".","driverob","console"],"print",["$unregistered language"]]],["set.","driverob",["`","parse"],[".","dialob","parse"]],["set.","driverob",["`","print"],[".","dialob","print"]],["set.","driverob",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","driverob",["`","dialect"],"dialob"],[".",[".","driverob","console"],"print",["$language is now ","cmdargs"]]],[".",[".","driverob","console"],"print",["$dialects: ",[".",[".",[".",[".","Naan","runtimelib"],"dialect","false"],"toarray"],"join",["space"]]]]]]),e._SetBindingList("driver_list",["function","driver_list",["driverob","cmdword","cmdargs"],[".",[".","driverob","info"],"infolist",["cmdargs"]]]),e._SetBindingList("driver_options",["function","driver_options",["driverob","cmdword","cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".",[".","driverob","console"],"print",["$/options:\n    /op[tions] [no]prompt            - turn on/off command line prompt\n    /op[tions] [no]blank             - turn on/off blank line before prompt\n"]]],[["==","cmdword","$prompt"],[".","driverob","setOptions",[{dictionary:{$prompt:"true"}}]]],[["==","cmdword","$noprompt"],[".","driverob","setOptions",[{dictionary:{$prompt:"false"}}]]],[["==","cmdword","$blank"],[".","driverob","setOptions",[{dictionary:{$blank:"true"}}]]],[["==","cmdword","$noblank"],[".","driverob","setOptions",[{dictionary:{$blank:"false"}}]]]]),e._SetBindingList("driver_restarts",["function","driver_restarts",["driverob","cmdword","cmdargs"],["return",["`","break"]]]),e._SetBindingList("driver_quits",["function","driver_quits",["driverob","cmdword","cmdargs"],[[".","js","g"],[".",[".","js","r",["$process"]],"exit",[0]]],[[".","js","s"],[".",[".","js","t"],"Terminate","false"]],[[".","js","w"],[".",[".","js","w"],"close","false"]]]),e._SetValue("driverCmds",{dictionary:{$ch:"driver_chmods",$chmod:"driver_chmods",$d:"driver_debugs",$debug:"driver_debugs",$help:"driver_helps",$i:"driver_infos",$info:"driver_infos",$dialect:"driver_languages",$list:"driver_list",$op:"driver_options",$option:"driver_options",$options:"driver_options",$r:"driver_restarts",$restart:"driver_restarts",$q:"driver_quits",$quit:"driver_quits"}}),e._SetBindingList("Driver",["closure","Driver",["welcome","false","driverob","console","dialob","source","emptyflag","endtoken","exop","exconsole"],["=","driverob",["new","object","this"]],["=","driverObject","driverob"],["=","console",["new","textstream"]],["set.","driverob",["`","console"],"console"],["set.","driverob",["`","options"],{dictionary:{$prompt:"false",$blank:"false"}}],["set.","driverob",["`","utils"],["Utils"]],["set.","driverob",["`","info"],["Info","console"]],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],["set.","driverob",["`","parse"],[".","dialob","parse"]],["set.","driverob",["`","print"],[".","dialob","print"]],["set.","driverob",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","driverob",["`","dialect"],"Dialect"],["=","emptyflag",{dictionary:{}}],["function","readline",["false","cc","output"],[[["not",[".","console","readchar"]],["=","console",["new","textstream"]],["set.","driverob",["`","console"],"console"],["set.","driverob",["`","utils"],["Utils"]],["set.","driverob",["`","info"],["Info","console"]]]],["=","output","$"],["while","false",[["not",["=","cc",[".","console","readchar","false"]]]],[".",[".","driverob","waiting"],"reset","false"],["=","output",[".","output","concat",["cc"]]],[[["==","cc","$\n"],["break"]]]],"output"],["function","freshline","false",[["!=",[".",[".","console","printloc","false"],1],0],[".","console","newline","false"]]],["function","driverPrompt",["false","prompt","name"],["freshline"],[[["&&",[".",[".","driverob","options"],"blank"],["!=",["printloc"],["`",[0,0]]]],[".","console","newline","false"]]],["=","name",[".",[".",[".","driverob","dialect"],"name"],"toLowerCase","false"]],["catch",[["=","prompt",["strcat",["namespace",["first",["nsactive"]]],["strcat","$-","name","$> "]]],[".",[".","js","t"],"setPrompt",["prompt"]]],[[["identity","true"],["=","prompt",["strcat","name","$ > "]]]],"false"],"prompt"],["function","parseBuffer",["false","result"],[[["not","source"],["return","emptyflag"]]],["catch",[["=","result",[".","driverob","parse",["source"]]],["=","endtoken",[".","source","tokenlast","false"]],[[["==",[".","source","readready","false"],0],["=","source","false"]]],"result"],[[["and",["==",["tostring",["first","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]],["=","source","false"],"emptyflag"]],"false"]],["function","repl",["false","text","result","expr","cmdword","accum"],["=","exop","false"],["=","exconsole","console"],["loop","repl",[[["not",[".","driverob","waiting"]],["set.","driverob",["`","waiting"],["new","nonce"]]]],["catch",[[[["identity","source"],["freshline"],["=","result",["parseBuffer"]],[["eq","result","emptyflag"],["continue"]]],[["not","exop"],["freshline"],[[["&&",[".",[".","driverob","options"],"prompt"],["==",[".","console","readready","false"],0]],[".","console","print",[["driverPrompt"]]]]],[[["==",[".","console","readready","false"],0],[".",[".","driverob","waiting"],"signal",["true"]]]],["loop","false",["=","text",["readline"]],[[[">",[".","console","readready","false"],0],["while","false",[["not",[">",[".","console","readready","false"],0]]],["=","text",[".","text","concat",[[".","console","readchar","false"]]]]],["=","source",["new","textstream","text"]],["continue","repl"]]],["=","expr",[".","text","match",[["RegExp","$^/([A-Za-z_]+)\\s*(.*)"]]]],[[["identity","expr"],["=","cmdword",["deref","expr",1]],[[["deref","driverCmds","cmdword"],[["eq",["call",["deref","driverCmds","cmdword"],"driverob","cmdword",["deref","expr",2]],["`","break"]],["break","repl"]]],[".","console","printline",['$driver command "/',"cmdword",'$" not understood']]],["continue","repl"]],[["!=",[".",[".","text","trim","false"],"length"],0],["break"]],["continue","repl"]]],["loop","false",["=","source",["new","textstream","text"]],["=","result",["parseBuffer"]],[["not",["eq","result","emptyflag"]]],["=","source","false"],["=","accum","text"],[[[".","text","match",[["RegExp","$^\\s*/[/*]"]]],["continue","repl"]]],[[["not",[".","text","match",[["RegExp","$(;|;>|;;)\\s*$"]]]],["=","source",["new","textstream",[".",[".","text","trim","false"],"concat",["$;\n"]]]],["=","result",["parseBuffer"]],[["not",["||",["eq","result","emptyflag"],[".","result",0]]],["break"]]]],["freshline"],[".","console","print",["$>> "]],["=","text",["readline"]],[[["==",[".","text","trim","false"],"$"],[".","console","print",["$command entry canceled"]],["continue","repl"]]],[[["==",[".","text","slice",[-1]],"$\n"],["=","text",[".","accum","concat",["text"]]]],["=","text",[".","accum","concat",["$\n","text"]]]]]],[[[".","exop","display"],[".","console","printline",[[".","exop","display"]]]]],["=","result",["list","false",[".","exop","expr"]]],["=","endtoken",{dictionary:{$atom:["`",";"]}}],[[[".","exop","ending"],["set.","endtoken",["`","atom"],[".","exop","ending"]]]],["=","exop","false"]],[[[".","result",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","result",0],["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[".","console","printline",[[".","driverob","errorstr",["expr"]]]]]]],["=","source","false"]],[["==",[".","endtoken","atom"],["`",";;"]],["\\$",["evalactive",[".","result",1]]]],["\\$",["evalactive",[".","result",1]]],[["!==","\\$",[".",[".","Naan","local"],"mu"]],["freshline"],[".","console","print",["$$: "]],[["!=",[".","endtoken","atom"],["`",";>"]],[".","console","print",[[".","driverob","print",["\\$"]]]]],[".","console","printq",["\\$"]]]]],[[["==","exception","Driver"]],[["==","exception","driver"],["=","exop","false"],["=","exconsole","false"],["throw","driver"]],[["identity","true"],["=","expr",["tostring",["first","exception"]]],[["==","expr","$debugger"],[".","console","printline",["$==> terminated in debugger"]],["=","exop","false"],["=","exconsole","false"],["throw",["list","internal","$exit"]]],[["==","expr","$internal"],[".","console","printline",["$==> error: ",["second","exception"]]]],[[["&&",["dictionary","exception"],["==",[".","exception","error"],"$Naan Error"]],["=","expr",["ErrorString","exception"]]],["=","expr","exception"]],[".","console","printline",["$==> exception: ","expr"]]]],"false"]]],["set.","driverob",["`","setOptions"],["function","setOptions",["options"],[[["identity","options"],["set.","driverob",["`","options"],["merge",[".","driverob","options"],"options"]]]],[".","driverob","options"]]],["set.","driverob",["`","readready"],["function","readready","false",[".","console","readready","false"]]],["set.","driverob",["`","waitIdle"],["closure","waitIdle",["toMS","false","start","totimer"],[[["not",[".","driverob","waiting"]],["set.","driverob",["`","waiting"],["new","nonce"]]]],["=","start",["milliseconds"]],[[["identity","toMS"],["=","totimer",["future",["function","lambda","false",["=","start","false"]],"toMS"]]]],["while","false",[["not","start"]],[".",[".","driverob","waiting"],"wait","false"],["sleep",10],[[[">",["-",["milliseconds"],"start"],50],["break"]]]],[".","totimer","reset","false"],["!=","start","false"]]],["set.","driverob",["`","execute"],["function","execute",["expr","options"],[[["not","options"],["=","options",{dictionary:{}}]]],["set.","options",["`","expr"],"expr"],[["identity","exconsole"],["=","exop","options"],[".","exconsole","readex",["Driver"]],"true"]]],["set.",[".","Naan","runtimelib"],["`","curdriver"],"curdriver"],["set.",[".","Naan","runtimelib"],["`","exec"],"exec"],[[["identity","welcome"],["set.",[".","driverob","options"],["`","prompt"],"true"],[["==","welcome",100],[".","console","printline",['$Naan REPL - type "/help" for more information']]]]],["repl"]]),e._SetBindingList("curdriver",["function","curdriver","false","driverObject"]),e._SetBindingList("exec",["function","exec",["expr","options"],[".","driverObject","execute",["expr","options"]]]),e._SetBindingList("DriverInstall",["function","DriverInstall",["false","curnsactive"],["=","curnsactive",["nsactive"]],["sudo",["nsactive",["list",[".",["nsactive","true"],1]]]],["copyproc",["compress","$driver"],"Driver"],["sudo",["nsactive","curnsactive"]],["throw",["`","driver"]]]),e._AddPropertyList("DriverInit",[["$.lingoInit","true"]]),e._SetBindingList("DriverInit",["function","DriverInit",["false","manifest"],["=","manifest",["`",["driverObject","driver_chmods","driver_debugs","driver_helps","driver_infos","driver_languages","driver_list","driver_options","driver_restarts","driver_quits","driverCmds","Driver","curdriver","exec","DriverInstall","DriverInit"]]],[".",[".","Naan","module"],"build",["$CLI","$Driver",["function","lambda",["modobj","compobj"],[".",[".","Naan","module"],"require",["$Lib/RuntimeLib.nlg"]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DriverInstall"],"DriverInstall"]]]]]),e._Execute(["DriverInit"]),e._CopyBinding("Driver","driver"),e._SetBindingList("DebuggerREPL",["closure","DebuggerREPL",["debug","false","commander","console","dialob","lastCmd"],["=","commander",["new","object","this"]],["=","console",["new","textstream"]],["set.","commander",["`","console"],"console"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],["set.","commander",["`","parse"],[".","dialob","parse"]],["set.","commander",["`","print"],[".","dialob","print"]],["set.","commander",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","commander",["`","utils"],["Utils"]],["set.","commander",["`","info"],["Info","console"]],["set.","commander",["`","catch"],"false"],["set.","commander",["`","breakpoints"],{dictionary:{}}],["function","frameDict",["frame","false","proctask","location","markdict"],["=","proctask",[".","debug","frameProcTask",["frame"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","frame",3],1],[".","proctask",1]]]],[[[".","location",2],["=","markdict",{dictionary:{}}],["set[","markdict",[".","location",2],"$--\x3e"]]],"markdict"],["function","frameProc",["frame","false","proctask","location"],["=","proctask",[".","debug","frameProcTask",["frame"]]],[["identity","proctask"],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".","proctask",1]]]],[".",["tostring",[".",[".","proctask",0],0]],"concat",["space",[".",[".","commander","utils"],"locationString",["location"]]]]]],["function","initconsole","false",[["not","console"],["=","console",["new","textstream"]],["set.","commander",["`","console"],"console"],["set.","commander",["`","utils"],["Utils","console"]],["set.","commander",["`","info"],["Info","console"]]]],["function","readline",["crok","false","cc","output"],["initconsole"],[[["identity","crok"],["=","output","$"]],["while","false",[["not",["==",["=","cc",[".","console","readchar","false"]],"$\n"]]]],["=","output","cc"]],["while","false",[["not",["&&",["!=",["=","cc",[".","console","readchar","false"]],"$\n"],"cc"]]],["=","output",[".","output","concat",["cc"]]]],"output"],["function","driverprompt",["false","prompt"],["catch",[["=","prompt",["strcat","$(ndb-",[".","debug","depth","false"],"$) "]],[".",[".","js","t"],"setPrompt",["prompt"]]],[[["identity","true"],["=","prompt","$(ndb)"]]],"false"],"prompt"],["function","freshline","false",["initconsole"],[["!=",[".",[".","console","printloc","false"],1],0],[".","console","newline","false"]]],["set.","commander",["`","parseText"],["function","parseText",["cmdargs","false","error","expr"],["catch",[["=","source",["new","textstream",[".","cmdargs","concat",["$ ;"]]]],[".","source","setsymbols",[[".","commander","localist",[["deref",[".","commander","frames"],[".","commander","focus"]]]]]],["=",["error","expr"],[".","commander","parse",["source"]]]],[[["identity","true"]]],"false"],[[["identity","error"],["for",["let","lambda",["iter"],["=","iter",["iterate","error",["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[".","console","printline",[[".","commander","errorstr",["expr"]]]]]]],["=","expr","false"]]],"expr"]],["set.","commander",["`","getprocarg"],["function","getprocarg",["text","false","args","expr","result","location"],["=","args",[".","text","match",[["RegExp","$^([^:]+)(:\\s*\\d*)?(:\\s*\\d*)?\\s*$"]]]],[[["&&",[">",[".","args","length"],1],["=","expr",[".","commander","parseText",[["deref","args",1]]]]],["catch",[["=","result",["eval","expr"]],[["procedure","result"],["=","result",[".","result",1]]],[["symbol","result"],["=","result",[".",[".","result","proc"],1]]],["=","result","false"]],[[["identity","true"],["=","result","false"]]],"false"],[["identity","result"],["=","location",["list",[".",[".","result","namespace"],"tostring"],"result",["toint",[".",[".",["deref","args",2],"substring",[1]],"trim","false"]],["toint",[".",[".",["deref","args",3],"substring",[1]],"trim","false"]]]]]]],[[["not","location"],["=","location",[".",[".","commander","utils"],"getprocarg",["text"]]]]],"location"]],["function","breakHit",["where","value","false","firstid","location","entry","result","sourceline"],["=","firstid",1],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","bpid",["toint","bpid"]],[[["==","firstid","bpid"],["=","firstid",["+","bpid",1]]]],[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],[".","where","task"]],["=","firstid","bpid"]]]]],[[["not",["deref",[".","commander","breakpoints"],"firstid"]],["breakpoint",[".","where","task"],"undefined"],[".","debug","resume","false"],["return","true"]]],["=","entry",["deref",[".","commander","breakpoints"],"firstid"]],["preadjust",[".","entry","hitcount"],"+",1],[[[".","entry","conditional"],[[["procedure",[".","entry","conditional"]],["=","result",["call",[".","entry","conditional"],[".","entry","hitcount"],[".","entry","value"]]]],["=","result",["eval",[".","entry","conditional"]]]],[["not","result"],[".","debug","resume","false"],["return","true"]]]],[".","console","printline",["$Breakpoint ","firstid","$ at ",[".",[".","commander","utils"],"locationString",[[".","entry","location"]]],"$ with value ","value"]],[[["not",[".","entry","sourced"]],["set.","entry",["`","sourced"],"true"],[[[".",[".","entry","location"],2],["=","sourceline",[".",[".","commander","utils"],"sourcelist",[[".","entry","procdef"],[".",[".","entry","location"],2],[".",[".","entry","location"],2]]]]],["=","sourceline",["tostring",["car",[".","where","task"]]]]],[".","console","printline",["$    ","sourceline"]]]],"false"],["function","stepHit",["dict","false","procdef","location","sourceline"],["=","procdef",[".","debug","insideProc","false"]],[[["not","procdef"],[".","console","printline",["$Stepped to unknown location: ",[".","dict","task"]]],["return","false"]]],[[["member",[".",[".","procdef",1],"namespace"],[".","debug","nshidden"]],[".","debug","stepup","false"],["return","true"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".","procdef",1],[".","dict","task"]]]],[".",[".","commander","info"],"setDefloc",["location"]],[".","console","printline",["$Stepped to ",[".",[".","commander","utils"],"locationString",["location"]],"$ with value ",[".","dict","value"]]],[[["!=",[".","dict","state"],"$task"],["=","sourceline","$[end of body]"]],[[".","location",2],["=","sourceline",[".",[".","commander","utils"],"sourcelist",["procdef",[".","location",2],[".","location",2]]]]],["=","sourceline","$unknown line"]],[".","console","printline",["$    ","sourceline"]],"false"],["function","exceptionHit",["except","false","exceptstr","proctask","location"],[[["||",["not",[".","commander","catch"]],["&&",["tuple",[".","commander","catch"]],["not",["eval",[".","commander","catch"]]]]],["return","true"]]],["freshline"],["=","exceptstr",[".","debug","startExcept"]],[[["&&",["dictionary","exceptstr"],["==",[".","exceptstr","error"],"$Naan Error"]],["=","exceptstr",["ErrorString","exceptstr"]]]],[".","console","printline",["$==> Entering debugger on exception: ","exceptstr"]],["=","proctask",[".","debug","frameProcTask",["false"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".",[".","proctask",1],0]]]],[[["&&","proctask","location"],[".","console","printline",[[".",[".","commander","utils"],"locationString",["location"]]]],[[".","location",2],[".","console","printline",["$    ",[".",[".","commander","utils"],"sourcelist",[[".","proctask",0],[".","location",2],[".","location",2]]]]]]]],"false"],["set.","commander",["`","updateDefproc"],["function","updateDefproc",["frame","false","proctask","location"],["=","proctask",[".","debug","frameProcTask",["frame"]]],[[["identity","proctask"],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".",[".","proctask",1],0]]]]]],[".",[".","commander","info"],"setDefloc",["location"]]]],["function","findCommand",["text","false","cmd","found"],[["deref","debugCmds","text"],"text"],["for",["let","lambda",["iter"],["=","iter",["iterate","debugCmds",["`","cmd"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","cmd",[".","iter","$value"]],[[[".","cmd","startsWith",["text"]],[["identity","found"],["return","false"]],["=","found","cmd"]]]]]],"found"],["set.","commander",["`","entering"],["function","entering","false",["textstreams",["`",["false","false"]]]]],["set.","commander",["`","pauser"],["function","pauser",["entry","arg1","arg2","arg3","false","cmd","cmdword","proc1"],["updateDefproc","false"],["initconsole"],[[["==","entry","$startpause"],[[["atom","arg1"],[".","console","printline",["$can't debug atoms like: \"","arg1",'$"']],["return"]]],["freshline"],[".","console","printline",["$debugger paused before eval: ","arg1"]]],[["==","entry","$breakpoint"],[["breakHit","arg1","arg2"],["return"]]],[["==","entry","$steptrap"],[["stepHit","arg1"],["return"]]],[["==","entry","$startfail"],["freshline"],[".","console","printline",["$debugger could not pause before eval"]]],[["==","entry","$escape"],[".","console","printline",["$^C"]]],[["==","entry","$exception"],[["exceptionHit","arg1"],["return"]]],[["==","entry","$"]],["freshline"],[".","console","printline",['$debugger entry type "',"entry",'$" not known']]],["set.","commander",["`","frames"],{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","debug","frames"],["`","frame"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","frame",[".","iter","$value"]],[[["procedure","frame"],["=","proc1","true"]]],[[["&&",["!=",[".","frame",0],["`","body"]],["||",["not","proc1"],["!=",[".","frame",0],["`","loop"]]]],[".",[".","commander","frames"],"push",["frame"]]]]]]],["set.","commander",["`","focus"],0],[".","console","readex",["false"]],["loop","false",["catch",[["freshline"],[".","console","print",[["driverprompt"]]],["=","cmd",["readline","true"]],["=","cmd",[".","cmd","match",[["RegExp","$(\\S+)\\s*(.*)"]]]],[[["not","cmd"],[[["||",["not","lastCmd"],["not",["eq",["deref","debugCmds",["deref","lastCmd",1]],"debug_execs"]]],["continue"]]],["=","cmd","lastCmd"]]],["=","lastCmd","cmd"],["=","cmdword",["findCommand",["deref","cmd",1]]],[[["deref","debugCmds","cmdword"],[["eq",["call",["deref","debugCmds","cmdword"],"cmdword",["deref","cmd",2],"commander","debug"],["`","break"]],["return"]]],[".","console","printline",['$debugger command "',["deref","cmd",1],'$" is undefined or ambiguous']]]],[[["==","exception","DebuggerREPL"],["return","false"]],[["!=","exception","debugger"],[".","console","printline",["$debugger caught: ","exception"]],"false"]],"false"]]]],["set.","commander",["`","endPauser"],["function","endPauser","false",[".","console","readex",["DebuggerREPL"]]]],["set.","commander",["`","procstring"],["function","procstr",["proc","false","output","parm"],[[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$()"]]]]],[[["atom",[".","proc",2]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$ ",[".","proc",2]]]]]],["=","output",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",["parm","$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","commander",["`","localist"],["function","localist",["frame","false","symbols"],[[["not",["procedure","frame"]],["return","false"]]],["call",["function","scope",["parent","false","lex1","ex1","proc"],["while","false",[["not","parent"]],["=","proc",["getproc","parent"]],["=","lex1",["third","proc"]],[[["atom","lex1"],["push","lex1","symbols"]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["identity","ex1"],["push","ex1","symbols"]]]]],["push","parent","symbols"],["=","lex1",["deref",["@","parent"],["`","\\.children"]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["&&","ex1",["not",["member","ex1","symbols"]]],["push","ex1","symbols"]]]],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]]],[".",[".","frame",3],1]],["reverse","symbols"]]],["set.","commander",["`","exprstr"],["function","exprstr",["expr","false","condexpr"],[[["not","expr"],["return","$"]]],["=","condexpr",[".",[".","commander","utils"],"sourcelist",["expr"]]],["=","condexpr",[".","condexpr","replace",[["RegExp","$^ *\\d+","$mg"],"$"]]],["=","condexpr",[".","condexpr","replace",[["RegExp","$[\\s\\n\\r]{2,}","$mg"],"$ "]]],[".","condexpr","trim","false"]]],["set.","commander",["`","printlocals"],["function","printlocals",["frame","uopts","false","uopt","widths","header","begun"],["=","options",{dictionary:{$indent:4,$header:"false",$parents:"true",$trim:"false",$maxstr:30}}],["for",["let","lambda",["iter"],["=","iter",["iterate","uopts",["`","uopt"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","uopt",[".","iter","$value"]],["set[","options","uopt",["deref","uopts","uopt"]]]]],["=","header",["list","$symbol","$value","$previous"]],["function","calc1",["lex1","false","ex1"],["function","calcitem",["item"],["function","cf",["field","prev","false","width"],["=","width",[".",["tostring","field",{dictionary:{$quote:"true"}}],"length"]],[[[">","width",[".","options","maxstr"]],["=","width",[".","options","maxstr"]]]],[[["<","width","prev"],["=","width","prev"]]],"width"],["set[","widths",0,["cf",["first","item"],["deref","widths",0]]],["set[","widths",1,["cf",["second","item"],["deref","widths",1]]],[["cddr","item"],["set[","widths",2,["cf",["third","item"],["deref","widths",2]]]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[[["not","widths"],["=","widths",{array:[0,0,0]}],[[".","options","header"],["calcitem","header"]]]],["calcitem","ex1"]]]]],["function","print1",["lex1","nameline","false","ex1"],["function","printitem",["item"],["function","pf",["field","width","false","fwidth"],["=","field",["tostring","field",{dictionary:{$quote:"true"}}]],["=","fwidth",[".","field","length"]],[[[">","fwidth",[".","options","maxstr"]],["=","fwidth",[".","options","maxstr"]],["=","field",[".","field","substring",[0,"fwidth"]]]]],[".","console","print",["field",[".","space","repeat",[["-","width","fwidth"]]]]]],[".","console","print",[[".","$ ","repeat",[[".","options","indent"]]]]],["pf",["first","item"],["deref","widths",0]],[".","console","print",["$ "]],["pf",["second","item"],["deref","widths",1]],[[["&&",["cddr","item"],[">",["deref","widths",2],0]],[".","console","print",["$ "]],["pf",["third","item"],["deref","widths",2]]]],[".","console","newline","false"]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[[["not","begun"],[[[".","options","header"],["printitem","header"],["printitem",["list",[".","$-","repeat",[["deref","widths",0]]],[".","$-","repeat",[["deref","widths",1]]],[".","$-","repeat",[["deref","widths",2]]]]]]],["=","begun","true"]]],[[["identity","nameline"],[".","console","printline",["nameline"]],["=","nameline","false"]]],["printitem","ex1"]]]]],["function","printer",["false","procsym","procname","parent","proc","params","parents"],["calc1",["third","frame"]],["=","procsym",[".",[".","frame",3],1]],["=","parent",["deref",["@","procsym"],["`","\\.parent"]]],["while","false",[["not","parent"]],["=","proc",["getproc","parent"]],["=","lex1",["third","proc"]],[[["atom","lex1"],["=","params",["push",["list","lex1",["first","lex1"]],"params"]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["&&",[".","options","trim"],["not",["within","ex1",[".","frame",3]]]],["continue"]]],[[["identity","ex1"],["push",["list","ex1",["first","ex1"]],"params"]]]]],["calc1","params"],["push","params","parents"],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]],["=","parents",["reverse","parents"]],["push",["third","frame"],"parents"],["=","parent","procsym"],["while","false",[["not","parent"]],[[["identity","begun"],["=","procname","$"]],["=","procname",[".","procname","concat",["$\n"]]]],["=","proc",["getproc","parent"]],["=","procname",[".","procname","concat",[["first","proc"],"space",["tostring",["namespace","parent"]],"$::",[".","debug","procname",["parent"]]]]],["print1",["pop","parents"],"procname"],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]]],[["procedure","frame"],["printer"]]]],["set.","commander",["`","printframe"],["function","printframe",["frame","false","procstr"],["function","printparms",["lex1","false","ex1"],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[".","console","print",["$  ",["first","ex1"],"$: ",["second","ex1"],"$ (",["third","ex1"],"$)"]],[".","console","newline","false"]]]]],[["member",["first","frame"],["`",["let","let","&"]]],[".","console","print",[["first","frame"]]],[".","console","newline","false"],[".","console","printparms",[["third","frame"]]],[".","console","print",["$-----------"]],[".","console","newline",[2]],[".","console","print",[[".",[".","commander","utils"],"sourcelist",[[".","frame",3],"false","false",["frameDict","frame"]]]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","builtin"]],[".","console","print",[["first","frame"]]],[".","console","newline","false"],[".","console","print",[["second","frame"]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","interrupt"]],[".","console","print",[["first","frame"],"$ ",["third","frame"],"$ in ",["second","frame"]]],[".","console","newline","false"],[".","console","print",["$exec: ",[".","frame",3]]],[".","console","newline",[2]]],[["procedure","frame"],[".","commander","printlocals",["frame",{dictionary:{$trim:"true"}}]],[".","console","print",["$-----------"]],[".","console","newline",[2]],[".","console","print",[[".",[".","commander","utils"],"sourcelist",[[".","frame",3],"false","false",["frameDict","frame"]]]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","catch"]],[".","console","print",[["first","frame"]]],["=","procstr",["frameProc","frame"]],[[["identity","procstr"],[".","console","newline","false"],[".","console","print",["procstr"]]]],[".","console","newline",[2]]],[".","console","print",["$frame type:",["first","frame"]]],[".","console","newline",[2]]]],["set.","commander",["`","printframedivider"],["function","printframedivider",["frameno","false","header","trailer"],["=","header",[".","$============ Frame #","concat",["frameno","$ ==========="]]],["=","trailer","$================================"],[["not","frameno"],[".","console","printline",["trailer"]]],[".","console","printline",[[".","header","slice",[["length","frameno"]]]]]]],["set.","commander",["`","breakGlobalEnable"],["function","breakGlobalEnable",["enable"],[".","debug","breakGlobalAble",["enable"]]]],["set.","commander",["`","breakAdd"],["function","breakAdd",["location","expr","false","task","firstid","bpdict","procdef","exprstr"],["=","procdef",[".",[".","commander","utils"],"resolveLocation",["location"]]],[[["not","procdef"],[".","console","printline",["$ndb: can't find procedure ",[".",[".","commander","utils"],"locationString",["location"]]]],["return","false"]]],[[["not",[".","location",0]],["=","location",["cons",[".",[".",[".","procdef",1],"namespace"],"tostring"],["cdr","location"]]]]],[[["not",["integer",[".","location",2]]],["=","location",["list",[".","location",0],[".","location",1],1]]],[[".","location",3],["=","location",["list",[".","location",0],[".","location",1],[".","location",2]]]]],["=","task",[".",[".","commander","utils"],"breakLocation",["location"]]],[[["not","task"],[".","console","printline",["$ndb: can't find location ",[".",[".","commander","utils"],"locationString",["location"]]]],["return","false"]]],["=","firstid",1],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","bpid",["toint","bpid"]],[[["==","firstid","bpid"],["=","firstid",["+","bpid",1]]]],[[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],"task"],[".","console","printline",["$ndb: breakpoint ","bpid","$ already exists"]],["return","false"]]]]]],["=","bpdict",["breakpoint","task"]],[[["identity","bpdict"],[["eq",[".","bpdict","proc"],[".","debug","debugBlock"]],[".","console","printline",["$ndb: warning: closure breakpoints would conflict"]],["return","false"]],[".","console","printline",["$ndb: warning: overwriting breakpoint from different debugger"]]]],["=","bpdict",["breakpoint","task",[".","debug","debugBlock"]]],[[["not","bpdict"],[".","console","printline",["$ndb: cannot add that breakpoint"]],["return","false"]]],["set.","bpdict",["`","breakID"],"firstid"],["set[",[".","commander","breakpoints"],"firstid",{dictionary:{$location:"location",$procdef:"procdef",$where:"bpdict",$hitcount:0,$conditional:"expr"}}],[[["identity","expr"],["=","exprstr","$ (conditional)"]],["=","exprstr","$"]],[".","console","printline",["$breakpoint ","firstid","$ at ",[".",[".","commander","utils"],"locationString",["location"]],"exprstr"]],[[["not",[".","debug","bpenable"]],[".","console","printline",["$ndb: warning: breakpoints currently disabled"]]]],"firstid"]],["set.","commander",["`","breakClear"],["function","breakClear",["location","false","task"],["=","task",[".",[".","commander","utils"],"breakLocation",["location"]]],[[["not","task"],["return","false"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],[[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],"task"],["breakpoint","task","undefined"],[".","console","printline",["$breakpoint ","bpid","$ at ",[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"bpid"],"location"]]],"$ cleared"]],["set[",[".","commander","breakpoints"],"bpid","undefined"],["return"]]]]]],[".","console","printline",["$ndb: breakpoint not found for ",[".",[".","commander","utils"],"locationString",["location"]]]]]],["set.","commander",["`","breakDelete"],["function","breakDelete",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]],["return","false"]]],["breakpoint",[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"task"],"undefined"],[".","console","printline",["$breakpoint ","breaknum","$ at ",[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"breaknum"],"location"]]],"$ deleted"]],["set[",[".","commander","breakpoints"],"breaknum","undefined"]]],["set.","commander",["`","breakDisable"],["function","breakDisable",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]]]],[[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"enable"],["set.",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],["`","enable"],"false"],[".","console","printline",["$ndb: breakpoint ","breaknum","$ disabled"]]]]],["set.","commander",["`","breakEnable"],["function","breakEnable",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]]]],[["not",[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"enable"]],["set.",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],["`","enable"],"true"],[".","console","printline",["$ndb: breakpoint ","breaknum","$ enabled"]]]]],["set.","commander",["`","breakList"],["function","breakList",["false","rows","counts","rowdex","coldex"],[[["==",["length",[".","commander","breakpoints"]],0],[".","console","printline",["$no breakpoints"]],["return"]]],["=","rows",{array:[]}],["=","counts",{array:[]}],["set[","rows",0,{array:["$num","$enable","$count","$location","$condition"]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","rowdex",["+",-1,[".","rows","push",[{array:["bpid","$N",[".",["deref",[".","commander","breakpoints"],"bpid"],"hitcount"],[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"bpid"],"location"]]],[".","commander","exprstr",[[".",["deref",[".","commander","breakpoints"],"bpid"],"conditional"]]]]}]]]],[[[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"enable"],["set[",["deref","rows","rowdex"],1,"$Y"]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],["=","coldex",0],["while","false",[["not",["<=","coldex",4]]],[[["||",["not",["deref","counts","coldex"]],["<",["deref","counts","coldex"],[".",["deref","row","coldex"],"length"]]],["set[","counts","coldex",[".",["deref","row","coldex"],"length"]]]],["preadjust","coldex","+",1]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],[".","console","print",[["prepad",["deref","row",0],["deref","counts",0]]]],[".","console","print",[["prepad",["deref","row",1],["+",["deref","counts",1],1]]]],[".","console","print",[["prepad",["deref","row",2],["+",["deref","counts",2],1]]]],[".","console","print",["$  ",["deref","row",3],[".","space","repeat",[["-",["deref","counts",3],[".",["deref","row",3],"length"]]]]]],[[["deref","row",4],[".","console","print",["$ ",["deref","row",4]]]]],[".","console","newline","false"],[[[">","coldex",0],["=","coldex",0],[".","console","print",[["prepad","$",["deref","counts",0],"$-"]]],[".","console","print",["$ ",["prepad","$",["deref","counts",1],"$-"]]],[".","console","print",["$ ",["prepad","$",["deref","counts",2],"$-"]]],[".","console","print",["$  ",[".","$-","repeat",[["deref","counts",3]]]]],[".","console","printline",["$ ",[".","$-","repeat",[["deref","counts",4]]]]]]]]]]]],["=","debugCmds",{dictionary:{$b:"debug_breaks",$break:"debug_breaks",$clear:"debug_breaks",$delete:"debug_breaks",$disable:"debug_breaks",$enable:"debug_breaks",$catch:"debug_exceptions",$c:"debug_execs",$continue:"debug_execs",$f:"debug_execs",$finish:"debug_execs",$n:"debug_execs",$next:"debug_execs",$s:"debug_execs",$step:"debug_execs",$eval:"debug_evals",$p:"debug_evals",$print:"debug_evals",$pp:"debug_evals",$help:"debug_helps",$i:"debug_infos",$info:"debug_infos",$list:"debug_list",$bt:"debug_stacks",$backtrace:"debug_stacks",$frame:"debug_stacks",$scope:"debug_stacks",$up:"debug_stacks",$down:"debug_stacks",$q:"debug_quit",$quit:"debug_quit"}}],"commander"]),e._SetBindingList("debug_breaks",["function","debug_breaks",["cmdword","cmdargs","commander","debug","false","console","args","expr","location","breaknum"],["=","console",[".","commander","console"]],[["==",[".","cmdword","charAt",[0]],"$b"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s+if\\s+(\\S+.*)\\s*$"]]]],[[["identity","args"],["=","location",[".","commander","getprocarg",[["deref","args",1]]]],["=","expr",[".","commander","parseText",[["deref","args",2]]]],[["not","expr"],["return",[".","console","print",["$ndb: conditional breakpoint expression not understood"]]]]],["=","location",[".","commander","getprocarg",["cmdargs"]]]],[[["not","location"],["return",[".","console","print",["$ndb: please specify a valid procedure"]]]]],[".","commander","breakAdd",["location","expr"]]],[["==","cmdword","$clear"],["=","location",[".","commander","getprocarg",["cmdargs"]]],[[["not","location"],["return",[".","console","print",["$ndb: please specify a valid procedure"]]]],[["numeric",["toint",[".","location",1]]],["return",[".","console","print",["$ndb: please specify a procedure (or use delete <number>)"]]]]],[".","commander","breakClear",["location"]]],[["||",["==","cmdword","$delete"],["==","cmdword","$disable"],["==","cmdword","$enable"]],["=","breaknum",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["||",["==","cmdargs","$"],["==",[".","cmdargs","toLowerCase","false"],"$all"]],[["==","cmdword","$enable"],[".","console","printline",["$breakpoints enabled"]],["return",[".","commander","breakGlobalEnable",["true"]]]],[["==","cmdword","$disable"],[".","console","printline",["$breakpoints disabled"]],["return",[".","commander","breakGlobalEnable",["false"]]]]]],[[["||",["not","breaknum"],["&&",["not",["numeric","breaknum"]],["!=",["pop","breaknum"],["`","set"]]]],["return",[".","console","print",["$ndb: please specify breakpoint number(s)"]]]]],["loop","false",[[["numeric","breaknum"],["=","expr","breaknum"],["=","breaknum","false"]],[["empty","breaknum"],["break"]],["=","expr",["pop","breaknum"]]],[[["==","cmdword","$delete"],[".","commander","breakDelete",["expr"]]],[["==","cmdword","$disable"],[".","commander","breakDisable",["expr"]]],[".","commander","breakEnable",["expr"]]]]]]),e._SetBindingList("debug_exceptions",["function","debug_exceptions",["cmdword","cmdargs","commander","debug","nsteps","false","console","args","expr"],["=","console",[".","commander","console"]],[[["==","cmdargs","$disable"],["set.","commander",["`","catch"],"false"]],[["||",["==","cmdargs","$enable"],["==","cmdargs","$all"]],["set.","commander",["`","catch"],"true"]],[["!=","cmdargs","$"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*if\\s+(\\S+.*)\\s*$"]]]],[[["identity","args"],["=","expr",[".","commander","parseText",[["deref","args",1]]]],[["not","expr"],["return",[".","console","print",["$ndb: conditional catch expression not understood"]]]]]],["set.","commander",["`","catch"],"expr"]]],[["not",[".","commander","catch"]],[".","console","printline",["$exceptions: catch disabled"]]],[["atom",[".","commander","catch"]],[".","console","printline",["$exceptions: catch all"]]],[".","console","printline",["$exceptions: catch if ",[".","commander","exprstr",[[".","commander","catch"]]]]]]),e._SetBindingList("debug_execs",["function","debug_execs",["cmdword","cmdargs","commander","debug","nsteps"],[[["==",[".","cmdword","charAt",[0]],"$c"],[".","debug","resume","false"]],[["==",[".","cmdword","charAt",[0]],"$f"],[".","debug","stepup","false"]],[["==",[".","cmdword","charAt",[0]],"$n"],[".","debug","stepover","false"]],[["==",[".","cmdword","charAt",[0]],"$s"],["=","nsteps",["toint","cmdargs"]],[[["not",["numeric","nsteps"]],["=","nsteps",1]]],[".","debug","step",["nsteps"]]],["return"]],["`","break"]]),e._SetBindingList("debug_evals",["function","debug_evals",["cmdword","cmdargs","commander","debug","false","console","ex1","ex2","aterm","printlevel","result"],["=","console",[".","commander","console"]],["=","ex1",[".","commander","parseText",["cmdargs"]]],[[["==","cmdword","$eval"],["=","ex2",["tokenlast"]],["=","aterm",["atTerminator"]],[["==",["first","ex2"],["`",";"]],["=","printlevel",2]],[["==",["first","ex2"],["`",";>"]],["=","printlevel",1]]],["=","aterm","true"],[["==","cmdword","$pp"],["=","printlevel",2]],[["==",[".","cmdword","charAt",[0]],"$p"],["=","printlevel",1]],["return"]],[["not","aterm"],[".","console","printline",[["langExprLoc","ex2"],"$operator missing between ","ex1","$ and ","ex2"]],[".","console","newline","false"]],["=","result",["eval","ex1"]],[["identity","printlevel"],[".","console","print",["$    result: "]],[[["==","printlevel",2],[".","console","print",[[".","commander","print",["result"]]]]],[".","console","printq",["result"]]],[".","console","newline","false"]]]),e._SetBindingList("debug_helps",["function","debug_helps",["cmdword","cmdargs","commander","debug","false","console","text"],["=","console",[".","commander","console"]],[[["==","cmdargs","$me"],["=","text","$you're beyond it"]],["=","text",["call",["let","lambda",["proc"],[["||",["eq","proc","debug_breaks"],["==","cmdargs","$breakpoints"]],"$    b[reak] <location>             - set breakpoint at location\n            <location> if function(count, value) { <body> }\n            <location> if <expression>\n    clear   <location>             - clear breakpoint at location\n    delete <#> [<#>...]            - delete breakpoint(s) by #\n    disable [<#>]                  - disable breakpoint # | all\n    enable [<#>]                   - enable breakpoint # | all\n    i[nfo] (b)reakpoints           - show current breakpoints\n"],[["||",["eq","proc","debug_exceptions"],["==","cmdargs","$exceptions"]],"$    catch enable                   - catch all exceptions (default)\n    catch disable                  - don't catch any exceptions\n    catch if <expr>                - catch if <expr> true\n"],[["||",["eq","proc","debug_execs"],["==","cmdargs","$execution"]],"$    c[continue]                    - continue execution\n    f[finish]                      - finish current procedure\n    n[ext]                         - step over to next expression\n    s[tep]                         - step into next expression\n"],[["||",["eq","proc","debug_evals"],["==","cmdargs","$eval"]],"$    pp <expr>                      - evaluate expr and pretty-print result\n    eval <expr> [;]                - (same)\n    p <expr>                       - evaluate expr and print basic result\n    eval <expr> ;>                 - (same)\n    eval <expr> ;;                 - evaluate expr and don't print result\n"],[["eq","proc","debug_helps"],"$    help                           - list help topics\n    help <debug-command>           - get specific help on a command\n"],[["||",["eq","proc","debug_infos"],["==","cmdargs","$info"]],"$    i[nfo]                         - list info topics\n    i[nfo] <topic>                 - print debugger info on topic\n"],[["eq","proc","debug_list"],"$    list [<namespace>::]<procedure-name>[.<nestedname>]*[:start[:end]]\n"],[["==","cmdargs","$locations"],"$    [<namespace>::] <procname> [.<procname>...] [: line-number]\n"],[["||",["eq","proc","debug_stacks"],["==","cmdargs","$stacks"]],"$    bt                             - print backtrace\n    backtrace                      - (same)\n    frame <start#> [- <end#>]      - display stack frame(s)\n    scope <frame#>                 - change focus frame and display variables\n    up                             - change focus frame higher\n    down                           - change focus frame lower\n"],[["eq","proc","debug_quit"],"$    q[uit]                         - abandon all execution and restart repl\n"],"$help topics:\n    breakpoints                    - work with breakpoints\n    exceptions                     - work with exceptions\n    execution                      - stepping and continuing execution\n    eval                           - evaluating and printing expressions\n    help                           - using help\n    info                           - print debugger information\n    list                           - list procedure source\n    locations                      - syntax for procedure location references\n    stacks                         - backtrace and stack frame details\n    quit                           - quitting current execution\n"],["deref","debugCmds","cmdargs"]]]],[".","console","print",["text"]]]),e._SetBindingList("debug_infos",["function","debug_infos",["cmdword","cmdargs","commander","debug","false","console","args"],["=","console",[".","commander","console"]],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".","console","print",["$info topics:\n    i[nfo] (b)reakpoints                           - show current breakpoints\n    i[nfo] (f)ind          <regex>                 - find matching symbols in active namespaces\n                           <regex> all | in <namespace>    ...in all or specified namespace\n    i[nfo] f(u)tures                               - show pending futures\n    i[nfo] (m)odules       [<name> [<name> ...]]   - show modules and components\n    i[nfo] (p)roc          [<name>]                - show information about procedure\n    i[nfo] (s)scope        [<frame>]               - show parameters and locals for frame\n"]]],[["||",["==","cmdword","$b"],["==","cmdword","$breakpoints"]],[".","commander","breakList","false"]],[["||",["==","cmdword","$f"],["==","cmdword","$find"]],[".",[".","commander","info"],"infofind",["cmdargs"]]],[["||",["==","cmdword","$u"],["==","cmdword","$future"],["==","cmdword","$futures"]],[".",[".","commander","info"],"infofutures",["cmdargs"]]],[["||",["==","cmdword","$m"],["==","cmdword","$module"],["==","cmdword","$modules"]],[".",[".","commander","info"],"infomod",["cmdargs"]]],[["||",["==","cmdword","$s"],["==","cmdword","$scope"]],["debug_stacks","$scope","cmdargs","commander","debug"]],[["||",["==","cmdword","$p"],["==","cmdword","$proc"],["==","cmdword","$procedure"]],[".",[".","commander","info"],"infoproc",["cmdargs"]]],[".","console","printline",["$ndb: info topic ","cmdword","$ not implemented"]]]),e._SetBindingList("debug_list",["function","debug_list",["cmdword","cmdargs","commander","debug","false","console","procdef","start","end","center","markdict"],["=","console",[".","commander","console"]],[[["&&","cmdargs",["!=","cmdargs","$"]],[".",[".","commander","info"],"infolist",["cmdargs"]],["return"]]],[[["not",[".",[".","commander","info"],"defloc"]],[".","console","printline",["$ndb: nothing to list"]],["return"]]],["=","procdef",[".",[".","commander","utils"],"resolveLocation",[[".",[".","commander","info"],"defloc"]]]],[[["not","procdef"],[".","console","printline",["$ndb: can't find ",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],["return"]]],["=","start",[".",[".",[".","commander","info"],"defloc"],2]],["=","center",20],[[["not","start"],["=","start",1],["=","end","center"]],["preadjust","start","-",["quotient","center",2]],[[["<","start",1],["=","start",1]]],["=","end",["-",["+","start","center"],1]]],[".","console","printline",[[".","procdef",0],"space",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],[[[".",[".",[".","commander","info"],"defloc"],2],["=","markdict",{dictionary:{}}],["set[","markdict",[".",[".",[".","commander","info"],"defloc"],2],"$--\x3e"]]],[".","console","print",[[".",[".",[".","commander","info"],"utils"],"sourcelist",["procdef","start","end","markdict"]]]]]),e._SetBindingList("debug_stacks",["function","debug_stacks",["cmdword","cmdargs","commander","debug","false","console"],["=","console",[".","commander","console"]],["function","backtrace",["false","framedex","frame"],["function","paramstr",["frame","false","params","pinfo"],["=","params",[".",[".","frame",3],2]],[["not","params"],["=","pinfo","$()"]],[["atom","params"],["=","pinfo",[".","$ ","concat",[["tostring","params"]]]]],["=","pinfo","false"],["for",["let","lambda",["iter"],["=","iter",["iterate","params",["`","param"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","param",[".","iter","$value"]],[[["not","param"],["push",["`","local"],"pinfo"]],["push","param","pinfo"]]]]],["=","pinfo",["tostring",["reverse","pinfo"]]]],["=","framedex",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","frames"],["`","frame"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","frame",[".","iter","$value"]],[[["procedure","frame"],["=","finfo",[".","$ ","concat",[["tostring",["namespace",["second","frame"]]],"$::",[".","debug","procname",[[".",[".","frame",3],1]]],["paramstr","frame"]]]]],[["eq",["first","frame"],["`","interrupt"]],["=","finfo",[".","$ ","concat",[["tostring",["third","frame"]]]]]],["=","finfo","$"]],[".","console","printline",[["prepad",["postadjust","framedex","+",1],5],"$ ",["prepad",[".","frame",0],10],"finfo"]]]]]],["function","pscope",["false","nargs","frame"],["=","nargs",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["not","nargs"],["=","nargs",[".","commander","focus"]],[".","console","printline",["$Scope is frame #","nargs"]]],[["||",["not",["numeric","nargs"]],[">=","nargs",[".",[".","commander","frames"],"length"]]],[".","console","printline",["$ndb: invalid frame number:","nargs"]],["return"]],[".","console","printline",["$Scope now frame #","nargs"]]],["set.","commander",["`","focus"],"nargs"],["=","frame",["deref",[".","commander","frames"],"nargs"]],[".","commander","updateDefproc",["frame"]],[".","console","printline",[[".","frame",0],"space",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],[".","commander","printlocals",["frame"]]],["function","pframes",["false","nargs","startx","lastx"],["=","startx",["=","lastx",[".","commander","focus"]]],["=","nargs",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["numeric","nargs"],["=","startx",["=","lastx","nargs"]]],[["eq",["first","nargs"],["`","range"]],[["<",[".","nargs",1],[".","nargs",2]],["=","startx",[".","nargs",1]],["=","lastx",[".","nargs",2]]],["=","startx",[".","nargs",2]],["=","lastx",[".","nargs",1]]],[["identity","nargs"],[".","console","print",["$ndb: invalid frame number or range:","nargs"]],["return"]]],[["<","startx",[".",[".","commander","frames"],"length"]],[[[">=","lastx",[".",[".","commander","frames"],"length"]],["=","lastx",["-",[".",[".","commander","frames"],"length"],1]]]],["while","false",[["not",["<=","startx","lastx"]]],[".","commander","printframedivider",["startx"]],[".","commander","printframe",[["deref",[".","commander","frames"],["postadjust","startx","+",1]]]]],[".","commander","printframedivider","false"]]],[["||",["==","cmdword","$bt"],["==","cmdword","$backtrace"]],["backtrace"]],[["==","cmdword","$frame"],["pframes"]],[["==","cmdword","$scope"],["pscope"]],[["||",["==","cmdword","$up"],["==","cmdword","$down"]],[[["&&",["==","cmdword","$up"],["<",[".","commander","focus"],["-",[".",[".","commander","frames"],"length"],1]]],[".","console","print",["$+Scope now frame #",["preadjust",[".","commander","focus"],"+",1]]]],[["&&",["==","cmdword","$down"],[">",[".","commander","focus"],0]],[".","console","print",["$-Scope now frame #",["preadjust",[".","commander","focus"],"-",1]]]],["return"]],[".","commander","updateDefproc",[["deref",[".","commander","frames"],"nargs"]]]],[".","console","printline",["$ndb: ","cmdword","$ not implemented yet"]]]),e._SetBindingList("debug_quit",["function","debug_quit",["cmdword","cmdargs","commander","debug"],["sudo",["=","exception",["`","exception"]]],["throw","debugger"]]),e._AddPropertyList("DebuggerInit",[["$.lingoInit","true"]]),e._SetBindingList("DebuggerInit",["function","DebuggerInit",["false","manifest"],["=","manifest",["`",["DebuggerREPL","debug_breaks","debug_exceptions","debug_execs","debug_evals","debug_helps","debug_infos","debug_list","debug_stacks","debug_quit","DebuggerInit"]]],[".",[".","Naan","module"],"build",["$CLI","$Debugger",["function","lambda",["modobj","compobj","false","debug"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DebuggerREPL"],"DebuggerREPL"],["=","debug",[".",[".",[".",["modlist"],"Util"],"exports"],"DebugController","false"]],[".","debug","setDefCommander",[["DebuggerREPL","debug"]]]]]]]),e._Execute(["DebuggerInit"]),e._SetNamespace(t,!0)}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
+!function(e){e.BootLingo=function(e){"use strict";var t=e._SetNamespace("Lib");e._CopyBinding("equal","=="),e._CopyBinding("setq","="),e._CopyBinding("and","&&"),e._CopyBinding("or","||"),e._CopyBinding("loop","while"),e._Import("number","difference","-"),e._Import("number","greater",">"),e._Import("number","lesser","<"),e._Import("number","times","*"),e._Import("number","plus","+"),e._Import("number","quotient","/"),e._Import("number","quotient","/."),e._Import("number","mod","%"),e._SetValue("echo",[]),e._SetValue("err",[]),e._SetValue("rdsDriver"),e._SetBindingList("^",["macro","^",["ex1","ex2"],["list",["`","^"],"ex1","ex2"]]),e._SetBindingList("!",["macro","!",["ex1"],["list",["`","!"],"ex1"]]),e._SetBindingList("~",["macro","~",["ex1"],["list",["`","~"],"ex1"]]),e._SetBindingList("~=",["macro","~=",["ex1","ex2"],["list",["`","~="],"ex1","ex2"]]),e._SetBindingList("#[",["macro","#[",["ex1","ex2"],["list",["`","#["],"ex1","ex2"]]),e._SetBindingList("dereflist",["macro","dereflist","x",["cons","dereflist","x"]]),e._SetBindingList("!=",["function","!=",["ex1","ex2"],["not",["equal","ex1","ex2"]]]),e._SetBindingList(">=",["function",">=",["ex1","ex2"],["or",["greater","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("<=",["function","<=",["ex1","ex2"],["or",["lesser","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("\\.*",["function","\\.*",["expr"],["keys","expr"]]),e._SetBindingList("@",["macro","@",["sym","write"],["=","sym",["eval","sym"]],[[["eval","write"],["put","sym"]]],["cdr","sym"]]),e._SetBindingList("@*",["function","@*",["sym"],["keys",["cdr","sym"]]]),e._SetBindingList("!==",["function","!==",["ex1","ex2"],["not",["eq","ex1","ex2"]]]),e._SetBindingList("<=>",["function","<=>",["ex1","ex2"],[["not",["||","ex1","ex2"]],0],[["||",["<","ex1","ex2"],["not","ex2"]],-1],[["||",[">","ex1","ex2"],["not","ex1"]],1],0]),e._SetBindingList("\\..",["macro","\\..",["ex1","ex2"],["list",["`","\\.."],"ex1","ex2"]]),e._SetBindingList("\\..<",["macro","\\..<",["ex1","ex2"],["list",["`","\\..<"],"ex1","ex2"]]),e._SetBindingList("subat",["function","subat",["tree","reps","false","map","pair"],["global"],["=","map",{dictionary:{}}],[[["&&",["not",["tuple","reps"]],["not",["array","reps"]]],["return","tree"]]],[[["&&",["not",["tuple",[".","reps",0]]],["not",["array",[".","reps",0]]]],["=","reps",{array:["reps"]}]]],["for",["let","lambda",["iter"],["=","iter",["iterate","reps",["`","pair"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","pair",[".","iter","$value"]],["set[","map",[".","pair",0],"pair"]]]],["function","sarray",["items","false","out","item"],["=","out",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","items",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],[".","out","push",[["recur","item"]]]]]],"out"],["function","sdict",["items","false","out","key","data"],["=","out",{dictionary:{}}],["for",["let","lambda",["iter"],["=","iter",["iterate","items",["`",["key","data"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["key","data"],[".","iter","$value"]],[[["deref","map","key"],["=","key",[".",["deref","map","key"],1]]]],["set[","out","key",["recur","data"]]]]],"out"],["call",["function","recur",["sub","false","make"],[["tuple","sub"],["while","false",[["not",["not",["empty","sub"]]]],["push",["recur",["pop","sub"]],"make"]],["reverse","make"]],[["array","sub"],["sarray","sub"]],[["dictionary","sub"],["sdict","sub"]],[["&&",["deref","map","sub"],["==",["typeof","sub"],["typeof",[".",["deref","map","sub"],0]]]],[".",["deref","map","sub"],1]],"sub"],"tree"]]),e._SetBindingList("subatq",["macro","subatq",["tree","reps"],["subat","tree",["eval","reps"]]]),e._SetBindingList("prepad",["function","prepad",["value","length","padstr"],[[["not","padstr"],["=","padstr","$ "]]],["=","value",["tostring","value"]],[".",["strcat",[".","padstr","repeat",["length"]],"value"],"slice",[["-","length"]]]]),e._SetBindingList("postpad",["function","postpad",["value","length","padstr"],[[["not","padstr"],["=","padstr","$ "]]],["=","value",["tostring","value"]],[".",["strcat","value",[".","padstr","repeat",["length"]]],"slice",[0,"length"]]]),e._SetBindingList("map",["function","map",["targex","func","false","result","item","keylist"],[["array","targex"],["arraycall","targex","map","func"]],[["or",["dictionary","targex"],["xobject","targex"]],["=","result",["new","dictionary"]],["=","keylist",["keys","targex"]],["for",["let","lambda",["iter"],["=","iter",["iterate","keylist",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["xset","result","item",["call","func",["deref","targex","item"],"item","targex"]]]]],"result"],[["atom","targex"],"false"],["for",["let","lambda",["iter"],["=","iter",["iterate","targex",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","result",["cons",["call","func","item",["length","result"],"targex"],"result"]]]]],["reverse","result"]]),e._SetBindingList("iterate",["function","iterate",["target","varsym","false","iterdict","keysym"],[[["not",["||",["symbol","varsym"],["tuple","varsym"]]],["throw",["list","internal",["strcat","$iteration variable invalid: ","varsym"]]]]],["=","iterdict",{dictionary:{$target:"target",$final:"final_value"}}],["function","final_value",["dict"],"dict"],[[["tuple","target"],["=","keysym",["car","target"]],[[["&&",["symbol","keysym"],["deref",["@","keysym"],["`","\\.iterate"]]],["return",["call",["deref",["@","target"],["`","\\.iterate"]],"target","varsym"]]],[["&&",["symbol","keysym"],["deref",["@","iterate"],"keysym"]],["return",["call",["deref",["@","iterate"],"keysym"],"target","varsym"]]]],["set.","iterdict",["`","traverse"],"target"],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","last"],["-",["length","target"],1]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"tuple_next_value"]],["set.","iterdict",["`","next"],"tuple_next"]],["function","tuple_next_value",["dict"],[["empty",[".","dict","traverse"]],["set.","dict",["`","done"],"true"]],["preadjust",[".","dict","index"],"+",1],["set.","dict",["`","value"],["car",[".","dict","traverse"]]],["set.","dict",["`","traverse"],["cdr",[".","dict","traverse"]]],"false"],["function","tuple_next",["dict"],[["empty",[".","dict","traverse"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["list",["car",[".","dict","traverse"]],["preadjust",[".","dict","index"],"+",1]]],["set.","dict",["`","traverse"],["cdr",[".","dict","traverse"]]],"false"]],[["||",["array","target"],["&&",["xobject","target"],["not",["xkeys","target"]]]],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","last"],["-",[".","target","length"],1]],[[["not",[".","iterdict","last"]],["set.","iterdict",["`","last"],-1]]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"array_next_value"]],["set.","iterdict",["`","next"],"array_next"]],["function","array_next_value",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["deref",[".","dict","target"],["preadjust",[".","dict","index"],"+",1]]],"false"],["function","array_next",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["preadjust",[".","dict","index"],"+",1],["set.","dict",["`","value"],["list",["deref",[".","dict","target"],[".","dict","index"]],[".","dict","index"]]],"false"]],[["&&",["object","target"],[".","target","\\.iterate"]],["return",[".","target","\\.iterate",["target","varsym"]]]],[["||",["dictionary","target"],["object","target"],["xobject","target"]],["set.","iterdict",["`","index"],-1],["set.","iterdict",["`","keys"],[".",["keys","target"],"toarray"]],["set.","iterdict",["`","last"],["-",[".",[".","iterdict","keys"],"length"],1]],[[["not",[".","iterdict","last"]],["set.","iterdict",["`","last"],-1]]],[[["symbol","varsym"],["set.","iterdict",["`","next"],"dict_next_key"]],["set.","iterdict",["`","next"],"dict_next"]],["function","dict_next_key",["dict"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["set.","dict",["`","value"],["deref",[".","dict","keys"],["preadjust",[".","dict","index"],"+",1]]],"false"],["function","dict_next",["dict","false","index"],[[">=",[".","dict","index"],[".","dict","last"]],["set.","dict",["`","done"],"true"]],["=","key",["deref",[".","dict","keys"],["=","index",["preadjust",[".","dict","index"],"+",1]]]],["set.","dict",["`","value"],["list","key",["deref",[".","dict","target"],"key"],"index"]],"false"]],[["not","target"],["set.","iterdict",["`","last"],["set.","iterdict",["`","index"],-1]],["set.","iterdict",["`","next"],"empty_next"],["function","empty_next",["dict"],["set.","dict",["`","done"],"true"],"true"]],["throw",["list","internal",["strcat","$don't know how to iterate ",["typeof","target"]]]]],"iterdict"]),e._SetBindingList("sleep",["closure","sleep",["msec"],["=","msec",["||","msec",0]],[".",["future",["function","sleep","false","true"],"msec"],"wait","false"]]),e._SetBindingList("await",["closure","await",["promise","timeout","false","pending"],[[["not","promise"],["throw",["list","internal","$await on false promise"]]]],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[["identity","timeout"],[".","pending","wait",["timeout",["list",["Error",["strcat","$await timeout after ","timeout","$ msec"]]]]]],[".","pending","wait","false"]]),e._SetBindingList("asyncArray",["closure","asyncArray",["elements","maxActive","worker","false","pending","results"],[[["not",["numeric",[".","elements","length"]]],["return","false"]]],["=","results",{array:[]}],["=","pending",["new","nonce"]],["set.","pending",["`","active"],0],["set.","pending",["`","index"],0],["set.","pending",["`","running"],{array:[]}],["closure","processOne",["index","false","entry"],["preadjust",[".","pending","active"],"+",1],["set[",[".","pending","running"],"index","true"],["=","entry",["deref","elements","index"]],["function","cancel",["result"],["sprint"],["done","index","result"]],["future",["function","coProcess",["false","result"],["catch",[["=","result",["worker","entry","index","cancel"]]],"false",[["sprint"],["done","index","result"]]]],0]],["function","done",["index","result"],[[["deref",[".","pending","running"],"index"],["set[","results","index","result"],["preadjust",[".","pending","active"],"-",1],["set[",[".","pending","running"],"index","false"]]],["doMore"]],["function","doMore","false",[["&&",["==",[".","pending","active"],0],[">=",[".","pending","index"],[".","elements","length"]]],[".","pending","signal",["results"]]],["while","false",[["not",["&&",["<",[".","pending","active"],"maxActive"],["<",[".","pending","index"],[".","elements","length"]]]]],["processOne",["postadjust",[".","pending","index"],"+",1]]]],["doMore"],"pending"]),e._SetBindingList("syncAdapter",["function","syncAdapter","args",["call",["closure","syncWaiter",["proc","arglist","false","pending"],["=","pending",["new","nonce"]],["apply","proc",["reverse",["reverse","arglist"],["list",["function","lambda",["error","data"],[".","pending","signal",[["list","error","data"]]]]]]],[".","pending","wait",["proc"]]],["pop","args"],"args"]]),e._SetBindingList("asyncResult",["closure","asyncResult","args",[".",["future",["function","asyncResultF","false",["apply",["pop","args"],"args"]]],"run","false"]]),e._SetBindingList("jsInstanceOf",["function","jsInstanceOf",["item","constructor"],[["xobject","item","constructor"],["loop","false",[[["not","item"],"false",["break"]],[["eq","item",[".","constructor","prototype"]],["break"]],["=","item",[".",[".","js","o"],"getPrototypeOf",["item"]]]]]]]),e._SetBindingList("jsTypedArray",["function","jsTypedArray",["item"],[[["not",["xobject","jsTypedArrayType"]],[[".","js","w"],["=","jsTypedArrayType",[".",[".","js","o"],"getPrototypeOf",[[".",[".","js","w"],"Uint8Array"]]]]],["=","jsTypedArrayType",[".",[".","js","o"],"getPrototypeOf",[[".",[".","js","g"],"Uint8Array"]]]]]],["||",["jsInstanceOf","item","jsTypedArrayType"],["jsInstanceOf",[".","item","constructor"],"jsTypedArrayType"]]]),e._SetBindingList("makeActivator",["closure","makeActivator",["nslist","false","checkns","targns"],["=","checkns",["nscaller"]],[[["not","nslist"],["=","nslist",["nsactive"]]]],["=","targns",["car","nslist"]],["enclose",["function","lambda","false",[["or",["eq","checkns",["nscaller"]],["eq","checkns",[".",["nsactive"],0]]],["nsactive","nslist"]],["throw",[".","$activate ","concat",[[".","nslist","tostring"],"$ needs ",[".","checkns","tostring"],"$ not ",[".",["nscaller"],"tostring"]]]]],"targns"]]),e._SetBindingList("dialect",["function","dialect",["id"],[["identity","id"],[[["==","id",0],["=","id",[".",["dialect"],0]]]],[".",[".",[".","module","exports"],"Registry"],"findName",["id"]]],[".",[".",[".","module","exports"],"Registry"],"dialects","false"]]),e._SetBindingList("RuntimeOperators",["function","RuntimeOperators","false",[".",[".","module","exports"],"operators"]]),e._AddPropertyList("RuntimeLibInit",[["$.lingoInit","true"]]),e._SetBindingList("RuntimeLibInit",["function","RuntimeLibInit",["modname","false","manifest","operlist","runtimelib"],["=","manifest",["`",["=","+","-","*","/","/.","%","<",">","&&","and","||","or","^","!","~","~=","`","#[","dereflist","==","!=",">=","<=","\\.*","@","@*","eq","not","while","for","===","!==","<=>","\\..","\\..<","\\...","subat","subatq","prepad","postpad","map","iterate","sleep","await","asyncArray","syncAdapter","asyncResult","jsInstanceOf","jsTypedArray","makeActivator","dialect","RuntimeOperators","RuntimeLibInit"]]],["=","operlist",["`",["=","+","-","*","/","/.","%","<",">","&&","and","||","or","^","!","~","~=","`","#[","==","!=",">=","<=","\\.*","@","@*","eq","not","while","for","===","!==","<=>","\\..","\\..<"]]],["=","runtimelib",["`",["dereflist","subat","subatq","prepad","postpad","map","iterate","defproc","defprop","sleep","await","asyncArray","syncAdapter","asyncResult","jsInstanceOf","jsTypedArray","makeActivator","dialect"]]],["function","nsCopyproc",["sym","proc"],[["nsrights","sym"],["copyproc","sym","proc"]],[["!=",[".","sym","proc"],"proc"],["debuglog","$no rights to set sym from proc","sym","proc"]]],[[["symbol","NideBuild"],["nsCopyproc",["`","="],"setq"],["nsCopyproc",["`","+"],"plus"],["nsCopyproc",["`","-"],"difference"],["nsCopyproc",["`","*"],"times"],["nsCopyproc",["`","/"],"quotient"],["nsCopyproc",["`","/."],"quotient"],["nsCopyproc",["`","%"],"mod"],["nsCopyproc",["`","<"],"lesser"],["nsCopyproc",["`",">"],"greater"],["nsCopyproc",["`","&&"],["`","and"]],["nsCopyproc",["`","||"],["`","or"]],["nsCopyproc",["`","while"],["`","loop"]],["nsCopyproc",["`","for"],"call"],["nsCopyproc",["`","=="],"equal"],["nsCopyproc",["`","==="],["`","eq"]],["sudo",["set[",["@","tuple","true"],["`","append"],"append"]],["sudo",["set[",["@","tuple","true"],["`","subat"],"subat"]],["sudo",["set[",["@","tuple","true"],["`","map"],"map"]],["sudo",["set[",["@","array","true"],["`","map"],"map"]]]],[[["not","modname"],["=","modname",[".","module","id"]]]],[".",[".","Naan","module"],"build",["modname","$RuntimeLib",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","subat"],"subat"],["set.",[".","modobj","exports"],["`","subatq"],"subatq"],["set.",[".","modobj","exports"],["`","prepad"],"prepad"],["set.",[".","modobj","exports"],["`","postpad"],"postpad"],["set.",[".","modobj","exports"],["`","map"],"map"],["set.",[".","modobj","exports"],["`","iterate"],"iterate"],["set.",[".","modobj","exports"],["`","operators"],[".",[".","Naan","module"],"export",["operlist"]]],["set.",[".","modobj","exports"],["`","runtimelib"],[".",[".","Naan","module"],"export",["runtimelib"]]],["sudo",["set.","Naan",["`","runtimelib"],[".",[".","modobj","exports"],"runtimelib"]]]]]]]),e._Execute(["RuntimeLibInit","$Lib"]),e._SetBindingList("defproc",["macro","defproc","exlist",["call",["function","lambda",["false","procname"],["=","procname",["caadr","exlist"]],[["!=",["namespace","procname"],["car",["nsactive"]]],["printline","$cannot define ",["car","exlist"],"$ ","procname","$ in ",["tostring",["car",["nsactive"]]]],"false"],["=","exlist",["enclose","exlist"]],[[["&&",["!=",["getproc","procname"],"exlist"],["getproc","procname"]],["printline","$ ==> redefined: ","procname"]]],["putproc","procname","exlist"],"procname"]]]),e._SetBindingList("defprop",["macro","defprop",["ex1","ex2","ex3","false","fbind","procname"],[["member",["car","ex3"],["`",["function","function&","macro","closure","let","let&"]]],["=","procname",["compress",["list","ex1","ex2"]]],[["!=",["namespace","procname"],["car",["nsactive"]]],["printline","$cannot define property ",["car","ex3"],"$ ","procname","$ in ",["tostring",["car",["nsactive"]]]],"false"],["=","fbind",["enclose",["cons",["car","ex3"],["cons","procname",["cddr","ex3"]]]]],[[["&&",["get","ex1","ex2"],["!=",["get","ex1","ex2"],"fbind"]],["print","$ ==> redefined: "],["printline","ex1","space","ex2"]]],["putproc","procname","fbind"],["put","ex1","ex2","procname"],"ex1"],[["==",["get","ex1","ex2"],"ex3"],"ex1"],[[["get","ex1","ex2"],["print","$ ==> redefined: "],["printline","ex1","space","ex2"]]],["put","ex1","ex2","ex3"],"ex1"]),e._SetBindingList("DefineLanguage",["closure","DefineLanguage",["langname","grammar","parser","unparser"],["closure","dialect",["name","operators","enterDNS","false","dobj"],["=","dobj",["new","object","this"]],["set.","dobj",["`","ns"],[".",["nsactive"],0]],["set.","dobj",["`","name"],"name"],["set.","dobj",["`","grammar"],["new","grammar"]],["set.","dobj",["`","operators"],"operators"],["set.","dobj",["`","exunparse"],{dictionary:{}}],["set.","dobj",["`","parser"],"parser"],["set.","dobj",["`","unparser"],"unparser"],["set.","dobj",["`","parse"],["function","parse",["source"],[".","dobj","parser",["source",[".","dobj","grammar"],[".","dobj","operators"]]]]],["set.","dobj",["`","parseErrorString"],["function","parseErrorString",["error"],["langParseErrorString","error"]]],["set.","dobj",["`","unparse"],["function","unparse",["expr","options"],[".","dobj","unparser",["expr","options",[".","dobj","grammar"],[".","dobj","exunparse"]]]]],["set.","dobj",["`","print"],["function","print",["expr","options"],[".",[".","dobj","unparser",["expr","options",[".","dobj","grammar"],[".","dobj","exunparse"]]],"string","false"]]],["set.","dobj",["`","defhook"],["function","defhook",["hook","false","returner","newsym"],["=","returner",["makeActivator"]],["enterDNS"],["=","newsym",["compress","hook"]],["copyproc","newsym","hook"],["returner"],"newsym"]],["set.","dobj",["`","defunparse"],["function","defunparse",["sym","proc"],["set[",[".","dobj","exunparse"],"sym","proc"]]],["set.","dobj",["`","redefine"],["function","redefine",["sym","proc","false","returner"],["=","returner",["makeActivator"]],["enterDNS"],["=","sym",["compress","sym"]],[[["tuple","proc"],["putproc","sym","proc"]],["copyproc","sym","proc"]],["returner"],"sym"]],["set.","dobj",["`","defatt"],["function","defatt",["sym","key","value","false","returner"],["=","returner",["makeActivator"]],["enterDNS"],["=","sym",["compress","sym"]],["put","sym","key","value"],["returner"],"sym"]],["set.","dobj",["`","defsym"],["function","defsym",["syms","false","cursyms"],["=","returner",["makeActivator"]],["enterDNS"],[[["atom","syms"],["=","cursyms",["compress","syms"]]],["while","false",[["not",["not",["atom","syms"]]]],["push",["compress",["pop","syms"]],"cursyms"]],["=","cursyms",["reverse","cursyms"]]],["returner"],"cursyms"]],["set.","dobj",["`","require"],["function","drequire",["path","reload","false","returner","result"],["=","returner",["makeActivator"]],["enterDNS"],["=","result",["require","path","options","dobj"]],["returner"],"result"]],["set.","dobj",["`","info"],["function","info","false",{dictionary:{$name:[".","dobj","name"],$grammar:[".","dobj","grammar"],$operators:[".","dobj","operators"],$parser:[".","dobj","parser"],$unparser:[".","dobj","unparser"],$namespace:[".","dobj","ns"]}}]],["set.","dobj",["`","destroy"],["function","destroy","false",[[["not",[".","dobj","module"]],["return","false"]]],[".",[".",[".","module","exports"],"Registry"],"unregister",["dobj"]],[".",[".","dobj","module"],"destroy","false"],["set.","dobj",["`","module"],"false"],"true"]],["set.","dobj",["`","derive"],["function","derive",["diname","operators","false","newdialect"],[[["not","operators"],["=","operators",[".","dobj","operators"]]]],[[[".",[".",[".","module","exports"],"Registry"],"findName",["diname"]],"false"]],["=","newdialect",["initialize","diname","operators"]],["set.","newdialect",["`","parent"],"dobj"],"newdialect"]],"dobj"],["function","initialize",["langname","operators","false","newdialect","dialsym"],[".",[".","Naan","module"],"build",[[".","$Lang_","concat",["langname"]],"$RuntimeLib",["function","lambda",["modobj","compobj","false","locops"],[".",[".","Naan","module"],"letimport",["operators"]],["=","dialsym",["compress","$Dialect"]],["=","locops",{dictionary:{}}],["for",["let","lambda",["iter"],["=","iter",["iterate","operators",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["set[","locops","key",["compress","key"]]]]],["set[","locops","dialsym","dialsym"],["=","newdialect",["dialect","langname","locops",["makeActivator"]]],["set.","newdialect",["`","module"],"modobj"],["call",["closure","lambda",["dialect"],["putproc","dialsym",["function","lambda","false","dialect"]]],"newdialect"],["assign","dialsym","newdialect"]]]],[".",[".",[".","module","exports"],"Registry"],"register",["langname","newdialect"]],"newdialect"],["initialize","langname",["RuntimeOperators"]]]),e._SetBindingList("Registry",["closure","Registry",["false","registry"],["=","registry",["new","object","this"]],["set.","registry",["`","languages"],{array:[]}],["set.","registry",["`","register"],["function","register",["name","dobj","false","lang"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["==",[".","lang","name"],"name"],["set.","lang",["`","dialect"],"dobj"],["return"]]]]]],[".",[".","registry","languages"],"push",[{dictionary:{$name:"name",$dialect:"dobj"}}]]]],["set.","registry",["`","unregister"],["function","unregister",["dobj"],["set.","registry",["`","languages"],[".",[".","registry","languages"],"filter",[["function","lambda",["item"],["!==",[".","item","dialect"],"dobj"]]]]],"true"]],["set.","registry",["`","findName"],["function","findName",["name","false","lang"],["=","name",["tostring","name"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["==",[".","lang","name"],"name"],["return",[".","lang","dialect"]]]]]]],"false"]],["set.","registry",["`","findNamespace"],["function","findNamespace",["ns","false","lang"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","registry","languages"],["`","lang"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","lang",[".","iter","$value"]],[[["===",[".",[".","lang","dialect"],"ns"],"ns"],["return",[".","lang","dialect"]]]]]]],"false"]],["set.","registry",["`","dialects"],["function","dialects","false",[".",[".",[".","registry","languages"],"map",[["function","lambda",["item"],[".","item","name"]]]],"totuple"]]],"registry"]),e._SetBindingList("ParsEnvironment",["closure","ParsEnvironment",["dialect","envName","false","penv","gohome","localnaan"],[[["not","envName"],["=","envName","$Parsenv"]]],["=","penv",["new","object","this"]],["=","gohome",["makeActivator"]],[[["||",["not",[".","dialect","parser"]],["not",[".","dialect","unparser"]]],["return","false"]]],["set.","penv",["`","ns"],["new","namespace","envName"]],[[["not",[".","penv","ns"]],["return","false"]]],["nsactive",["cons",[".","penv","ns"],[".",["nsactive"],-2]]],["set.","penv",["`","gons"],["makeActivator"]],["set.","penv",["`","saves"],{dictionary:{$exception:[".",["`","exception"],"proc"],$require:[".",["`","require"],"proc"],$sudo:[".",["`","sudo"],"proc"],$naan:"Naan"}}],["set.","penv",["`","locals"],["letlocal","Naan","require","sudo"]],["=","localnaan",[".",[".","penv","locals"],0]],["assign","localnaan",["new",[".",[".","penv","saves"],"naan"]]],["putproc",[".",[".","penv","locals"],1],["function","lambda","false",["return",{dictionary:{}}]]],["putproc",[".",[".","penv","locals"],2],"false"],["gohome"],["function","evalgo","false",[".","penv","gons","false"]],["function","evalhome","false",["gohome"]],["set.","penv",["`","eval"],["closure","evalf",["expr","false","result"],["evalgo"],["catch",[["=","result",["eval","expr"]]],[[["identity","true"],["=","result","exception"]]],[["evalhome"]]],"result"]],["set.","penv",["`","evalq"],["macro","evalq",["expr"],["evalf","expr"]]],["set.","penv",["`","parse"],["function","parse",["text","options","false","output","source","xchan","errors","error","expr","saves","errtext","row","lastrow","outext"],["=","output",{dictionary:{$errors:{array:[]},$annotations:{array:[]},$text:{array:[]},$exprs:{array:[]},$results:{array:[]}}}],["=","source",["new","textstream","text",["`","string"]]],["=","xchan",["textstreams",["list","source","source"]]],["catch",[[".","penv","gons","false"],["loop","false",["catch",[[".",[".","penv","saves"],"sudo",[["putproc",["`","exception"],"false"]]],["=",["errors","expr"],[".","dialect","parse",["source"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","errors",["`","error"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","error",[".","iter","$value"]],["=","errtext",["langParseErrorString","error"]],["=","row",[".",[".","error","at"],0]],[[["!=","row","lastrow"],[".",[".","output","$annotations"],"push",[{dictionary:{$row:"row",$column:[".",[".","error","at"],1],$text:"errtext",$type:"$error"}}]],["=","lastrow","row"]]],[".",[".","output","errors"],"push",["errtext"]]]]],[[["identity","expr"],[".",[".","output","exprs"],"push",["expr"]],["=","expr",["call",["function","lambda","false",["evalactive","expr"]]]],[".",[".","output","results"],"push",["expr"]],[[".","options","pretty"],["set.","output",["`","pretty"],{array:[]}],[["==",[".",[".","source","tokenlast","false"],"atom"],["`",";>"]],[".",[".","output","pretty"],"push",[["tostring","expr",{dictionary:{$quote:"true"}}]]]],[["!=",[".",[".","source","tokenlast","false"],"atom"],["`",";;"]],[".",[".","output","pretty"],"push",[[".","dialect","print",["expr"]]]]]]]]],"false",[[".",[".","penv","saves"],"sudo",[["putproc",["`","exception"],[".","saves","exception"]]]]]]]],[[["identity","true"],[["and",["==",["tostring",["car","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]]],[["and",["==",["tostring",["car","exception"]],"$internal"],["string",["second","exception"]]],[".",[".","output","errors"],"push",[["second","exception"]]]],[["ErrorObject","exception"],[".",[".","output","errors"],"push",[[".","$exception: ","concat",[["ErrorString","exception"]]]]]],[".",[".","output","errors"],"push",[[".","$exception: ","concat",["exception"]]]]]],[["gohome"],["textstreams","xchan"],["=","outext",[".",[".","source","taketext","false"],"trim","false"]],[[">",[".","outext","length"],0],["set.","output",["`","text"],["new",[".","outext","split",["$\n"]]]]]]],"output"]],["set.","penv",["`","unparse"],["function","unparse",["false","options","text","sym","didprop","key"],["=","options",{dictionary:{$wrapMaxCol:240}}],["=","text","$"],["for",["let","lambda",["iter"],["=","iter",["iterate",["symlist",[".","penv","ns"]],["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],[[["not",["eq","sym",["car","sym"]]],["=","text",[".","text","concat",["sym","$ = ",["car","sym"],"$;;\n\n"]]]]],["=","didprop","false"],["for",["let","lambda",["iter"],["=","iter",["iterate",["@*","sym"],["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],[[["!=",[".","key","charAt",[0]],"$."],["=","didprop","true"],["=","text",[".","text","concat",["sym","$@","key","$ = ",["deref",["@","sym"],"key"],"$;;\n"]]]]]]]],[[["identity","didprop"],["=","text",[".","text","concat",["$\n"]]]]],[[["eq",[".",[".",[".","sym","proc"],1],"namespace"],[".","penv","ns"]],["=","text",[".","text","concat",[[".","dialect","print",[[".","sym","proc"],"options"]],"$;\n\n"]]]]]]]],"text"]],["set.","penv",["`","destroy"],["function","destroy","false",["set.","penv",["`","ns"],["delete",[".","penv","ns"]]]]],"penv"]),e._AddPropertyList("LanguagesInit",[["$.lingoInit","true"]]),e._SetBindingList("LanguagesInit",["function","LanguagesInit",["false","manifest"],["=","manifest",["`",["defproc","defprop","DefineLanguage","Registry","ParsEnvironment","LanguagesInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$Languages",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DefineLanguage"],"DefineLanguage"],["set.",[".","modobj","exports"],["`","ParsEnvironment"],"ParsEnvironment"],["set.",[".","modobj","exports"],["`","Registry"],["Registry"]]]]]]),e._Execute(["LanguagesInit"]),e._SetBindingList("langParser",["function&","langParser",["source","lang","operators","false","result"],["catch",[["=","langErrors",{array:[]}],["=","result",["langParse1",["tokenread"],0]],[[["==",[".","langErrors","length"],0],["=","result",["langStrip","result","operators"]]]],[[["&&",["==",[".","langErrors","length"],0],"tokenlast",["!=",[".","tokenlast","atom"],"cr"],["not",["atTerminator"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$operator missing"}}]]],[["!=",[".","langErrors","length"],0],[".","source","comments","false"],["while","false",[["not",["not",["atTerminator"]]]],["tokenread"]]]],[[["!=",[".","langErrors","length"],0]]],"false"],[["!=",[".","langErrors","length"],0],["list","langErrors"]],["list","false","result"]]),e._SetBindingList("recurParse",["function","recurParse",["text","sloc"],["call",["function&","recurParse1",["source","false","result"],["catch",[["=","result",["langParse1",["tokenread"],0]],[["&&",["==",[".","langErrors","length"],0],"tokenlast",["!=",[".","tokenlast","atom"],"cr"],["not",["atTerminator"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$operator missing"}}]]],[[["identity","true"],"false"]],"false"],"result"],["new","textstream","text","sloc"]]]),e._SetBindingList("langParseErrorString",["function","langParseErrorString",["error","false","output"],[[[".","error","memo"],["=","output",[".","error","memo"]]],["=","output","$parse error"]],[[[".","error","at"],["=","output",[".","output","concat",["$ at (",["+",[".",[".","error","at"],0],1],"$, ",["+",[".",[".","error","at"],1],1],"$)"]]]]],[[[".","error","found"],["=","output",[".","output","concat",["$ found ",[".","error","found"]]]]]],[[[".","error","expected"],["=","output",[".","output","concat",["$ expected ",[".","error","expected"]]]]]],[[["||",[".","error","start"],[".","error","startat"]],["=","output",[".","output","concat",["$ starting"]]],[[["&&",[".","error","start"],["!=",[".","error","start"],"$\n"]],["=","output",[".","output","concat",["$ with ",[".","error","start"]]]]]],[[".","error","startat"],["=","output",[".","output","concat",["$ at (",["+",[".",[".","error","startat"],0],1],"$, ",["+",[".",[".","error","startat"],1],1],"$)"]]]]]],[".","output","replace",[["RegExp","$\n","$g"],"$␍"]]]),e._SetBindingList("tokenread",["function","tokenread","false",["=","tokenlast",[".","source","tokenread","false"]]]),e._SetBindingList("tokenpush",["function","tokenpush",["token"],["=","tokenlast",[".","source","tokenpush",["token"]]]]),e._SetBindingList("tokenmatch",["function","tokenmatch",["pattern","false","result"],["=","result",[".","source","tokenmatch",["pattern"]]],["=","tokenlast",[".","source","tokenlast","false"]],"result"]),e._SetBindingList("tokenpass",["function","tokenpass",["pattern"],["=","tokenlast",[".","source","tokenpass",["pattern"]]]]),e._SetBindingList("passNewline",["function","passNewline",["testeof"],["=","tokenlast",[".","source","tokenpass",["cr","testeof"]]]]),e._SetBindingList("atTerminator",["function","atTerminator","false",["tokenmatch",["`",[";",";;",";>"]]]]),e._SetBindingList("atDelimiter",["function","atDelimiter","false",["tokenmatch",["`",[";",";;",";>",")",",","}","]"]]]]),e._SetBindingList("langPassSeparator",["function","langPassSeparator","false",["=","tokenlast",[".","source","tokenpass",[["list","cr","comma"]]]]]),e._SetBindingList("langAtSeparator",["function","langAtSeparator","false",["or",["==",[".","tokenlast","atom"],"cr"],["==",[".","tokenlast","atom"],"comma"]]]),e._SetBindingList("langExprLoc",["function","langExprLoc",["expr"],[["dictionary","expr"],[".","expr","loc"]],[["atom","expr"],"false"],[["langExprLoc",["car","expr"]]],["langExprLoc",["cdr","expr"]]]),e._SetBindingList("langConsSym",["function","langConsSym",["sym","expr","exlist"],[[["tuple","sym"],["debuglog","$langConsSym warning - non-atomic token","sym"]]],["cons",{dictionary:{$atom:"sym",$loc:["langExprLoc","expr"]}},"exlist"]]),e._SetBindingList("langEnlistSym",["function","langEnlistSym","exlist",[[["tuple",["car","exlist"]],["debuglog","$langEnlistSym warning - non-atomic token",["car","exlist"]]]],["cons",{dictionary:{$atom:["car","exlist"],$loc:["langExprLoc",["second","exlist"]]}},["cddr","exlist"]]]),e._SetBindingList("langSyntax",["function","langSyntax",["expr","startoken","dict"],["=","dict",["new","dict"]],[[["identity","expr"],["set.","dict",["`","at"],["langExprLoc","expr"]],[["dictionary","expr"],["set.","dict",["`","found"],[".","expr","atom"]]]]],[[["identity","startoken"],["set.","dict",["`","start"],[".","startoken","atom"]],["set.","dict",["`","startat"],[".","startoken","loc"]]]],[".","langErrors","push",["dict"]],"false"]),e._SetBindingList("langDebuglog",["function","langDebuglog","args",["function","convlist",["expr"],[["defined","expr","atom"],[".","expr","atom"]],[["atom","expr"],"expr"],["cons",["convlist",["car","expr"]],["convlist",["cdr","expr"]]]],["call",["function","lambda",["args","false","arg","exlist"],["loop","false",[["empty","args"]],["=","arg",["pop","args"]],[[["eq","arg","`"],["push",["pop","args"],"exlist"]],["push",["convlist","arg"],"exlist"]]],["apply",[".",[".","Naan","debug"],"debuglog"],["reverse","exlist"]]],"args"]]),e._SetBindingList("langCleanup",["function","langCleanup",["tree","false","blocknest","inloop"],["function","debugCleanup","args",[["identity","false"],["apply","langDebuglog","args"]]],["function","inbody",["xbody"],[["atom","xbody"],"xbody"],["debugCleanup","$inbody:","xbody"],[[["and","inloop",["<=","blocknest",1]]],[["and",["not",["atom",["car","xbody"]]],["not",["atom",["caar","xbody"]]],["not",["atom",["caaar","xbody"]]]],["debugCleanup","$testing hoist in body:","xbody"],["=","xbody",["hoist","xbody"]]]],["cons",["inbodyitem",["car","xbody"]],["inbody",["cdr","xbody"]]]],["function","inbodyitem",["expr","false","sym"],["debugCleanup","$inbodyitem:","expr"],[["atom","expr"],"expr"],["=","sym",["car","expr"]],[["atom","sym"],["incall","expr"]],[["atom",["car","sym"]],["inwhen","expr"]],["inblock","expr","blocknest"]],["function","ineval",["expr"],[["atom","expr"],"expr"],[["atom",["car","expr"]],["incall","expr"]],["cons",["ineval",["car","expr"]],["inevalist",["cdr","expr"]]]],["function","inevalist",["expr"],[["atom","expr"],"expr"],["cons",["ineval",["car","expr"]],["inevalist",["cdr","expr"]]]],["function","inquote",["expr"],[["atom","expr"],"expr"],["cons",["inquote",["car","expr"]],["inquote",["cdr","expr"]]]],["function&","inloop",["pbody","blocknest","inloop"],["debugCleanup","$inloop:","pbody","blocknest","inloop"],["=","blocknest",0],["=","inloop","true"],["cons",["car","pbody"],["second","pbody"],["inbody",["cddr","pbody"]]]],["function&","inproc",["fbind","blocknest"],["debugCleanup","$inproc:","fbind","blocknest"],["=","blocknest",0],["cons",["car","fbind"],["cons",["second","fbind"],["cons",["inquote",["third","fbind"]],["inbody",["cdddr","fbind"]]]]]],["function","inconditem",["expr"],["debugCleanup","$inconditem:","expr"],[["atom","expr"],"expr"],["cons",["inwhen",["car","expr"]],["inconditem",["cdr","expr"]]]],["function&","incond",["expr","blocknest"],["debugCleanup","$incond:","expr"],["cons",["car","expr"],["inconditem",["cdr","expr"]]]],["function","incatch",["expr"],["debugCleanup","$incatch:","expr"],["list",["car","expr"],["inbody",["second","expr"]],["inconditem",["third","expr"]],["inbody",[".","expr",3]]]],["function","incall",["expr","false","sym"],["debugCleanup","$incall:","expr"],["=","sym",[".",["car","expr"],"atom"]],[["==","sym",["`","loop"]],["inloop","expr"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","expr"]],[["==","sym",["`","cond"]],["incond","expr",["+","blocknest",2]]],[["==","sym",["`","body"]],["inbody","expr"]],[["==","sym",["`","catch"]],["incatch","expr"]],[["==","sym","`"],["debugCleanup","$inquote:","expr"],["inquote","expr"]],["cons",["car","expr"],["inevalist",["cdr","expr"]]]],["function","inwhen",["expr","false","nexpr"],["debugCleanup","$inwhen:","expr"],["=","nexpr",["cdr","expr"]],[["&&",["not",["cdr","nexpr"]],["not",["or",["atom","nexpr"],["atom",["car","nexpr"]],["atom",["caar","nexpr"]],["atom",["caaar","nexpr"]]]]],["debugCleanup","$inwhen block","blocknest"],["=","nexpr",["hoist","nexpr"]],["cons",["incall",["car","expr"]],["inblock","nexpr","blocknest"]]],["cons",["incall",["car","expr"]],["hoist",["delbreak",["cdr","expr"],"blocknest"]]]],["function&","delbreak",["expr","blocknest"],["debugCleanup","$delbreak:","expr","blocknest"],[["atom","expr"],"expr"],[[["&&",["tuple",["car","expr"]],["tuple",["caar","expr"]],["tuple",["caaar","expr"]]],["preadjust","blocknest","+",1],["debugCleanup","$delbreak block:","blocknest"]]],["=","expr",["hoist","expr"]],[["and",["==",[".",["caar","expr"],"atom"],["`","break"]],["not",["cdr",["car","expr"]]],["<=","blocknest",1]],["debugCleanup","$did delbreak from:","expr"],["=","delbreak","true"],"false"],["cons",["inbodyitem",["car","expr"]],["delbreak",["cdr","expr"],"blocknest"]]],["function&","inblock",["expr","blocknest","false","nexpr","delbreak"],["debugCleanup","$inblock:","expr","blocknest"],[[["cdr","expr"],["=","blocknest",["+","blocknest",2]]],["=","blocknest",["+","blocknest",1]]],["=","nexpr",["inbodyitem",["car","expr"]]],[["identity","delbreak"],["debugCleanup","$did delbreak below:","nexpr"],"nexpr"],["cons","nexpr",["inbody",["cdr","expr"]]]],["function","hoist",["expr"],[["or",["cdr","expr"],["atom","expr"],["atom",["car","expr"]],["atom",["caar","expr"]],["atom",["caaar","expr"]]],"expr"],["debugCleanup","$hoisted:",["car","expr"]],["hoist",["car","expr"]]],["debugCleanup","$\n### in tree:","tree"],["=","blocknest",0],["ineval","tree"]]),e._SetBindingList("langErrorCheck",["function","langErrorCheck",["tree","false","xproc","proc_parent","xloop","loop_parent","xbody","blocknest"],["global","langDebuglog"],["function","debugErrorCheck","args",[["identity","false"],["apply","langDebuglog","args"]]],["function&","inbody",["lbody","xbody","false","item","more"],[["atom","lbody"],"lbody"],["debugErrorCheck","$inbody:","lbody"],["=","xbody",{dictionary:{$live:"true"}}],["=","item",["car","lbody"]],["=","more",["cdr","lbody"]],[[["atom","item"],[["&&","more",["not",["member",[".",["caar","more"],"atom"],["`",["break","return"]]]]],["langSyntax","item","false",{dictionary:{$memo:"$ignored atom in body"}}]],[["&&",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]]],["inbodyitem","item"],["inbody","more","xbody"]],["function","inbodyitem",["expr","false","sym"],["debugErrorCheck","$inbodyitem:","expr"],[["not",[".","xbody","live"]],[[["not",[".","xbody","dead"]],["langSyntax","expr","false",{dictionary:{$memo:"$dead code"}}]]],["set.","xbody",["`","dead"],"true"],"false"],[["atom","expr"],"expr"],["=","sym",["car","expr"]],[["atom","sym"],["incall","expr"]],[["atom",["car","sym"]],["inwhen","expr"]],["inblock","expr","blocknest"]],["function","ineval",["expr"],["debugErrorCheck","$ineval:","expr"],[["atom","expr"],"expr"],[["atom",["car","expr"]],["incall","expr"]],["inevalist","expr"]],["function","inevalist",["expr"],["debugErrorCheck","$inevalist:","expr"],[["atom","expr"],"expr"],["ineval",["car","expr"]],["inevalist",["cdr","expr"]]],["function","inquote",["expr","inside","false","item"],["debugErrorCheck","$inquote:","expr","inside"],[["atom","expr"],"expr"],["=","item",["car","expr"]],[[["&&","inside",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]],["inquote","item","true"],["inquote",["cdr","expr"],"inside"]],["function","inargs",["expr","proc","narg","false","item","quoted"],["debugErrorCheck","$inargs:","expr"],[["atom","expr"],"expr"],["=","item",["car","expr"]],["=","quoted",["quotedArg","proc","narg"]],[[["tuple","item"],[["identity","quoted"],["=","item",["inquote","item","true"]]],["=","item",["incall","item"]]],[["&&",["symbol",[".","item","atom"]],["not",["findLocalSymbol",[".","item","atom"]]],[".","xproc","globals"],["not",[".","xproc","dynbind"]],["not","quoted"],["==",[".",[".","item","atom"],"namespace"],[".",["nsactive"],0]]],["set[",[".","xproc","undeclared"],[".","item","atom"],"item"]]],["inargs",["cdr","expr"],"proc",["+","narg",1]]],["function","inparms",["expr","false","parm","sym"],["debugErrorCheck","$inparms:","expr"],[["atom","expr"],["=","sym",[".","expr","atom"]],[["identity","sym"],[["not",["symbol","sym"]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid parameter"}}]],["set[",[".","xproc","parameters"],"sym","expr"],[[".","xproc","dynbind"],["findLocalSymbol","sym",[".","xproc","parent"]]]]],["=","parm",["car","expr"]],["=","sym",[".","parm","atom"]],[[["||",["not",["symbol","sym"]],["&&",["not","sym"],["!==","sym","false"]]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid parameter"}}]],[["===","sym","false"],[[".","xproc","locals"],["langSyntax","parm","false",{dictionary:{$memo:"$duplicate `local"}}]],[["atom",["cdr","expr"]],["langSyntax","parm","false",{dictionary:{$memo:"$invalid `local"}}]],["set.","xproc",["`","locals"],{dictionary:{}}],["set.","xproc",["`","unused"],{dictionary:{}}]],[["deref",[".","xproc","parameters"],"sym"],["langSyntax","parm","false",{dictionary:{$memo:"$duplicate parameter"}}]],["set[",[".","xproc","parameters"],"sym","parm"],[[[".","xproc","locals"],["set[",[".","xproc","unused"],"sym","parm"],["set[",[".","xproc","locals"],"sym","parm"]]],[[".","xproc","dynbind"],["findLocalSymbol","sym",[".","xproc","parent"]]]],["inparms",["cdr","expr"]]],["function&","inloop",["pbody","loop_parent","false","blocknest","xloop"],["debugErrorCheck","$inloop:","pbody"],["=","xloop",{dictionary:{$tag:[".",["second","pbody"],"atom"]}}],[[["identity","loop_parent"],["set.","xloop",["`","parent"],"loop_parent"]]],["=","loop_parent","xloop"],["=","blocknest",0],["inbody",["cddr","pbody"]]],["function&","inproc",["fbind","proc_parent","false","blocknest","xproc","sym","item"],["debugErrorCheck","$inproc:","fbind"],["=","xproc",{dictionary:{$ftype:["car","fbind"],$fname:["second","fbind"],$parms:["third","fbind"],$body:["cdddr","fbind"],$procNames:{dictionary:{}},$parameters:{dictionary:{}},$undeclared:{dictionary:{}},$dynbind:["member",[".",["car","fbind"],"atom"],["`",["function&","let&"]]]}}],[[["identity","proc_parent"],["set.","xproc",["`","parent"],"proc_parent"],[[[".","proc_parent","globals"],["set.","xproc",["`","globals"],{dictionary:{}}]]],[[[".","proc_parent","root"],["set.","xproc",["`","root"],[".","proc_parent","root"]]],["set.","xproc",["`","root"],"proc_parent"]],[["&&",["!=",[".",[".","xproc","fname"],"atom"],["`","lambda"]],["deref",[".","proc_parent","procNames"],[".",[".","xproc","fname"],"atom"]]],["langSyntax",[".","xproc","fname"],"false",{dictionary:{$memo:"$duplicate procedure name"}}]],["set[",[".","proc_parent","procNames"],[".",[".","xproc","fname"],"atom"],[".","xproc","fname"]]]],["=","proc_parent","xproc"],["=","blocknest",0],["inparms",[".","xproc","parms"]],["inbody",[".","xproc","body"]],[[["not",[".","xproc","dynbind"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","xproc","unused"],["`",["sym","item"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["sym","item"],[".","iter","$value"]],["langSyntax","item","false",{dictionary:{$memo:"$unused local variable"}}]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","xproc","undeclared"],["`",["sym","item"]]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=",["sym","item"],[".","iter","$value"]],[[["not",["deref",[".","xproc","procNames"],"sym"]],[["&&",[".","xproc","parent"],[".","xproc","globals"]],["set[",[".",[".","xproc","parent"],"undeclared"],"sym","item"]],["langSyntax","item","false",{dictionary:{$memo:"$undeclared global"}}]]]]]]],["function","inconditem",["expr"],["debugErrorCheck","$inconditem:","expr"],[["atom","expr"],"expr"],["inwhen",["car","expr"]],["inconditem",["cdr","expr"]]],["function&","incond",["expr","blocknest"],["debugErrorCheck","$incond:","expr"],["inconditem","expr"]],["function","incatch",["expr"],["debugErrorCheck","$incatch:","expr"],["list",["car","expr"],["inbody",["second","expr"]],["incond",["third","expr"]],["inbody",[".","expr",3]]]],["function","incall",["expr","false","sym","loopt","item"],["debugErrorCheck","$incall:","expr"],["=","sym",[".",["car","expr"],"atom"]],[["==",[".","sym","proc"],[".",["`","loop"],"proc"]],["inloop","expr","loop_parent"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","expr","proc_parent"]],[["==","sym",["`","cond"]],["incond","expr",["+","blocknest",2]]],[["==","sym",["`","body"]],["inbody",["cdr","expr"]]],[["==","sym",["`","catch"]],["incatch","expr"]],[["==","sym","`"],["inquote","expr"]],[["==","sym",["`","global"]],[["not","xproc"],["langSyntax","false","false",{dictionary:{$at:["langExprLoc",["car","expr"]],$memo:"$global forbidden outside of a procedure"}}]],[[".","xproc","dynbind"],["langSyntax","false","false",{dictionary:{$at:["langExprLoc",["car","expr"]],$memo:"$global forbidden in function& and let&"}}]],[[["not",[".","xproc","globals"]],["set.","xproc",["`","globals"],{dictionary:{}}]]],["=","loopt",["cdr","expr"]],["while","false",[["not",["not",["empty","loopt"]]]],["=","item",["pop","loopt"]],[[["not",["symbol",[".","item","atom"]]],["langSyntax","item","false",{dictionary:{$memo:"$invalid global symbol"}}]],["set[",[".","xproc","globals"],[".","item","atom"],"item"]]]],[["||",["==","sym",["`","break"]],["==","sym",["`","continue"]]],["set.","xbody",["`","live"],"false"],[["not","xloop"],["langSyntax",["car","expr"],"false",{dictionary:{$memo:["strcat","sym","$ without loop"]}}]],["=","sym",[".",["cadr","expr"],"atom"]],[["identity","sym"],["=","loopt","xloop"],["while","false",[["not","loopt"]],[[["==","sym",[".","loopt","tag"]],["break"]]],["=","loopt",[".","loopt","parent"]]],[["not","loopt"],["langSyntax",["cadr","expr"],"false",{dictionary:{$memo:"$enclosing loop tag not found"}}]]]],[[["||",["==","sym",["`","return"]],["==","sym",["`","throw"]]],["set.","xbody",["`","live"],"false"]],[["&&",["not","sym"],["tuple",["car","expr"]]],["incall",["car","expr"]],["=","expr",["cdr","expr"]]]],["inargs",["cdr","expr"],["car","expr"],0]],["function","inwhen",["expr","false","nexpr"],["debugErrorCheck","$inwhen:","expr"],["=","nexpr",["cdr","expr"]],[["&&",["not",["cdr","nexpr"]],["not",["or",["atom","nexpr"],["atom",["car","nexpr"]],["atom",["caar","nexpr"]],["atom",["caaar","nexpr"]]]]],["debugErrorCheck","$in whenblock","blocknest"],["incall",["car","expr"]],["inblock","nexpr","blocknest"]],["incall",["car","expr"]],["inbody",["cdr","expr"]]],["function&","inblock",["expr","blocknest"],["debugErrorCheck","$inblock:","expr","blocknest"],[[["cdr","expr"],["=","blocknest",["+","blocknest",2]]],["=","blocknest",["+","blocknest",1]]],["inbodyitem",["car","expr"]],["inbody",["cdr","expr"]]],["function","findLocalSymbol",["sym","start","false","proct"],[[["==","sym",["`","Dialect"]],["return","true"]]],[[["identity","start"],["=","proct","start"]],["=","proct","xproc"]],["while","false",[["not","proct"]],[[["deref",[".","proct","procNames"],"sym"],["break"]]],[[["deref",[".","proct","parameters"],"sym"],[[[".","proct","unused"],["set[",[".","proct","unused"],"sym","undefined"]]],["break"]]],[[["deref",[".","proct","globals"],"sym"],["break"]]],["=","proct",[".","proct","parent"]]],["not",["not","proct"]]],["function","quotedArg",["proc","narg"],[[["&&",["===",[".",[".","proc","atom"],"proc"],[".",["`","."],"proc"]],["==","narg",1]],["return","true"]]],[[["&&",["===",[".",[".","proc","atom"],"proc"],[".",["`","="],"proc"]],["==","narg",0]],["return","true"]]],"false"],["debugErrorCheck","$\n### langErrorCheck tree:","tree"],["=","blocknest",0],["ineval","tree"],"tree"]),e._SetBindingList("langCorrelateComments",["function","langCorrelateComments",["locmap","false","comments","locations","locdex","loc"],["function","tupleCompare",["a","b"],[["<",[".","a",0],[".","b",0]],-1],[[">",[".","a",0],[".","b",0]],1],[["<",[".","a",1],[".","b",1]],-1],[[">",[".","a",1],[".","b",1]],1],0],["=","comments",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",["reverse",[".","source","comments","false"]],["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],[".","comments","push",[["append",[".","acom","loc"],[".","acom","text"]]]]]]],[".","comments","sort",["tupleSort"]],["=","locations",{array:[]}],["=","locdex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","locmap",["`","loc"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","loc",[".","iter","$value"]],[[["identity","loc"],[".","locations","push",[["list",[".","loc",0],[".","loc",1],"locdex"]]]]],["preadjust","locdex","+",1]]]],[".","locations","sort",["tupleSort"]],["call",["let","lambda",["false","acom","curloc","output","nextdex","nextloc"],["=","locdex",0],["=","curloc",["deref","locations",["postadjust","locdex","+",1]]],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","comments",["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["while","false",[["not",[">",[".","acom",0],[".","curloc",0]]]],["=","curloc",["deref","locations",["postadjust","locdex","+",1]]]],[[["not","curloc"],[".","output","push",[["list","false","false",[".","acom",2]]]]],[["<",[".","acom",0],[".","curloc",0]],[".","output","push",[["list",[".","curloc",2],-1,[".","acom",2]]]]],["=","nextdex","locdex"],["=","nextloc","curloc"],["while","false",[["not",["&&",["==",[".","acom",0],[".","nextloc",0]],[">",[".","acom",1],[".","nextloc",1]]]]],["=","nextloc",["deref","locations",["postadjust","nextdex","+",1]]]],[["==",[".","acom",0],[".","nextloc",0]],[".","output","push",[["list",[".","nextloc",2],0,[".","acom",2]]]],["=","locdex","nextdex"],["=","curloc","nextloc"]],[".","output","push",[["list",[".","curloc",2],1,[".","acom",2]]]]]]]],"output"]]]),e._SetBindingList("langStrip",["function","langStrip",["tree","operators","valproc"],["=","tree",["langCleanup","tree"]],["langErrorCheck","tree"],["langStripLoc","tree","operators","valproc"]]),e._SetBindingList("langStripLoc",["function","langStripLoc",["tree","operators","valproc","false","procnest","fname","locmap","nodecount","curns","nscurrent","nscore","sourcemap"],["=","curns",["nsactive"]],["=","nscurrent",[".","curns",0]],["=","nscore",[".",["nsactive","true"],1]],["function","topmap",["expr"],["function","remap",["expr"],[["dictionary","expr"],["preadjust","nodecount","+",1],[".","locmap","push",[[".","expr","loc"]]]],[["atom","expr"],["preadjust","nodecount","+",1],["debuglog","$langStripLoc: found atom:","expr"],[".","locmap","push",["false"]]],["remap",["car","expr"]],[["cdr","expr"],["remap",["cdr","expr"]]]],[["atom","expr"],"false"],[["==",[".",["car","expr"],"atom"],"`"],"true"],[["member",[".",["car","expr"],"atom"],["`",["function","function&","macro","closure","let","let&"]]],["remap","expr"],"true"],[["topmap",["car","expr"]],"true"],["topmap",["cdr","expr"]]],["function","moveatom",["item","false","sym"],[["not",["symbol",[".","item","atom"]]],[".","item","atom"]],[["&&",["interned",[".","item","atom"]],["dictionary","operators"],["deref","operators",[".","item","atom"]]]],[["&&",[".",[".","item","atom"],"proc"],["!=",[".",[".","item","atom"],"namespace"],"nscurrent"],["!=",[".",[".","item","atom"],"namespace"],"nscore"]],["=","sym",["interned",[".",[".","item","atom"],"tostring"]]],[["&&",["eq",[".","sym","namespace"],"nscurrent"],[".","sym","proc"]],"sym"],[".","item","atom"]],[".","item","atom"]],["function","inbody",["xbody","false","sym"],[["atom","xbody"],["moveatom","xbody"]],["=","sym",[".",["car","xbody"],"atom"]],[["==","sym","`"],["inquote","xbody"]],[["member","sym",["`",["function","function&","macro","closure","let","let&"]]],["inproc","xbody","procnest"]],["split","xbody"]],["function","inquote",["expr"],[["atom","expr"],["moveatom","expr"]],["cons",["inquote",["car","expr"]],["inquote",["cdr","expr"]]]],["function","split",["expr"],[["atom","expr"],["moveatom","expr"]],["cons",["inbody",["car","expr"]],["split",["cdr","expr"]]]],["function&","inproc",["pbody","procnest","false","wasnest","fbind"],[[["=","wasnest","procnest"]],["=","procnest","true"]],["=","fbind",["cons",["split",["car","pbody"]],["split",["second","pbody"]],["split",["third","pbody"]],["split",["cdddr","pbody"]]]],[["identity","wasnest"],"fbind"],["=","fname",["second","fbind"]],[["and",["&&",["not","valproc"],"fname"],["not",["lambda","fname"]],["not",["eq",["car","fbind"],["`","let"]]]],["cons",["`","defproc"],"fbind"]],["enclose","fbind"]],["function","lmCompress",["locmap","false","entry","lastrow","lastcol","nextrow","nextcol"],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","locmap",["`","entry"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","entry",[".","iter","$value"]],["=","nextrow",[".","entry",0]],["=","nextcol",[".","entry",1]],[[["not","entry"],[".","output","push",["false"]]],[["not","lastrow"],[".","output","push",["entry"]]],[["==","lastrow","nextrow"],[".","output","push",[["-","nextcol","lastcol"]]]],[".","output","push",[["list",["-","nextrow","lastrow"],"nextcol"]]]],["=","lastrow","nextrow"],["=","lastcol","nextcol"]]]],"output"],["=","locmap",{array:[]}],["=","nodecount",0],["topmap","tree"],["=","tree",["inbody","tree"]],[[["and","fname",[">",["length","locmap"],1]],["=","comments",["langCorrelateComments","locmap"]],["=","sourcemap",{dictionary:{$count:"nodecount",$comments:"comments"}}],[[["identity","false"],["set.","sourcemap",["`","map"],["lmCompress","locmap"]]]],["put","fname",["`","\\.sourcemap"],"sourcemap"]]],"tree"]),e._SetBindingList("langParse1",["function&","langParse1",["ltoken","riplop","false","rtoken"],["function&","naryCoalesce",["optoken","lexpr","rexpr","false","opsym"],["=","opsym",[".","optoken","atom"]],[["and",["defined","optoken","atom"],["symbol","opsym"],["deref",[".","lang","naryop"],"opsym"]],[["and",["tuple","lexpr"],["==","opsym",[".",["car","lexpr"],"atom"]]],[["and",["tuple","rexpr"],["==","opsym",[".",["car","rexpr"],"atom"]]],["cons","optoken",["append",["cdr","lexpr"],["cdr","rexpr"]]]],["cons","optoken",["append",["cdr","lexpr"],["list","rexpr"]]]],[["and",["tuple","rexpr"],["==","opsym",[".",["car","rexpr"],"atom"]]],["cons","optoken",["append",["list","lexpr"],["cdr","rexpr"]]]],["list","optoken","lexpr","rexpr"]],["list","optoken","lexpr","rexpr"]],["function&","leprop",["false","nlToken"],[["==",[".","tokenlast","atom"],"cr"],["=","nlToken","tokenlast"],[[["not",["passNewline","true"]],["return","false"]]],[["and",["not",["string",[".","tokenlast","atom"]]],["deref",[".","lang","left"],[".","tokenlast","atom"]]],[["deref",[".","lang","prefix"],[".","tokenlast","atom"]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$ambiguous newline (use \\ or ,)"}}]],["deref",[".","lang","left"],[".","tokenlast","atom"]]],["tokenpush","nlToken"],"false"],["deref",[".","lang","left"],[".","tokenlast","atom"]]],["=","ltoken",["passNewline"]],[["atDelimiter"],["langSyntax","ltoken","false",{dictionary:{$memo:"$incomplete expression"}}]],["=","rtoken",["tokenread"]],[[["string",[".","ltoken","atom"]]],[["deref",[".","lang","prefix"],[".","ltoken","atom"]],["=","ltoken",["eval",["deref",[".","lang","prefix"],[".","ltoken","atom"]]]]],[["deref",[".","lang","left"],[".","ltoken","atom"]],["langSyntax","ltoken","false",{dictionary:{$memo:"$not a prefix operator"}}]],[["deref",[".","lang","right"],[".","ltoken","atom"]],["=","ltoken",["list","ltoken",["langParse1","rtoken",["deref",[".","lang","right"],[".","ltoken","atom"]]]]]]],["loop","false",["=","rtoken","tokenlast"],[[["string",[".","ltoken","atom"]],[[["tokenmatch","string"],["=","ltoken",{dictionary:{$atom:["strcat",[".","ltoken","atom"],[".","tokenlast","atom"]],$loc:[".","ltoken","loc"]}}],["tokenread"],["continue"]]],[[".","lang","string"],["=","ltoken",["eval",[".","lang","string"]]]]]],[[["and",["&&",["not",["string",[".","rtoken","atom"]]],["<","riplop",["deref",[".","lang","postleft"],[".","rtoken","atom"]]]],["deref",[".","lang","postfix"],[".","rtoken","atom"]]],["=","ltoken",["eval",["deref",[".","lang","postfix"],[".","rtoken","atom"]]]],["=","rtoken",["tokenread"]]]],[["not",["<","riplop",["leprop"]]],"ltoken"],["=","rtoken","tokenlast"],["tokenread"],[[["string",[".","rtoken","atom"]]],[["deref",[".","lang","infix"],[".","rtoken","atom"]],["=","ltoken",["eval",["deref",[".","lang","infix"],[".","rtoken","atom"]]]]],[["deref",[".","lang","right"],[".","rtoken","atom"]],["=","ltoken",["naryCoalesce","rtoken","ltoken",["langParse1","tokenlast",["deref",[".","lang","right"],[".","rtoken","atom"]]]]]],["=","ltoken",["list","rtoken","ltoken"]]]]]),e._SetBindingList("langParseTo",["function&","langParseTo",["delim","sloc","doval","false","inerrors","expr"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","lptFound","false"],["langPassSeparator"],["=","inerrors",[".","langErrors","length"]],["loop","false",[["tokenmatch","delim"],["=","lptFound","tokenlast"],["tokenread"],["reverse","expr"]],[[["atDelimiter"],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"delim",$memo:"$delimiter not found"}}],[["atTerminator"],["break"]]],[[["identity","doval"],["push",["langValueParse"],"expr"]],["push",["langParse1","tokenlast",0],"expr"]],[[["tokenmatch","delim"],["=","lptFound","tokenlast"],["tokenread"],["reverse","expr"],["break"]]],[["&&",["not",["langAtSeparator","delim"]],["==","inerrors",[".","langErrors","length"]]],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"delim",$memo:"$mismatched delimiter"}}],[["atTerminator"],["break"]]]],["tokenread"]]]),e._SetBindingList("langParseToList",["function&","langParseToList",["delim","sloc","false","expr"],["=","expr",["langParseTo","delim","sloc"]],[[["not","expr"],["=","expr",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]]],"expr"]),e._SetBindingList("langReadExpr",["function&","langReadExpr",["false","expr"],["=","expr",["passNewline"]],[["tokenmatch","rpar"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$mismatched parens"}}]],[["tokenmatch","quote"],["=","expr",["tokenread"]],["tokenread"],"expr"],[["tokenmatch","{"],["tokenread"],["langBraceParse","false","expr"]],[["tokenmatch","["],["tokenread"],["langBracketParse","false","false","expr"]],[["not",["tokenmatch","lpar"]],["tokenread"],"expr"],["tokenread"],["=","expr","false"],["loop","false",["passNewline"],[[["tokenmatch","comma"],["tokenread"],[["||",["not","expr"],["tokenmatch",["list","rpar","comma"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$extra comma"}}]]]],[["tokenmatch","rpar"],["tokenread"],["reverse","expr"]],["push",["langReadExpr"],"expr"],[[["tokenmatch","period"],["tokenread"],["=","expr",["reverse",["cdr","expr"],["cons",["car","expr"],["langReadExpr"]]]],[[["tokenmatch","rpar"],["tokenread"],"expr"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$invalid dotted pair"}}],"false"],["break"]]]]]),e._SetBindingList("langTemplateStringParse",["function&","langTemplateStringParse",["strtoken","false","sloc","rxTS","terms","found","result","exlist","item","add"],[[["<",[".",[".","strtoken","atom"],"indexOf",[["`","\\${"]]],0],["return","strtoken"]]],["=","sloc",["langExprLoc","strtoken"]],["=","rxTS",["RegExp","$((?:[^$]|[$](?![{$])|[$]+[{][^}]*$)*)([$]+[{].*?[}])?","$g"]],["=","rxT",["RegExp","$[$]+[{](.*)[}]"]],["=","terms",{array:[]}],["loop","false",["=","found",[".","rxTS","exec",[[".","strtoken","atom"]]]],[["||",["not","found"],["==",[".","found",0],"$"]]],[[[".","found",1],[".","terms","push",[[".","found",1]]]]],[[[".","found",2],[".","terms","push",[[".","found",2]]]]]],["=","exlist",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","terms",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","found",[".","rxT","exec",["item"]]],[[[".","item","startsWith",["$$$"]],[".","exlist","push",[{dictionary:{$atom:[".","item","slice",[1]],$loc:"sloc"}}]]],[[".","found",1],[".","exlist","push",[["recurParse",[".",[".","found",1],"concat",["$;"]],["list",[".","sloc",0],["+",[".","sloc",1],2]]]]]],[[">",[".","item","length"],0],[".","exlist","push",[{dictionary:{$atom:"item",$loc:"sloc"}}]]]],["=","sloc",["list",[".","sloc",0],["+",[".","sloc",1],[".","item","length"]]]]]]],["langConsSym",["`","strcat"],"strtoken",[".","exlist","totuple"]]]),e._SetBindingList("langBraceParse",["function&","langBraceParse",["doeval","sloc","false","obj","expr","value","exlist"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","obj",{dictionary:{}}],["loop","false",["passNewline"],[["tokenmatch",["`","}"]],["tokenread"],["=","expr",["setobj","exlist",["new","dictionary"]]]],[["atDelimiter"],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"$}",$memo:"$delimiter not found"}}]],["=","expr","tokenlast"],[["deref","obj",[".","expr","atom"]],["langSyntax","expr","false",{dictionary:{$memo:"$duplicate key in dictionary",$found:[".","expr","atom"]}}]],["tokenread"],["passNewline"],[[["==",[".","expr","atom"],"`"],["=","expr","tokenlast"],["tokenread"],["passNewline"]]],[["not",["tokenmatch",["`",":"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$missing : in dictionary"}}]],["tokenread"],["passNewline"],["=","value",["langValueParse","doeval"]],["set[","obj",[".","expr","atom"],"value"],[["tokenmatch",["`","}"]],["tokenread"]],[["not",["langAtSeparator"]],["langSyntax","tokenlast","sloc",{dictionary:{$expected:"$, or }",$memo:"$malformed dictionary entry"}}]],["tokenread"]],{dictionary:{$atom:"obj",$loc:["langExprLoc","sloc"]}}]),e._SetBindingList("langBracketParse",["function&","langBracketParse",["doeval","ltoken","sloc","false","exlist"],[[["not","sloc"],["=","sloc","tokenlast"]]],["=","exlist",["langParseTo",["`","]"],"sloc",["not","ltoken"]]],[["identity","ltoken"],[["atom",["cdr","exlist"]],["langEnlistSym","deref","sloc","ltoken",["car","exlist"]]],["langEnlistSym","dereflist","sloc","ltoken","exlist"]],[[["&&","doeval",["==",[".","langErrors","length"],0]],["=","exlist",["cdr",["eval",["cons","false","exlist"]]]]]],{dictionary:{$atom:["new","array","exlist"],$loc:[".","sloc","loc"]}}]),e._SetBindingList("langValueParse",["function","langValueParse",["doeval","false","value"],["=","value",["langParse1","tokenlast",0]],[[["==",[".","langErrors","length"],0],["=","value",["langStrip","value","operators","true"]],[["identity","doeval"],["=","value",["eval","value"]]]]],"value"]),e._SetBindingList("langGenIterate",["function","langGenIterate",["calltok","tagtok","varex","target","xbody","false","sloc","forsym","itersym","bodyloc","iterlist"],["=","sloc",[".","calltok","loc"]],["=","forsym",["unintern",["`","lambda"]]],["=","itersym",["unintern",["`","iter"]]],["=","bodyloc",["langExprLoc","xbody"]],["=","iterlist",["langEnlistSym","itersym","sloc"]],[[["&&",["atom","varex"],["not",["&&",["defined","varex","atom"],["symbol",[".","varex","atom"]],[".","varex","atom"]]]],["return",["langSyntax","varex","false",{dictionary:{$memo:"$invalid iteration variable",$found:[".","varex","atom"]}}]]]],["langConsSym",[".","calltok","atom"],"sloc",["cons",["langEnlistSym",["`","let"],"sloc",{dictionary:{$atom:"forsym",$loc:["langExprLoc","sloc"]}},"iterlist",["langEnlistSym",["`","="],"varex",{dictionary:{$atom:"itersym",$loc:["langExprLoc","varex"]}},["langEnlistSym",["`","iterate"],"varex","target",["langEnlistSym","`","varex","varex"]]],["langConsSym",["`","loop"],"xbody",["cons","tagtok",["list",["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$next",$loc:"bodyloc"}},"iterlist"],["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$final",$loc:"bodyloc"}},"iterlist"]],["langEnlistSym",["`","="],"xbody","varex",["langEnlistSym",["`","."],"xbody",{dictionary:{$atom:"itersym",$loc:"bodyloc"}},{dictionary:{$atom:"$value",$loc:"bodyloc"}}]],"xbody"]]]]]]),e._SetBindingList("langParseRule",["function","langParseRule",["lang","sym"],["or",["deref",[".","lang","left"],"sym"],["deref",[".","lang","right"],"sym"],["deref",[".","lang","prefix"],"sym"],["deref",[".","lang","infix"],"sym"],["deref",[".","lang","postfix"],"sym"]]]),e._AddPropertyList("LangLibInit",[["$.lingoInit","true"]]),e._SetBindingList("LangLibInit",["function","LangLibInit",["false","manifest"],["=","manifest",["`",["langParser","recurParse","langParseErrorString","tokenread","tokenpush","tokenmatch","tokenpass","passNewline","atTerminator","atDelimiter","langPassSeparator","langAtSeparator","langExprLoc","langConsSym","langEnlistSym","langSyntax","langDebuglog","langCleanup","langErrorCheck","langCorrelateComments","langStrip","langStripLoc","langParse1","langParseTo","langParseToList","langReadExpr","langTemplateStringParse","langBraceParse","langBracketParse","langValueParse","langGenIterate","langParseRule","LangLibInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$LangLib",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","ParseErrorString"],"langParseErrorString"]]]]]),e._Execute(["LangLibInit"]),e._SetNamespace("Lingo"),e._Execute([".",[".","Naan","module"],"letlocal",["module"]]),e._Execute([".",[".","Naan","module"],"letinherit",["$Lib"]]),e._AddPropertyList("LingoPreload",[["$.lingoInit","true"]]),e._SetBindingList("LingoPreload",["function","LingoPreload","false",[".",[".","Naan","module"],"letinherit",["$Lib"]]]),e._SetBindingList("LingoParser",["function","LingoParser",["source","grammar","operators"],["=","SynLoop","false"],["=","InProc","false"],["langParser","source","grammar","operators"]]),e._SetValue("lingoGrammar",{dictionary:{$left:{dictionary:{"$(":520,"$[":520,"$@[":520,"$.":500,"$.*":500,"$@":500,"$@*":500,"$=":420,"$+=":420,"$-=":420,"$*=":420,"$/=":420,"$%=":420,"$^":380,"$*":340,"$/.":340,"$/":340,"$%":340,"$+":330,"$-":330,"$<<":320,"$>>":320,"$..":310,"$..<":310,"$<=":300,"$>=":300,"$<":300,"$>":300,"$!=":300,"$==":300,$eq:300,"$===":300,"$!==":300,"$<=>":300,"$&&":220,$and:220,"$||":200,$or:200,"$~":120}},$right:{dictionary:{"$.":540,"$@":540,"$^":375,"$++":360,"$--":360,"$*":340,"$/.":340,"$/":340,"$%":340,"$+":330,"$-":330,"$<<":320,"$>>":320,"$..":310,"$..<":310,"$<=":300,"$>=":300,"$<":300,"$>":300,"$!=":300,"$==":300,$eq:300,"$===":300,"$!==":300,"$<=>":300,$not:230,"$!":230,"$&&":220,$and:220,"$||":200,$or:200,"$~":120,"$=":100,"$+=":100,"$-=":100,"$*=":100,"$/=":100,"$%=":100}},$rightSign:360,$rightEqual:100,$highBind:1e3,$prefix:{dictionary:{"$,":"false","$[":["constObject",["lingoBracketParse","false","false","ltoken"]],"$#[":["langConsSym",["`","#["],"tokenlast",["lingoParseTo",["`","#]"],"tokenlast"]],$try:["catchParse"],"$(":["parenParse"],"$`":["quoteParse"],$function:["procParse",["`","function"]],$macro:["procParse",["`","macro"]],$closure:["procParse",["`","closure"]],$let:["procParse",["`","let"]],$if:["ifParse","IfBody"],$else:["keywordParse","ltoken"],$body:["bodyParse"],$cond:["condParse"],$loop:["loopParse"],$break:["deloopParse",["`","break"]],$continue:["deloopParse",["`","continue"]],$return:["returnParse"],$while:["whileParse"],$for:["for2Parse"],$switch:["switchParse"],"$+":["lingoParse1","tokenlast",[".","lingoGrammar","rightSign"]],"$-":["negateParse"],"$!":["notParse"],"$++":["preCrementParse","rtoken",["`","++"],["`","+"]],"$--":["preCrementParse","rtoken",["`","--"],["`","-"]],"${":["constObject",["lingoBraceParse","false","ltoken"]],"$@":["atPrefixParse"]}},$infix:{dictionary:{"$/":["quotientParse","ltoken"],"$/.":["quotientParse","ltoken"],"$@":["atParse","ltoken"],"$@[":["atBracketParse","ltoken","rtoken"],"$[":["constObject",["lingoBracketParse","false","ltoken","rtoken"]],"$=":["equalParse","ltoken",["`","="]],"$+=":["opEqualParse","ltoken",["`","+"]],"$-=":["opEqualParse","ltoken",["`","-"]],"$*=":["opEqualParse","ltoken",["`","*"]],"$/=":["opEqualParse","ltoken",["`","/"]],"$%=":["opEqualParse","ltoken",["`","%"]],"$(":["lparParse","ltoken"]}},$postfix:{dictionary:{"$++":["postCrementParse","ltoken",["`","++"],["`","+"]],"$--":["postCrementParse","ltoken",["`","--"],["`","-"]],"$!":["postBangParse","ltoken"]}},$postleft:{dictionary:{"$++":420,"$--":420,"$!":400}},$naryop:{dictionary:{"$&&":"true",$and:"true","$||":"true",$or:"true"}},$string:["langTemplateStringParse","ltoken"]}}),e._SetBindingList("lingoParse1",["function&","lingoParse1",["arg1","arg2","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParse1","arg1","arg2"]]),e._SetBindingList("lingoReadExpr",["function&","lingoReadExpr",["false","IfBody"],["=","IfBody",["`","IfBody"]],["langReadExpr"]]),e._SetBindingList("lingoBraceParse",["function&","lingoBraceParse",["arg1","arg2","false","IfBody"],["=","IfBody",["`","IfBody"]],["langBraceParse","arg1","arg2"]]),e._SetBindingList("lingoBracketParse",["function&","lingoBracketParse",["arg1","arg2","arg3","false","IfBody"],["=","IfBody",["`","IfBody"]],["langBracketParse","arg1","arg2","arg3"]]),e._SetBindingList("lingoParseTo",["function&","lingoParseTo",["arg1","bloc","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParseTo","arg1","bloc"]]),e._SetBindingList("lingoParseToList",["function&","lingoParseToList",["arg1","bloc","false","IfBody"],["=","IfBody",["`","IfBody"]],["langParseToList","arg1","bloc"]]),e._SetBindingList("constObject",["function","constObject",["tok"],["xlock",[".","tok","atom"]],"tok"]),e._SetBindingList("parenParse",["function","parenParse",["false","expr","sloc"],["=","sloc","tokenlast"],["=","expr",["lingoParse1","tokenlast",0]],[["tokenmatch","rpar"],["tokenread"],"expr"],["langSyntax",["tokenread"],"false",{dictionary:{$expected:"rpar",$memo:"$) or operator not found"}}]]),e._SetBindingList("negateParse",["function","negateParse",["false","expr"],["=","expr",["lingoParse1","tokenlast",[".","lingoGrammar","rightSign"]]],[["numeric",[".","expr","atom"]],{dictionary:{$atom:["negate",[".","expr","atom"]],$loc:[".","expr","loc"]}}],["langEnlistSym",["`","-"],"expr","expr"]]),e._SetBindingList("notParse",["function","notParse",["false","expr"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","!"]]]],["langEnlistSym",["`","not"],"expr","expr"]]),e._SetBindingList("postBangParse",["function","postBangParse",["expr","false","sloc"],["=","sloc","tokenlast"],["langEnlistSym",[".","tokenlast","atom"],"sloc","expr"]]),e._SetBindingList("atPrefixParse",["function","atPrefixParse",["false","expr","ltoken","destoken"],["=","ltoken","tokenlast"],["=","expr",["lingoParse1","ltoken",["deref",[".","lingoGrammar","right"],["`","@"]]]],["=","destoken",{dictionary:{$atom:["`","annotations"],$loc:["langExprLoc","ltoken"]}}],[[["not",["dictionary","annotations"]],["=","annotations",{dictionary:{}}]]],["=","expr",["langEnlistSym","`","expr","expr"]],["langEnlistSym","set.","ltoken","destoken","expr","expr"]]),e._SetBindingList("atParse",["function","atParse",["ltoken","false","expr"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","@"]]]],["langEnlistSym",["`","deref"],"ltoken",["langEnlistSym",["`","@"],"ltoken","ltoken"],["langEnlistSym","`","expr","expr"]]]),e._SetBindingList("atBracketParse",["function","atBracketParse",["ltoken","rtoken"],["lingoBracketParse","false",["langEnlistSym",["`","@"],"ltoken","ltoken"],"rtoken"]]),e._SetBindingList("quotientParse",["function","quotientParse",["lhs","false","rhs"],["=","rhs",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],["`","/"]]]],["langEnlistSym",["`","quotient"],"lhs","lhs","rhs"]]),e._SetBindingList("ifParse",["function&","ifParse",["IfBody"],[[["eq","IfBody",["`","IfBody"]],["return",["langConsSym",["`","cond"],"tokenlast",["ifParse"]]]]],["call",["let","lambda",["notcond","false","expr","nexpr","bloc"],["=","IfBody","true"],[[["tokenmatch","lpar"],["=","bloc","tokenlast"],["tokenread"],["=","expr",["car",["lingoParseTo","rpar","bloc"]]]],["=","expr",["lingoParse1","tokenlast",0]]],[[["dictionary","expr"],["=","expr",["langEnlistSym",["`","identity"],"expr","expr"]]]],[[["not",["tokenmatch","{"]],["langPassSeparator"],["=","expr",["list","expr",["langParse1","tokenlast",0]]]],["=","bloc","tokenlast"],["tokenread"],["=","expr",["cons","expr",["langParseTo",["`","}"],"bloc"]]]],[["not",["tokenmatch",["`","else"]]],["list","expr"]],["tokenread"],[["identity","notcond"],[["tokenmatch",["`","if"]],["tokenread"],["list","expr",["ifParse","true"]]],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["cons","expr",["langParseTo",["`","}"],"bloc"]]],["list","expr",["langParse1","tokenlast",0]]],[["tokenmatch",["`","if"]],["tokenread"],["cons","expr",["ifParse","false"]]],["=","nexpr",["langConsSym",["`","identity"],"tokenlast",["langConsSym",["`","true"],"tokenlast"]]],[[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["=","nexpr",["cons","nexpr",["langParseTo",["`","}"],"bloc"]]]],["=","nexpr",["list","nexpr",["langParse1","tokenlast",0]]]],["list","expr","nexpr"]],"IfBody"]]),e._SetBindingList("keywordParse",["function&","keywordParse",["token"],["langSyntax","token","false",{dictionary:{$memo:"$stray keyword"}}]]),e._SetBindingList("bodyParse",["function&","bodyParse",["false","IfBody"],["call",["let","lambda",["bloc"],[["tokenmatch","lpar"],["=","IfBody","true"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","body"],"tokenlast",["langParseTo","rpar","bloc"]]],{dictionary:{$atom:["`","body"],$loc:["langExprLoc","tokenlast"]}}]]]),e._SetBindingList("ifsParse",["function&","ifsParse",["to","false","IfBody"],["call",["let","lambda",["bloc","conds","expr"],["=","bloc","tokenlast"],["=","conds",["apply","append",["langParseTo","to","bloc"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","conds",["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[["not",["tuple",["car","expr"]]],["langSyntax","expr","false",{dictionary:{$memo:"$if expression required"}}]]]]],"conds"]]]),e._SetBindingList("condParse",["function&","condParse",["false","IfBody"],[[["tokenmatch","lpar"],["tokenread"]],["return",{dictionary:{$atom:["`","cond"],$loc:["langExprLoc","tokenlast"]}}]],["langConsSym",["`","cond"],"tokenlast",["ifsParse","rpar"]]]),e._SetBindingList("loopParse",["function&","loopParse",["false","SynLoop","IfBody"],["call",["let","lambda",["tagex","sloc","bloc"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["atom",["caar","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$loop tag must be an atom"}}]],["=","SynLoop","true"],["=","IfBody","true"],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","loop"],"sloc",["cons","tagex",["langParseTo",["`","}"],"bloc"]]]],["langConsSym",["`","loop"],"sloc",["cons","tagex",["list",["langParse1","tokenlast",0]]]]]]]),e._SetBindingList("deloopParse",["function","deloopParse",["keyword","false","tagex","sloc"],[["not","SynLoop"],["langSyntax","tokenlast","false",{dictionary:{$memo:"$only allowed within loops"}}]],["=","sloc","tokenlast"],[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]],[["not",["atom",["caar","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$tag must be an atom"}}]],["langEnlistSym","keyword","tokenlast","tagex"]],["langConsSym","keyword","tokenlast"]]),e._SetBindingList("returnParse",["function","returnParse","false",[["tokenmatch","lpar"],["langEnlistSym",["`","return"],"tokenlast",["lingoParse1","tokenlast",0]]],["langConsSym",["`","return"],"tokenlast"]]),e._SetBindingList("whileParse",["function&","whileParse",["false","SynLoop","IfBody"],["call",["let","lambda",["sloc","expr","tagex","testex","bloc"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["dictionary",["car","tagex"]]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$while tag must be an atom"}}]],[[["tokenmatch","lpar"],["=","bloc","tokenlast"],["tokenread"],["=","expr",["car",["lingoParseTo","rpar","bloc"]]]],["=","expr",["lingoParse1","tokenlast",0]]],["=","testex",["list",["langEnlistSym",["`","not"],"expr","expr"]]],["=","SynLoop","true"],["=","IfBody","true"],[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["langConsSym",["`","while"],"sloc",["cons","tagex","testex",["langParseTo",["`","}"],"bloc"]]]],["langPassSeparator"],["langConsSym",["`","while"],"sloc",["cons","tagex","testex",["list",["langParse1","tokenlast",0]]]]]]]),e._SetBindingList("for2Parse",["function&","for2Parse",["false","SynLoop","IfBody"],["call",["let","lambda",["sloc","varex","tagex","targex","bloc","bodyex"],["=","sloc","tokenlast"],[[["tokenmatch",["`",":"]],["tokenread"],["=","tagex",["lingoParse1","tokenlast",0]]],["=","tagex",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc"]}}]],[["not",["defined","tagex","atom"]],["langSyntax","tokenlast","false",{dictionary:{$memo:"$for tag must be an atom"}}]],["=","varex",["lingoParse1","tokenlast",0]],[[["==",[".",["car","varex"],"atom"],"quote"],["=","varex",["cadr","varex"]]]],[["not",["tokenmatch",["`","in"]]],["langSyntax","tokenlast","false",{dictionary:{$expected:"$in",$memo:"$malformed for loop"}}]],["tokenread"],["=","targex",["lingoParse1","tokenlast",0]],["=","SynLoop","true"],["=","IfBody","true"],[[["tokenmatch","{"],["=","bloc","tokenlast"],["tokenread"],["=","bodyex",["langParseTo",["`","}"],"bloc"]]],["=","bodyex",["cons",["langParse1","tokenlast",0]]]],["langGenIterate",{dictionary:{$atom:["`","for"],$loc:"sloc"}},"tagex","varex","targex","bodyex"]]]]),e._SetBindingList("switchParse",["function","switchParse",["false","sloc"],["=","sloc","tokenlast"],["langSyntax","sloc",{dictionary:{$memo:"$switch not implemented"}}]]),e._SetBindingList("procParse",["function&","procParse",["begin","false","InProc","IfBody"],["function","convlocal",["parms","false","ptoken","result"],[["atom","parms"],"parms"],["loop","false",["=","ptoken",["pop","parms"]],[[["==",[".","ptoken","atom"],"local"],["=","result",["cons",{dictionary:{$atom:"false",$loc:[".","ptoken","loc"]}},"result"]]],["=","result",["cons","ptoken","result"]]],[["atom","parms"],["reverse","result"]]]],["function","checkparms",["parms","false","sym"],[["not","parms"],"false"],[["&&",["dictionary","parms"],["not",["not",["=","sym",[".","parms","atom"]]]]],[["||",["not",["symbol","sym"]],["langParseRule","lingoGrammar","sym"]],["langSyntax","parms","false",{dictionary:{$memo:"$invalid parameter"}}]]],[["tuple","parms"],["checkparms",["car","parms"]],["checkparms",["cdr","parms"]]]],["call",["let","lambda",["expr","procname","parms","sloc","akey","bloc"],["=","InProc","true"],["=","sloc","tokenlast"],["=","expr",["langReadExpr"]],[[["==",[".","expr","atom"],["`","&"]],[["eq","begin",["`","function"]],["=","begin","function&"],["=","expr",["langReadExpr"]]],[["eq","begin",["`","let"]],["=","begin","let&"],["=","expr",["langReadExpr"]]],["langSyntax","sloc","false",{dictionary:{$memo:"$only function& and let& allowed"}}],["return"]]],[[["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["=","procname",{dictionary:{$atom:["unintern",[".","expr","atom"]],$loc:["langExprLoc","sloc"]}}],["assign",[".","procname","atom"],[".","expr","atom"]],["=","parms",["langReadExpr"]]],["=","procname",{dictionary:{$atom:["unintern","lambda"],$loc:["langExprLoc","sloc"]}}],["=","parms","expr"]],[[["dictionary","annotations"],["for",["let","lambda",["iter"],["=","iter",["iterate","annotations",["`","akey"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","akey",[".","iter","$value"]],["put",[".","procname","atom"],"akey",["deref","annotations","akey"]]]]],["=","annotations",["`","annotations"]]]],[[["||",["&&",["dictionary","parms"],["not",[".","parms","atom"]]],["not","parms"]],["=","parms",{dictionary:{$atom:"false",$loc:["langExprLoc","tokenlast"]}}]],["=","parms",["convlocal","parms"]]],["checkparms","parms"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc",{dictionary:{$memo:"$missing { at start of procedure body"}}]],["=","IfBody","true"],["=","bloc","tokenlast"],["tokenread"],["langConsSym","begin","sloc",["cons","procname",["cons","parms",["langParseTo",["`","}"],"bloc"]]]]]]]),e._SetBindingList("catchParse",["function","catchParse",["false","sloc1","sloc2","sloc3","exbod","catbod","ccond","finbod","bloc"],["=","sloc1","tokenlast"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc1",{dictionary:{$memo:"$missing { after try"}}]],["tokenread"],["=","exbod",["langParseToList",["`","}"],"sloc1"]],["=","sloc2","tokenlast"],[[["tokenmatch",["`","catch"]],["tokenread"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc2",{dictionary:{$memo:"$missing { after catch"}}]],["=","bloc","tokenlast"],["tokenread"],[[["tokenmatch",["`","if"]],["=","ccond",["ifsParse",["`","}"]]]],[["tokenmatch",["`","}"]],["tokenread"]],["=","catbod",["langParseTo",["`","}"],"bloc"]]],[["not","ccond"],[[["not","catbod"],["=","catbod",["langConsSym",["`","false"],"bloc"]]]],["=","ccond",["list",["cons",["langConsSym",["`","identity"],"bloc",["langConsSym",["`","true"],"bloc"]],"catbod"]]]]]],["=","sloc3","tokenlast"],[[["tokenmatch",["`","finally"]],["tokenread"],[["not",["tokenmatch","{"]],["langSyntax","tokenlast","sloc3",{dictionary:{$memo:"$missing { after finally"}}]],["=","bloc","tokenlast"],["tokenread"],["=","finbod",["langParseToList",["`","}"],"bloc"]]]],[["not","ccond"],[["not","finbod"],["langSyntax","tokenlast","sloc1",{dictionary:{$memo:"$try requires catch or finally"}}]],["=","ccond",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc2"]}}],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]],[["not","finbod"],["=","finbod",{dictionary:{$atom:"false",$loc:["langExprLoc","sloc3"]}}],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]],["langEnlistSym",["`","catch"],"sloc1","exbod","ccond","finbod"]]),e._SetBindingList("equalParse",["function","equalParse",["lhs","op","false","rhs","atex","equex"],["=","rhs",["lingoParse1","tokenlast",[".","lingoGrammar","rightEqual"]]],["=","equex",["call",["let","lambda","false",[["&&",["defined","lhs","atom"],["symbol",[".","lhs","atom"]]],["langEnlistSym","op","lhs","lhs","rhs"]],[["==",[".",["car","lhs"],"atom"],"quote"],["langEnlistSym","op","lhs",["second","lhs"],"rhs"]],[["==",[".",["car","lhs"],"atom"],"period"],["langEnlistSym","set.","lhs",["second","lhs"],["langEnlistSym","quote",["third","lhs"],["third","lhs"]],"rhs"]],[["and",["==",[".",["car","lhs"],"atom"],"set."],["eq",[".",["second","lhs"],"atom"],["`","annotations"]]],["langEnlistSym","set.","lhs",["second","lhs"],["third","lhs"],"rhs"]],[["or",["==",[".",["caar","lhs"],"atom"],"deref"],["==",[".",["caar","lhs"],"atom"],"dereflist"]],["=","atex",["second","lhs"]],[[["==",[".",["car","atex"],"atom"],["`","@"]],["=","atex",["langEnlistSym",["`","@"],"atex",["second","atex"],{dictionary:{$atom:"true",$loc:[".",["car","atex"],"loc"]}}]]]],["langEnlistSym","set[","lhs","atex",["third","lhs"],"rhs"]],["return",["langSyntax","rhs","lhs",{dictionary:{$memo:"$bad assignment"}}]]]]],[["eq","op",["!",["`","="]]],["langEnlistSym",["`","not"],"lhs","equex"]],"equex"]),e._SetBindingList("opEqualParse",["function","opEqualParse",["lhs","op","false","rhs"],["=","rhs",["lingoParse1","tokenlast",[".","lingoGrammar","rightEqual"]]],[["&&",["defined","lhs","atom"],["symbol",[".","lhs","atom"]]],["langEnlistSym","preadjust","lhs","lhs",{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],[["==",[".",["car","lhs"],"atom"],"quote"],["langEnlistSym","preadjust","lhs",["second","lhs"],{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],[["member",[".",["car","lhs"],"atom"],["`",[".","deref","dereflist"]]],["langEnlistSym","preadjust","lhs","lhs",{dictionary:{$atom:"op",$loc:["langExprLoc","lhs"]}},"rhs"]],["langSyntax","rhs","lhs",{dictionary:{$memo:"$bad operator assignment"}}]]),e._SetBindingList("lparParse",["function","lparParse",["expr","false","bloc"],["=","bloc","tokenlast"],[["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["cons","expr",["lingoParseTo","rpar","bloc"]]],[["==",[".",["car","expr"],"atom"],"period"],["langEnlistSym","period","expr",["second","expr"],["third","expr"],["lingoParseToList","rpar","bloc"]]],[["member",[".",["car","expr"],"atom"],["`",["function","function&","macro","closure","let","let&"]]],[[["not","InProc"],["set[",["@",[".",[".","expr",1],"atom"],"true"],["`","\\.lingoInit"],"true"]]],["langConsSym",["`","call"],"expr",["cons","expr",["lingoParseTo","rpar","bloc"]]]],[["or",["==",[".",["caar","expr"],"atom"],"deref"],["==",[".",["caar","expr"],"atom"],"dereflist"]],["langEnlistSym",[".",["caar","expr"],"atom"],"expr",["second","expr"],["third","expr"],["lingoParseToList","rpar","bloc"]]],["langSyntax","bloc","false",{dictionary:{$memo:"$operator missing before ("}}]]),e._SetBindingList("preCrementParse",["function","preCrementParse",["rtoken","opsym","adjuster","false","sloc","expr"],["=","sloc","tokenlast"],["=","expr",["lingoParse1","tokenlast",["deref",[".","lingoGrammar","right"],"opsym"]]],[["or",["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["member",[".",["car","expr"],"atom"],["`",[".","deref","dereflist"]]]],["langEnlistSym","preadjust","sloc","expr",{dictionary:{$atom:"adjuster",$loc:["langExprLoc","sloc"]}},{dictionary:{$atom:1,$loc:["langExprLoc","sloc"]}}]],["langSyntax","expr","false",{dictionary:{$memo:"$not an lvalue"}}]]),e._SetBindingList("postCrementParse",["function","postCrementParse",["expr","opsym","adjuster","false","sloc"],["=","sloc","tokenlast"],[["or",["&&",["defined","expr","atom"],["symbol",[".","expr","atom"]]],["member",[".",["car","expr"],"atom"],["`",[".","deref","dereflist"]]]],["langEnlistSym","postadjust","sloc","expr",{dictionary:{$atom:"adjuster",$loc:["langExprLoc","sloc"]}},{dictionary:{$atom:1,$loc:["langExprLoc","sloc"]}}]],["langSyntax","expr","false",{dictionary:{$memo:"$not an lvalue"}}]]),e._SetBindingList("quoteParse",["function","quoteParse",["false","expr"],["=","expr","tokenlast"],[["member",[".","expr","atom"],["`",["quote",")","{","[","`","\n"]]],["tokenread"],"expr"],["langEnlistSym","`","expr",["langReadExpr"]]]),e._AddPropertyList("LingoInit",[["$.lingoInit","true"]]),e._SetBindingList("LingoInit",["function","LingoInit",["modname","false","manifest"],["=","manifest",["`",["LingoPreload","LingoParser","lingoGrammar","lingoParse1","lingoReadExpr","lingoBraceParse","lingoBracketParse","lingoParseTo","lingoParseToList","constObject","parenParse","negateParse","notParse","postBangParse","atPrefixParse","atParse","atBracketParse","quotientParse","ifParse","keywordParse","bodyParse","ifsParse","condParse","loopParse","deloopParse","returnParse","whileParse","for1Parse","for2Parse","switchParse","procParse","catchParse","equalParse","opEqualParse","lparParse","preCrementParse","postCrementParse","quoteParse","LingoInit"]]],[[["not","modname"],["=","modname",[".","module","id"]]]],[".",[".","Naan","module"],"build",["modname","$Parse",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],[".",[".","Naan","module"],"letinherit",["$Lib"]],["set.",[".","modobj","exports"],["`","Base"],["DefineLanguage","$Lingo","lingoGrammar","LingoParser","LingoUnparser"]],["=","lingoOperators",[".",[".",[".",[".","modobj","exports"],"Base"],"info","false"],"operators"]]]]]]),e._Execute(["LingoInit","$Lingo"]),e._SetBindingList("LingoPrinter",["function","LingoPrinter",["expr","options"],[".",["LingoUnparser","expr","options"],"string","false"]]),e._SetBindingList("LingoUnparser",["closure","LingoUnparser",["origexpr","options","grammar","extensions","false","unparser","sink","formatter","key","expr","rbp","lbp","owntuple","hookif"],["=","unparser",["new","object","this"]],["set.","unparser",["`","expression"],"origexpr"],[[["not","grammar"],["=","grammar","lingoGrammar"]]],["set.","unparser",["`","sink"],["=","sink",{dictionary:{$row:0,$col:0,$incol:0,$hangdent:0,$wrapping:"true",$rowtokens:{array:[{array:[]}]},$procnesting:0,$endprocNL:"true",$quoteDict:["RegExp","$[`:,}]$"],$breaks:"false",$mirrors:"false",$mirroroot:"false",$tuplemap:"false",$maxmarklen:0,$markdict:"false",$nocycles:["new","weakmap"],$maproot:"false",$defoptions:{dictionary:{$point:"false",$quoted:"true",$indentSize:4,$wrapMinAmount:29,$wrapMaxCol:79,$leftMargin:0,$compact:"true",$maxKeyLength:20,$maxElements:1024,$maxStringLength:["*",64,1024],$noComments:"false",$commentCol:64}}}}]],["call",["let","lambda",["false","item"],[[["not",["dictionary","options"]],["=","options",[".","sink","defoptions"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","options",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["set[",[".","sink","defoptions"],"item",["deref","options","item"]]]]],["=","options",[".","sink","defoptions"]]],["set.","unparser",["`","options"],"options"]]],["set.","sink",["`","incol"],[".","options","leftMargin"]],["=","formatter",{dictionary:{"$`":"uhook`","$=":"uhook=",$deref:"uhookderef",$dereflist:"uhookderef","$set.":"uhookset.","$set[":"uhookset[","$.":"uhook.","$.*":"uhookref*","$@*":"uhookref*",$quotient:"uhookquotient",$catch:"uhookcatch",$for:"uhookfor",$call:"uhookcall",$while:"uhookwhile",$loop:"uhookloop",$cond:"uhookcond",$return:"uhookreturn",$continue:"uhookbreco",$break:"uhookbreco",$preadjust:"uhookpreadjust",$postadjust:"uhookpostadjust",$not:"uhooknot","$!":"uhookbang",$let:"uhookproc","$let&":"uhookproc",$closure:"uhookproc",$macro:"uhookproc",$function:"uhookproc","$function&":"uhookproc"}}],["for",["let","lambda",["iter"],["=","iter",["iterate","extensions",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["set[","formatter","key",["deref","extensions","key"]]]]],["function","earlier",["loc1","loc2"],[["<",["car","loc1"],["car","loc2"]],"loc1"],[[">",["car","loc1"],["car","loc2"]],"loc2"],[["<",["second","loc1"],["second","loc2"]],"loc1"],[[">",["second","loc1"],["second","loc2"]],"loc2"],"loc1"],["function","later",["loc1","loc2"],[[">",["car","loc1"],["car","loc2"]],"loc1"],[["<",["car","loc1"],["car","loc2"]],"loc2"],[[">",["second","loc1"],["second","loc2"]],"loc1"],[["<",["second","loc1"],["second","loc2"]],"loc2"],"loc1"],["function","indentadj",["delta"],["preadjust",[".","sink","incol"],"+",["*","delta",[".","options","indentSize"]]],[["<",[".","sink","incol"],0],["set.","sink",["`","incol"],0]]],["function","nextline","false",["set[",[".","sink","rowtokens"],["preadjust",[".","sink","row"],"+",1],{array:[]}],["set.","sink",["`","col"],[".","sink","incol"]],[[">",[".","sink","hangdent"],0],["preadjust",[".","sink","col"],"+",[".","options","indentSize"]]]],["function&","outoken",["strs","false","str","toklen","outok","sym"],[[["<",[".","sink","col"],[".","sink","incol"]],["set.","sink",["`","col"],[".","sink","incol"]]]],["while","false",[["not",["not",["atom","strs"]]]],["=","str",["pop","strs"]],[[["not",["atom","str"]],["=","owntuple","str"],["continue"]]],[[["symbol","str"],["=","sym","str"],["=","str",["tostring","sym",{dictionary:{$quote:"true",$nonamespace:"true"}}]]]],[[[">",[".","str","length"],[".","options","maxStringLength"]],["=","str",[".","$[String ","concat",[[".","str","length"],"$]"]]]]],[[["==","str","$\n"],["nextline"],["continue"]],[[[">=",[".","str","indexOf",["$\n"]],0],["=","str",["totuple",[".","str","split",["$\n"]]]],["=","outok","false"],["loop","false",["push",["pop","str"],"outok"],[["empty","str"]],["push","$\n","outok"]],["outoken",["reverse","outok"]],["continue"]]]],["=","toklen",["length","str"]],[[["!=",[".","str","trim","false"],"$"],[[["&&",[".","sink","wrapping"],[">",["+",[".","sink","col"],"toklen"],[".","options","wrapMaxCol"]],[">",["-",[".","sink","col"],[".","sink","incol"]],[".","options","wrapMinAmount"]]],["nextline"]]],["=","outok",{dictionary:{$str:"str",$column:[".","sink","col"],$tuple:"owntuple"}}],[[["identity","sym"],["set.","outok",["`","symbol"],"sym"]]],[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"push",["outok"]]]],["preadjust",[".","sink","col"],"+","toklen"]]],["function","mktok","strs",["outoken","strs"]],["function","mktokil","strs",["call",["function","lambda",["false","result"],["set.","sink",["`","wrapping"],"false"],["=","result",["apply","mktok","strs"]],["set.","sink",["`","wrapping"],"true"],"result"]]],["function","spaces",["lop1"],[["not",["and","lop1",["atom","lop1"]]],[["identity","spaceout"],["mktok","space"]]],[["<",["deref",[".","grammar","right"],"lop1"],"lbp"],["mktok","space"]],[["<",["deref",[".","grammar","left"],"lop1"],"rbp"],["mktok","space"]],[["identity","spaceout"],["mktok","space"]],[["not",["isbreak","lop1"]],["mktok","space"]]],["function","parens",["str"],[["deref",[".","grammar","right"],"lop1"],[[">","lbp",["deref",[".","grammar","right"],"lop1"]],["mktokil","str"]],[["deref",[".","grammar","left"],"lop1"],[["<","rbp",["deref",[".","grammar","left"],"lop1"]]],["mktokil","str"]],["=","spaceout","false"]],[["deref",[".","grammar","left"],"lop1"],[["<","rbp",["deref",[".","grammar","left"],"lop1"]]],["mktokil","str"]]],["macro","getokens",["outputter","false","rowstart","colstart"],["function","dequeue",["false","rowdex","coldex","outqueue","col"],["=","outqueue",{array:[]}],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowstart"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[">=",[".","col","column"],"colstart"],["=","outqueue",[".","outqueue","concat",[[".",["deref",[".","sink","rowtokens"],"rowstart"],"splice",["coldex"]]]]],["set.","sink",["`","col"],[".","col","column"]]],["preadjust","coldex","+",1]]]],["set.","sink",["`","row"],"rowstart"],["set.","sink",["`","col"],"colstart"],["=","rowdex","rowstart"],["while","false",[["not",["<",["preadjust","rowdex","+",1],[".",[".","sink","rowtokens"],"length"]]]],[".","outqueue","push",[["`","row"]]],["=","outqueue",[".","outqueue","concat",[[".",["deref",[".","sink","rowtokens"],"rowdex"],"splice",[0]]]]]],[".",["deref",[".","sink","rowtokens"],"rowdex"],"splice",[["+","rowstart",1]]],"outqueue"],["=","rowstart",[".","sink","row"]],["=","colstart",[".","sink","col"]],[["eval","outputter"],["dequeue"]]],["function","putokens",["tokens","false","item"],["for",["let","lambda",["iter"],["=","iter",["iterate","tokens",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],[[["eq","item",["`","row"]],["nextline"]],[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"push",["item"]],["set.","sink",["`","col"],["+",[".","item","column"],["length",[".","item","str"]]]]]]]]],["function","tokenmark","false",{dictionary:{$rowstart:[".","sink","row"],$colstart:[".",["deref",[".","sink","rowtokens"],[".","sink","row"]],"length"],$col:[".","sink","col"],$incol:[".","sink","incol"]}}],["function","tokentruncate",["mark"],[".",["deref",[".","sink","rowtokens"],[".","mark","rowstart"]],"splice",[[".","mark","colstart"]]],[".",[".","sink","rowtokens"],"splice",[["+",[".","mark","rowstart"],1]]],["set.","sink",["`","row"],[".","mark","rowstart"]],["set.","sink",["`","col"],[".","mark","col"]],["set.","sink",["`","incol"],[".","mark","incol"]]],["function","exarray",["arr","false","adex","separator"],[[["deref",[".","sink","nocycles"],"arr"],["mktokil","$[","$<cyclic>","$]"],["return"]]],["set[",[".","sink","nocycles"],"arr","true"],["=","adex",0],["=","separator","space"],["while","false",[["not",["<","adex",[".","arr","length"]]]],[[["dictionary",["deref","arr",["postadjust","adex","+",1]]],["=","separator","$\n"],["break"]]]],["mktok","$["],[[["==","separator","$\n"],["nextline"],["indentadj",1]]],["=","adex",0],["while","false",[["not",["<","adex",[".","arr","length"]]]],[[[">=","adex",[".","options","maxElements"]],["mktok","$<...>"],["break"]]],[[[">","adex",0],["mktokil","$,","separator"]]],["exoutput",["deref","arr",["postadjust","adex","+",1]],"arr",0,0]],[[["==","separator","$\n"],["indentadj",-1]]],["mktok","$]"],["set[",[".","sink","nocycles"],"arr","false"]],["function","exdictionary",["dict","false","depths","dictmap","completed"],["function","render",["whitespace","keypad","false","mark","startrow","notfirst","keylen","keystr","savehang","key"],["=","mark",["tokenmark"]],["=","startrow",[".","sink","row"]],["=","savehang",[".","sink","hangdent"]],["set.","sink",["`","hangdent"],0],["set.","sink",["`","endprocNL"],"false"],[[["identity","keypad"],["mktok","{","$\n"]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],[[["||",["eq",["typeof",["deref","dict","key"]],"dictionary"],["eq",["typeof",["deref","dict","key"]],"array"]],["tokentruncate","mark"],["return","false"]]]]]],["mktok","{"]],[[["identity","keypad"],["indentadj",1]]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["=","keystr","key"],[[["&&",[".","options","quoted"],[".",[".","sink","quoteDict"],"test",["keystr"]]],["=","keystr",[".",'$"',"concat",["keystr",'$"']]]]],["=","keylen",["length","keystr"]],[[["&&","keypad",[">","keypad","keylen"]],["=","keystr",[".","keystr","concat",[[".","space","repeat",[["-","keypad","keylen"]]]]]]]],[[["identity","notfirst"],["mktokil","$,","whitespace"]],[[">",[".","sink","col"],[".","sink","incol"]],["mktokil","space"]]],["=","notfirst","true"],["mktokil","keystr","$:","space"],[[["eq",["typeof",["deref","dict","key"]],["typeof","dict"]],[["||",["deref",[".","sink","nocycles"],["deref","dict","key"]],["deref","dictmap",["deref","dict","key"]]],["mktokil","${","$<cyclic>","$}"]],["set[","dictmap",["deref","dict","key"],"true"],["outputdict",["deref","dict","key"],["+","depth",1]],["set[","dictmap",["deref","dict","key"],"false"]],["exoutput",["deref","dict","key"],"dict",0,0]],[[["&&",["not","keypad"],["!=",[".","sink","row"],"startrow"]],["tokentruncate","mark"],["return","false"]]]]]],[[["identity","keypad"],["indentadj",-1]]],["mktokil","space",["`","}"]],["set.","sink",["`","endprocNL"],"true"],["set.","sink",["`","hangdent"],"savehang"],["return","true"]],["function","computeMaxKeyLengths",["dict","depth","false","key","keylen"],[[["deref","dictmap","dict"],["return"]]],[[[">",["preadjust","completed","+",1],[".","options","maxElements"]],["return"]]],["set[","dictmap","dict","true"],[[["not",["deref","depths","depth"]],["set[","depths","depth",0]]],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","key"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","key",[".","iter","$value"]],["=","keylen",["length","key"]],[[["<",["deref","depths","depth"],"keylen"],["set[","depths","depth","keylen"]]],[[["eq",["typeof",["deref","dict","key"]],["typeof","dict"]],["computeMaxKeyLengths",["deref","dict","key"],["+","depth",1]]]]]]],[[[">",["deref","depths","depth"],[".","options","maxKeyLength"]],["set[","depths","depth",[".","options","maxKeyLength"]]]],["set[","dictmap","dict","false"]],["function&","outputdict",["dict","depth","false","keypad"],[[[">",["preadjust","completed","+",1],[".","options","maxElements"]],["mktok","$<...>"],["return"]]],["=","keypad",["deref","depths","depth"]],[[["&&",[">","depth",0],["<","keypad",["+",["deref","depths",["-","depth",1]],[".","options","indentSize"]]]],["=","keypad",["+",["deref","depths",["-","depth",1]],[".","options","indentSize"]]]]],[["not",["render","$ "]],["render","$\n","keypad"]]],[[["deref",[".","sink","nocycles"],"dict"],["mktokil","${","$<cyclic>","$}"],["return","true"]]],["set[",[".","sink","nocycles"],"dict","true"],["=","depths",{array:[]}],["=","dictmap",["new","weakmap"]],["=","completed",0],["computeMaxKeyLengths","dict",0],["=","completed",0],["set[","dictmap","dict","true"],["outputdict","dict",0],["set[",[".","sink","nocycles"],"dict","false"],"true"],["function","exobject",["obj","false","str"],["=","str",["deref",["@","obj"],["`","\\.tostring"],["obj"]]],[[["not","str"],["=","str",["tostring","obj"]]]],["mktok","str"]],["function","exlist",["lex1","owner","paramlist","false","ex1","xpar","savetup","savenest"],["=","savetup","owntuple"],["=","savenest",[".","sink","procnesting"]],["set.","sink",["`","procnesting"],0],[[["identity","owner"],["=","owntuple","owner"]]],[[["empty","lex1"],["mktokil","$(","$)"]],["=","xpar","lex1"],["=","ex1",["pop","lex1"]],["mktok","$("],["preadjust",[".","sink","hangdent"],"+",1],["loop","false",[[["&&","paramlist",["not","ex1"]],["=","ex1","local"]]],["exoutput","ex1","xpar"],[[["empty","lex1"],[[["identity","lex1"],["mktokil","space","$.","space","lex1"]]],["break"]]],[[["eq","ex1","local"],["mktokil","space"]],["mktokil","$,","space"]],["=","xpar","lex1"],["=","ex1",["pop","lex1"]]],["preadjust",[".","sink","hangdent"],"-",1],["mktokil","$)"]],["set.","sink",["`","procnesting"],"savenest"],["=","owntuple","savetup"]],["function","exannotation",["lex1"],["exoutput",["cadar","lex1"],"owntuple",0,["deref",[".","grammar","left"],["`","@"]]],["mktok",["`","@"]],[["==",["caadr","lex1"],"`"],["exoutput",["cadadr","lex1"],"owntuple",["deref",[".","grammar","right"],["`","@"]],0]],["mktok","$["],["exoutput",["second","lex1"],"owntuple",0,0],["mktok","$]"]],["function&","exoutput",["expr","owntuple","rbp","lbp","spaceout","false","ex1","lop1","lex1"],[[["not","rbp"],["=","rbp",0]]],[[["not","lbp"],["=","lbp",0]]],[["atom","expr"],[["dictionary","expr"],["exdictionary","expr"]],[["array","expr"],["exarray","expr"]],[["object","expr"],["exobject","expr"]],[["and",["float","expr"],["or",["positive",[".","options","point"]],["zero",[".","options","point"]]]],["mktok",[".","expr","toFixed",["point"]]]],[["and",["negative","expr"],[">","lbp",[".","grammar","rightSign"]]],["mktok","$(",["tostring","expr"],"$)"]],[["symbol","expr"],["mktok","expr"]],[[".","options","quoted"],["mktok",["tostring","expr",{dictionary:{$quote:"true"}}]]],["mktok",["tostring","expr"]]],["=","owntuple","expr"],["=","lop1",["car","expr"]],["=","lex1",["cdr","expr"]],[["and","lex1",["empty","lex1"]],[[".","options","quoted"],["mktok",["tostring","expr",{dictionary:{$quote:"true"}}]]],["mktok",["tostring","expr"]]],[["not",["symbol","lop1"]],["exlist","expr"]],[["apply",["deref","formatter","lop1"],["list","lex1","lop1","rbp","lbp","hookif"]]],[["and",["not",["deref",[".","grammar","left"],"lop1"]],["not",["deref",[".","grammar","right"],"lop1"]],["not",["getproc","lop1"]]],["exlist","expr"]],[["empty","lex1"],["mktok","lop1"],["mktokil","$(","$)"]],[["==","lop1","quote"],["mktok","lop1"],["exoutput","ex1","owntuple",[".","grammar","highBind"],0]],["=","ex1",["pop","lex1"]],[["empty","lex1"],["parens","$("],[["deref",[".","grammar","right"],"lop1"],["mktok","lop1"],["spaces","lop1"],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"]],[["deref",[".","grammar","left"],"lop1"],["exoutput","ex1","owntuple",0,["deref",[".","grammar","left"],"lop1"]],["spaces","lop1"],["mktok","lop1"],["parens","$)"]],["mktok","lop1"],["exlist",["cdr","expr"],"expr"]],[["and",["deref",[".","grammar","right"],"lop1"],["deref",[".","grammar","left"],"lop1"]],["parens","$("],["exoutput","ex1","owntuple",0,["deref",[".","grammar","left"],"lop1"]],["loop","false",["=","ex1",["pop","lex1"]],["spaces","lop1"],["mktok","lop1"],["spaces","lop1"],[["empty","lex1"]],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],["deref",[".","grammar","left"],"lop1"]]],["exoutput","ex1","owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"]],["mktok","lop1"],["exlist",["cdr","expr"],"expr"]],["function&","exbody",["upbody","inloop","nobrace","false","startin","lastitem"],["function","debugExbody","args",[["identity","false"],["apply",[".",[".","Naan","debug"],"debuglog"],"args"]]],["function","braceOpen","false",[[[".","options","compact"],["mktokil","space","${"]],["nextline"],["mktok","${"]],["indentadj",1]],["function","braceClose",["goleft"],["indentadj",-1],[["&&",["and",[".","options","compact"],["not","goleft"]],[">",[".","sink","incol"],"startin"]],["mktokil","space","$}"]],["nextline"],["mktok","$}"]],["function","mkiftest",["test","didif"],["nextline"],["preadjust",[".","sink","hangdent"],"+",1],[[["==","test",["`",["identity","true"]]],["mktok","test","$else"]],[[["identity","didif"],["mktok","test","$else if","space"]],["mktok","test","$if","space"]],[["==",["car","test"],["`","identity"]],["exoutput",["second","test"],"test",0,0,"true"]],["exoutput","test","test",0,0,"true"]],["preadjust",[".","sink","hangdent"],"-",1]],["function","mkindented",["upbody","inloop","elseafter"],[["||",[">=",["length",["cdr","upbody"]],2],["&&",["atom",["caar","upbody"]],[">=",["length","upbody"],2]],["&&","upbody","inloop"],["&&","elseafter",["tuple",["car","upbody"]],["tuple",["caar","upbody"]]],["dictionary",["car","upbody"]]],["debugExbody","$mkindented 0","upbody","$|","inloop","$|","elseafter"],["braceOpen"],["mkitems","upbody","false","false"],[[["identity","inloop"],["nextline"],["mktok","$break"]]],["braceClose"]],["debugExbody","$mkindented 1","upbody","$|","inloop","$|","elseafter"],["indentadj",1],["mkitems","upbody","false","false"],[[["identity","inloop"],["mktokil","space","$break"]],[["not","upbody"],["mktokil","space","${ }"]]],["indentadj",-1]],["function","mkitems",["upbody","didif","inloop","false","item","fitem","ffitem","fffitem"],[["empty","upbody"]],[[["deref",[".","sink","tuplemap"],"upbody"],["set.",["deref",[".","sink","tuplemap"],"upbody"],["`","bp"],"true"]]],["=","item",["car","upbody"]],["=","fitem",["car","item"]],["=","ffitem",["car","fitem"]],["=","fffitem",["car","ffitem"]],["debugExbody","$mkitems 0","item","$|","fitem","$|","ffitem","$|","fffitem","$>",["cdr","upbody"]],[[["and","didif",["or",["atom","item"],["atom","fitem"],["and",["not",["atom","ffitem"]],["atom","fffitem"]]]],["debugExbody","$mkitems 1","didif"],["nextline"],["mktok","$else"],["mkindented","upbody","false",["&&",["not",["atom","item"]],["not",["atom","fitem"]]]],["=","upbody","false"]],[["or",["atom","item"],["atom","fitem"]],["debugExbody","$mkitems 2"],[[["&&","lastitem",["array","item"]],["mktok","$,"]]],["nextline"],["exoutput","item","upbody",0,0,"true"]],[["atom","ffitem"],["debugExbody","$mkitems 3","didif","inloop",["atom",["cddr","item"]],["tuple",["cdr","upbody"]],["atom",["caaadr","upbody"]]],["mkiftest",["car","item"],"didif"],["mkindented",["cdr","item"],"inloop",["&&",["atom",["cddr","item"]],["tuple",["cdr","upbody"]],["atom",["caaadr","upbody"]]]],["=","didif",["not","inloop"]]],["mkiftest",["caar","item"],"didif"],["debugExbody","$mkitems 4",["cdar","item"],"$|",["cadr","item"],"$|",["caadr","item"]],["mkindented",["cdar","item"],"false",["tuple",["&&",["caaar","item"],["tuple",["cadr","item"]]]]],["mkitems",["cdr","item"],"true","false"],["=","didif","false"]],["=","lastitem","item"],["mkitems",["cdr","upbody"],"didif","inloop"]],["=","startin",[".","sink","incol"]],["debugExbody","$=====","upbody","nobrace"],[["identity","nobrace"],["indentadj",1],["mkitems","upbody","false","inloop"],["indentadj",-1]],["braceOpen"],["mkitems","upbody","false","inloop"],["braceClose",["&&",["==",[".","sink","procnesting"],1],[".","sink","endprocNL"]]]],["=","hookif",{dictionary:{$parens:"parens",$spaces:"spaces",$mktok:"mktok",$mktokil:"mktokil",$nextline:"nextline",$indentadj:"indentadj",$grammar:"grammar",$exlist:"exlist",$exannotation:"exannotation",$exoutput:["function","lambda",["expr","owner","rbp","lbp","spaceout"],[[["not","owner"],["=","owner","owntuple"]]],["exoutput","expr","tuple","rbp","lbp","spaceout"]],$exbody:["function","lambda",["upbody","inloop","nobrace"],["preadjust",[".","sink","procnesting"],"+",1],["exbody","upbody","inloop","nobrace"],["preadjust",[".","sink","procnesting"],"-",1]]}}],["function","uhookproc",["lex1","proctype","false","fname","fbind","parms"],["preadjust",[".","sink","procnesting"],"+",1],["=","fname",["car","lex1"]],[[["&&",["not",[".","options","noComments"]],["not",[".","sink","maproot"]],["deref",["@","fname"],["`","\\.sourcemap"]]],["set.","sink",["`","maproot"],["cons","proctype","lex1"]]]],["=","fbind","lex1"],["mktok",["tostring","proctype",{dictionary:{$noquote:"true"}}]],["mktok","space"],[[["not",["lambda","fname"]],["exoutput","fname","lex1",0,0,"true"]]],["=","parms",["cadr","fbind"]],[[["identity","parms"],[["atom","parms"],["mktok","space","parms"]],["exlist","parms",["cdr","fbind"],"true"]],["mktok","$(","$)"]],["exbody",["cddr","fbind"]],[[["deref",["@","fname"],["`","\\.lingoInit"]],["mktok","$(","$)"]]],[[["and",[">",[".","sink","procnesting"],1],[".","sink","endprocNL"]],["nextline"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhook`",["lex1","lop1","false","ex1"],["parens","$("],["mktok","lop1"],["=","ex1",["car","lex1"]],[[["atom","ex1"],["exoutput","ex1","owntuple",0,0]],["exlist","ex1"]],["parens","$)"],"true"],["function","uhook=",["lex1","lop1"],["parens","$("],[[["tuple",["car","lex1"]],["mktok","quote"]]],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","space","lop1","space"],["exoutput",["second","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0,"true"],["parens","$)"],"true"],["function","uhookpreadjust",["lex1","lop1","false","target","adjuster","value"],["parens","$("],["=","target",["car","lex1"]],["=","adjuster",["second","lex1"]],["=","value",["third","lex1"]],[[["==","value",1],["mktok","adjuster","adjuster"],["exoutput","target","owntuple",0,["deref",[".","grammar","right"],"adjuster"]]],["exoutput","target","owntuple",0,["deref",[".","grammar","left"],["`","="]]],["mktok","space","adjuster",["`","="],"space"],["exoutput","value","expr",["deref",[".","grammar","right"],["`","="]],0]],["parens","$)"],"true"],["function","uhookpostadjust",["lex1","lop1","false","target","adjuster","value"],["=","target",["car","lex1"]],["=","adjuster",["second","lex1"]],["=","value",["third","lex1"]],[["==","value",1],["parens","$("],["exoutput","target","owntuple",0,["deref",[".","grammar","right"],"adjuster"]],["mktok","adjuster","adjuster"],["parens","$)"],"true"]],["function","uhookbreco",["lex1","lop1"],[["identity","lex1"],["mktok","lop1","space","$:",["tostring",["car","lex1"],{dictionary:{$quote:"true",$nonamespace:"true"}}]]],["mktok","lop1"],"true"],["function","uhookreturn",["lex1","lop1"],[["identity","lex1"],["mktok","lop1","space","$("],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","$)"]],["mktok","lop1"],"true"],["function","uhookcond",["lex1","lop1"],["mktok","lop1","$("],["preadjust",[".","sink","procnesting"],"+",1],["exbody","lex1"],["preadjust",[".","sink","procnesting"],"-",1],["mktok","$)"],"true"],["function","uhookloop",["lex1","lop1","false","looptag"],["=","looptag",["pop","lex1"]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1"]],["preadjust",[".","sink","procnesting"],"+",1],["exbody","lex1","true",["not",["cdr","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookwhile",["lex1","lop1","false","flex","looptag"],["=","looptag",["pop","lex1"]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1","space"]],["=","flex",["car","lex1"]],[[["==",["caar","flex"],["`","not"]],["exoutput",["cadar","flex"],"owntuple",0,0,"true"]],["exoutput","flex","owntuple",0,0,"true"]],["preadjust",[".","sink","procnesting"],"+",1],["exbody",["cdr","lex1"],"true",["not",["cddr","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookfor",["lex1","lop1","false","flex","looptag","targex","varex","upbody"],["=","flex",["car","lex1"]],["=","looptag",[".",[".","flex",4],1]],["=","targex",[".",[".",[".","flex",3],2],1]],["=","varex",[".",[".",[".",[".","flex",3],2],2],1]],["=","upbody",[".",[".","flex",4],-4]],[[["identity","looptag"],["mktok","lop1","space","$:",["tostring","looptag",{dictionary:{$quote:"true",$nonamespace:"true"}}],"space"]],["mktok","lop1","space"]],["exoutput","varex","owntuple",0,0,"true"],["mktok","space","$in","space"],["exoutput","targex","owntuple",0,0,"true"],["preadjust",[".","sink","procnesting"],"+",1],["exbody","upbody","true",["not",["cdr","upbody"]]],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookcall",["lex1","lop1","false","callee"],["=","callee",["car","lex1"]],["set.","sink",["`","endprocNL"],"false"],["preadjust",[".","sink","procnesting"],"+",1],["lprAdjust","uhookProc",1],[[["procedure","callee"],["exoutput","callee","owntuple",0,0],["mktokil","space","$("]],["mktokil","lop1","$("],["exoutput","callee","owntuple",0,0],[["not",["empty",["cdr","lex1"]]],["mktok","$,","space"]]],["set.","sink",["`","endprocNL"],"true"],["=","lex1",["cdr","lex1"]],["loop","false",[["empty","lex1"]],["exoutput",["pop","lex1"],"owntuple",0,0],[["empty","lex1"]],["mktok","$,","space"]],["mktokil","$)"],["preadjust",[".","sink","procnesting"],"-",1],"true"],["function","uhookquotient",["lex1","lop1","false","op"],[[["==",["deref",[".","grammar","infix"],["`","/"]],["deref",[".","grammar","infix"],["`","/."]]],["=","op",["`","/"]]],["=","op",["`","/."]]],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,0,"true"],["mktok","space","op","space"],["exoutput",["second","lex1"],"owntuple",["deref",[".","grammar","right"],"op"],0,"true"],["parens","$)"],"true"],["function&","uhookcatch",["lex1","lop1"],["set.","sink",["`","endprocNL"],"false"],["mktok","$try"],["preadjust",[".","sink","procnesting"],"+",1],["exbody",["car","lex1"]],[[["not",["second","lex1"]]],["nextline"],["mktok","$catch"],["exbody",["second","lex1"]]],[[["not",["third","lex1"]]],["nextline"],["mktok","$finally"],["exbody",["third","lex1"]]],["preadjust",[".","sink","procnesting"],"-",1],["set.","sink",["`","endprocNL"],"true"],"true"],["function","uhook.",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"lop1"]],["mktok",["`","."]],["exoutput",["second","lex1"],"owntuple",0,0],[[["not",["empty",["cddr","lex1"]]],["exlist",["caddr","lex1"]]]],["parens","$)"],"true"],["function","uhookset.",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"lop1"]],["mktok",["`","."]],["exoutput",["cadadr","lex1"],"owntuple",0,0],["mktok","space",["`","="],"space"],["exoutput",["third","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"],"true"],["function","uhookset[",["lex1","lop1","false","expr"],["parens","$("],[[["==",["caar","lex1"],["`","@"]],["exannotation","lex1"]],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"$["]],["mktok","$["],["=","expr",["second","lex1"]],[[["||",["empty","expr"],["getproc",["car","expr"]]],["exoutput","expr","owntuple",0,0]],["loop","false",["exoutput",["pop","expr"],"owntuple",0,0],[["empty","expr"]],["mktok","$,"]]],["mktok","$]"]],["mktok","space",["`","="],"space"],["exoutput",["third","lex1"],"owntuple",["deref",[".","grammar","right"],"lop1"],0],["parens","$)"],"true"],["function","uhookderef",["lex1","lop1","false","expr"],["parens","$("],[[["==",["caar","lex1"],["`","@"]],["exannotation","lex1"]],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","left"],"$["]],["mktok","$["],["=","expr",["second","lex1"]],[[["==","lop1",["`","deref"]],["exoutput","expr","owntuple",0,0]],["loop","false",["exoutput",["pop","expr"],"owntuple",0,0],[["atom","expr"]],["mktok","$,"]]],["mktok","$]"]],[[["not",["empty",["cddr","lex1"]]],["exlist",["caddr","lex1"]]]],["parens","$)"],"true"],["function","uhookref*",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,0],["mktok","lop1"],["parens","$)"],"true"],["function","uhooknot",["lex1","lop1"],[[["==",["caar","lex1"],["!",["`","="]]],["return",["uhook=",["cdar","lex1"],["!",["`","="]]]]]],["parens","$("],["mktok","$!"],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","right"],"lop1"]],["parens","$)"],"true"],["function","uhookbang",["lex1","lop1"],["parens","$("],["exoutput",["car","lex1"],"owntuple",0,["deref",[".","grammar","postleft"],"lop1"]],["mktok","$!"],["parens","$)"],"true"],["function","commentInject",["comments","false","newrows","readx","added","acom","type","textlines","text","col"],["function","addcol",["row","str","col"],[".","row","push",[{dictionary:{$str:"str",$column:"col"}}]],"row"],["=","newrows",{array:[]}],["=","readx",0],["=","added",0],["for",["let","lambda",["iter"],["=","iter",["iterate","comments",["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["=","type",[".","acom",2]],["=","col",[".","acom",1]],["=","textlines",[".",[".","acom",3],"split",["$\n"]]],["while","false",[["not",[">",[".","textlines","length"],0]]],["=","text",[".","textlines","shift","false"]],[[["not",[".","acom",0]],[".","newrows","push",[["addcol",{array:[]},"text",[".","acom",1]]]],["preadjust","added","+",1]],["while","false",[["not",["&&",["<",[".","newrows","length"],["+",[".","acom",0],"added"]],["<","readx",[".",[".","sink","rowtokens"],"length"]]]]],[".","newrows","push",[["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]]]]],[[["||",["<=","type",0],[">=","readx",[".",[".","sink","rowtokens"],"length"]]],[".","newrows","push",[["addcol",{array:[]},"text","col"]]],["preadjust","added","+",1]],[[["<","col",[".","options","commentCol"]],["=","col",[".","options","commentCol"]]]],[".","newrows","push",[["addcol",["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]],"text","col"]]],["=","type",0]]]]]]],["while","false",[["not",["<","readx",[".",[".","sink","rowtokens"],"length"]]]],[".","newrows","push",[["deref",[".","sink","rowtokens"],["postadjust","readx","+",1]]]]],["set.","sink",["`","rowtokens"],"newrows"],["set.","sink",["`","row"],[".","newrows","length"]]],["function","commentMap",["false","locmap","nodecount","sourcemap","output","acom","nodeloc"],["function","remap",["expr","nodeloc"],[["atom","expr"],["preadjust","nodecount","+",1],[".","locmap","push",[[".","nodeloc","first"]]]],["=","nodeloc",["deref",[".","sink","tuplemap"],"expr"]],["remap",["car","expr"],"nodeloc"],[["cdr","expr"],["remap",["cdr","expr"],"nodeloc"]]],[[["not",[".","sink","maproot"]],["return","false"]]],["=","locmap",{array:[]}],["=","nodecount",0],["remap",[".","sink","maproot"]],["=","sourcemap",["deref",["@",[".",[".","sink","maproot"],1]],["`","\\.sourcemap"]]],[[["!=",[".","sourcemap","count"],"nodecount"],["debuglog",[".","$sourcemap mismatch in ","concat",[[".",[".","sink","maproot"],1],"$: "]],"nodecount","$vs",[".","sourcemap","count"]]]],["=","output",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sourcemap","comments"],["`","acom"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","acom",[".","iter","$value"]],["=","nodeloc",["deref","locmap",[".","acom",0]]],[".","output","push",[["list",[".","nodeloc",0],[".","nodeloc",1],[".","acom",1],[".","acom",2]]]]]]],"output"],["function","indextuples",["false","remaining"],["function","enqueue",["expr","false","node"],[["atom","expr"],"expr"],["=","node",{dictionary:{$tuple:"expr",$sink:"sink"}}],[".",[".","sink","mirrors"],"push",["node"]],[".","remaining","push",["node"]],["set[",[".","sink","tuplemap"],"expr","node"]],["function","dequeue",["false","node"],["while","false",[["not",[">",[".","remaining","length"],0]]],["=","node",[".","remaining","pop","false"]],["set.","node",["`","car"],["enqueue",["car",[".","node","tuple"]]]],["set.","node",["`","cdr"],["enqueue",["cdr",[".","node","tuple"]]]]]],["=","remaining",{array:[]}],["set.","sink",["`","mirrors"],{array:[]}],["set.","sink",["`","tuplemap"],["new","weakmap"]],["set.","sink",["`","mirroroot"],["enqueue","origexpr"]],["dequeue"]],["function","tuplelocupdate",["false","tuplex","data","rowdex","col","nodemap"],["function","childloc",["node","false","ex1","lex1","loc","retloc"],[[["not",["dictionary","node"]],["return","false"]]],[[["deref","nodemap","node"],["return",["deref","nodemap","node"]]]],["set[","nodemap","node","true"],["=","lex1","node"],["while","false",[["not",["eq",[".","lex1","sink"],"sink"]]],["=","ex1",[".","lex1","car"]],[[["&&",["dictionary","ex1"],["eq",[".","ex1","sink"],"sink"]],["=","loc",["childloc","ex1"]]],["=","loc","false"]],[[["identity","loc"],[[["not",[".","lex1","first"]],["set.","lex1",["`","first"],[".","loc","first"]],["set.","lex1",["`","last"],[".","loc","last"]]],["set.","lex1",["`","first"],["earlier",[".","loc","first"],[".","lex1","first"]]],["set.","lex1",["`","last"],["later",[".","loc","last"],[".","lex1","last"]]]]]],[[["not","retloc"],["=","retloc",{dictionary:{$first:[".","lex1","first"],$last:[".","lex1","last"]}}]],[[[".","lex1","first"],["set.","retloc",["`","first"],["earlier",[".","lex1","first"],[".","retloc","first"]]],["set.","retloc",["`","last"],["later",[".","lex1","last"],[".","retloc","last"]]]]]],["=","lex1",[".","lex1","cdr"]]],["=","lex1","node"],["while","false",[["not",["eq",[".","lex1","sink"],"sink"]]],[[["not",[".","lex1","first"]],["set.","lex1",["`","first"],[".","retloc","first"]],["set.","lex1",["`","last"],[".","retloc","last"]]]],["=","lex1",[".","lex1","cdr"]]],["set[","nodemap","node","retloc"],"retloc"],["=","tuplex",0],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","data",["deref",[".","sink","mirrors"],["postadjust","tuplex","+",1]]],["set.","data",["`","first"],"undefined"]],["=","rowdex",0],["while","false",[["not",["<=","rowdex",[".","sink","row"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowdex"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],["=","data",["deref",[".","sink","tuplemap"],[".","col","tuple"]]],[[["not","data"],["continue"]]],[[["not",[".","data","first"]],["set.","data",["`","first"],["list","rowdex",[".","col","column"]]]]],["set.","data",["`","last"],["list","rowdex",["+",[".","col","column"],["length",[".","col","str"]]]]]]]],["preadjust","rowdex","+",1]],["=","nodemap",["new","weakmap"]],["childloc",[".","sink","mirroroot"]],"true"],["function","indexbps",["false","tuplex","node"],["set.","sink",["`","breaks"],{array:[]}],["=","tuplex",0],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","node",["deref",[".","sink","mirrors"],"tuplex"]],[[[".","node","bp"],[".",[".","sink","breaks"],"push",["node"]]]],["preadjust","tuplex","+",1]],[".",[".","sink","breaks"],"sort",[["function","lambda",["a","b"],["=","compare",["<=>",[".",[".","a","first"],0],[".",[".","b","first"],0]]],[[["==","compare",0],["=","compare",["<=>",[".",[".","a","first"],1],[".",[".","b","first"],1]]]]],"compare"]]]],["function","updatecheck",["false","update","comments"],[[["not",[".","sink","tuplemap"]],["set.","sink",["`","rowtokens"],{array:[{array:[]}]}],["indextuples"],["=","update","true"]]],[[["||",["<",[".",[".","sink","rowtokens"],"length"],1],["&&",["==",[".",[".","sink","rowtokens"],"length"],1],["<",[".",["deref",[".","sink","rowtokens"],0],"length"],1]]],["exoutput","origexpr","origexpr",0,0,"true"]]],[["identity","update"],["tuplelocupdate"],["indexbps"],[[".","sink","maproot"],["=","comments",["commentMap"]],[["identity","comments"],["commentInject","comments"],["tuplelocupdate"]]]]],["set.","unparser",["`","dumptuples"],["function","dumptuples",["false","tuplex","data","bp","mismatch","summary"],["updatecheck"],["=","tuplex",0],["debuglog","$=====tuples====="],["while","false",[["not",["<","tuplex",[".",[".","sink","mirrors"],"length"]]]],["=","data",["deref",[".","sink","mirrors"],"tuplex"]],[[["eq",["deref",[".","sink","tuplemap"],[".","data","tuple"]],"data"],["=","mismatch","$"]],["=","mismatch","$mismatch"]],[[[".","data","bp"],["=","bp","$bp"]],["=","bp","$  "]],["=","summary",[".",["tostring",[".","data","tuple"]],"substr",[0,80]]],["debuglog",["prepad","tuplex",4],["prepad",[".","data","first"],9],["prepad",[".","data","last"],9],"bp","mismatch","summary"],["preadjust","tuplex","+",1]]]],["set.","unparser",["`","dumptokens"],["function","dumptokens",["false","rowdex","data","summary","col"],["updatecheck"],["=","rowdex",0],["debuglog","$=====tokens====="],["while","false",[["not",["<=","rowdex",[".","sink","row"]]]],["debuglog","$row","rowdex"],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],"rowdex"],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],["=","data",["deref",[".","sink","tuplemap"],[".","col","tuple"]]],["=","summary",[".",["tostring",[".","col","tuple"]],"substr",[0,80]]],["debuglog",["prepad",[".","col","column"],6],["prepad",[".","col","str"],9],"$  ","summary"]]]],["preadjust","rowdex","+",1]]]],["set.","unparser",["`","breakpoints"],["function","breakpoints",["false","result","data"],["updatecheck"],["=","result",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sink","breaks"],["`","data"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","data",[".","iter","$value"]],[".","result","push",[{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]]]],"result"]],["set.","unparser",["`","findbreak"],["function","findbreak",["location","false","data"],["updatecheck"],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","sink","breaks"],["`","data"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","data",[".","iter","$value"]],[[["&&",["<=",["car","location"],["car",[".","data","first"]]],["||",["not",["second","location"]],["<=",["second","location"],["second",[".","data","first"]]]]],["return",{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]]]]],"false"]],["set.","unparser",["`","findtoken"],["function","findtoken",["location","false","col"],["updatecheck"],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",[".","sink","rowtokens"],["car","location"]],["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["||",["not",["second","location"]],["&&",[">=",["second","location"],[".","col","column"]],["<",["second","location"],["+",[".","col","column"],["length",[".","col","str"]]]]]],["return",{dictionary:{$first:[".","col","column"],$last:["+",[".","col","column"],["length",[".","col","str"]]],$str:[".","col","str"],$symbol:[".","col","symbol"],$tuple:[".","col","tuple"]}}]]]]]],"false"]],["set.","unparser",["`","findtuple"],["function","findtuple",["expr","false","data"],["updatecheck"],["=","data",["deref",[".","sink","tuplemap"],"expr"]],[["identity","data"],{dictionary:{$first:[".","data","first"],$last:[".","data","last"],$tuple:[".","data","tuple"]}}]]],["set.","unparser",["`","setmarks"],["function","setmarks",["dict","false","mark","marklen"],["set.","sink",["`","maxmarklen"],0],["set.","sink",["`","markdict"],"dict"],["for",["let","lambda",["iter"],["=","iter",["iterate","dict",["`","mark"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","mark",[".","iter","$value"]],["=","marklen",[".",["tostring",["deref","dict","mark"]],"length"]],[[["<",[".","sink","maxmarklen"],"marklen"],["set.","sink",["`","maxmarklen"],"marklen"]]]]]],"dict"]],["set.","unparser",["`","string"],["function","string",["firstloc","lastloc","soptions","false","margin","rowdex","row","col","found","outstr","colpos","lineno","linepad"],["updatecheck"],[[["numeric",[".","soptions","leftMargin"]],["=","margin",[".","space","repeat",[[".","soptions","leftMargin"]]]]],["=","margin","$"]],[[["numeric",[".","soptions","lineNumbers"]],["=","lineno",["toint",[".","soptions","lineNumbers"]]],["=","linepad",["+",["length",["tostring",["+","lineno",[".",[".","sink","rowtokens"],"length"]]]],1]]]],[[["dictionary","firstloc"],["=","lastloc",[".","firstloc","last"]],["=","firstloc",[".","firstloc","first"]]]],[[["identity","firstloc"],[[["not",["apply","numeric","firstloc"]],["return","false"]]],["=","rowdex",["car","firstloc"]],[["identity","lineno"],["preadjust","lineno","+","rowdex"]]],["=","rowdex",0]],["=","found",["not",["&&","firstloc",["second","firstloc"]]]],[[["&&","lastloc",["not",["apply","numeric","lastloc"]]],["return","false"]]],["loop","false",[["||",[">=","rowdex",[".",[".","sink","rowtokens"],"length"]],["&&","lastloc",[">","rowdex",["car","lastloc"]]]]],["=","row",["deref",[".","sink","rowtokens"],"rowdex"]],[[["identity","outstr"],["=","outstr",[".","outstr","concat",["$\n","margin"]]]],["=","outstr","margin"]],[[["identity","lineno"],["=","outstr",[".","outstr","concat",[["prepad","lineno","linepad"],"$ "]]],[[[".","sink","maxmarklen"],[["deref",[".","sink","markdict"],"lineno"],["=","outstr",[".","outstr","concat",[["deref",[".","sink","markdict"],"lineno"],"$ "]]]],["=","outstr",[".","outstr","concat",[[".","space","repeat",[["+",[".","sink","maxmarklen"],1]]]]]]]],["preadjust","lineno","+",1]]],["=","colpos",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["not","found"],["=","colpos",["second","firstloc"]],[[["<=",["+",[".","col","column"],["length",[".","col","str"]]],["second","firstloc"]],["continue"]]],["=","found","true"]]],[["&&","lastloc",["second","lastloc"],[">=","rowdex",["car","lastloc"]],[">=",[".","col","column"],["second","lastloc"]]]],[[["<","colpos",[".","col","column"]],["=","outstr",[".","outstr","concat",[[".","space","repeat",[["-",[".","col","column"],"colpos"]]],[".","col","str"]]]]],["=","outstr",[".","outstr","concat",[[".","col","str"]]]]],["=","colpos",["+",[".","col","column"],["length",[".","col","str"]]]]]]],["preadjust","rowdex","+",1]],"outstr"]],"unparser"]),e._AddPropertyList("LingoUnparseInit",[["$.lingoInit","true"]]),e._SetBindingList("LingoUnparseInit",["function","LingoUnparseInit",["false","manifest"],["=","manifest",["`",["LingoPrinter","LingoUnparser","LingoUnparseInit"]]],[".",[".","Naan","module"],"build",[[".","module","id"],"$Unparse",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],[".",[".","Naan","module"],"letinherit",["$Lib"]],["set.",[".","modobj","exports"],["`","Printer"],"LingoPrinter"],["set.",[".","modobj","exports"],["`","LingoUnparser"],"LingoUnparser"]]]]]),e._Execute(["LingoUnparseInit"]),e._SetNamespace(t.slice(1),!0),e._SetNamespace("CLI"),e._Execute([".",[".","Naan","module"],"letinherit",["$Lang_Lingo"]]),e._SetBindingList("Utils",["closure","Utils",["options","false","utils","registry","upcache"],["=","utils",["new","object","this"]],[[["not","options"],["=","options",{dictionary:{}}]]],[[["not",[".","options","cacheSize"]],["set.","options",["`","cacheSize"],50]]],["=","registry",[".",[".",[".",["modlist"],"Lib"],"exports"],"Registry"]],["set.","utils",["`","calculateDialects"],["function","calculateDialects",["expr","false","nsmap","nslist","ns","dialect","langs"],["function","travProc",["trav"],[[["&&",["symbol","trav"],"trav"],[[["not",["deref","nsmap",[".","trav","namespace"]]],["push",[".","trav","namespace"],"nslist"],["set[","nsmap",[".","trav","namespace"],"true"]]],["return"]]],["while","false",[["not",["tuple","trav"]]],["travProc",["car","trav"]],["=","trav",["cdr","trav"]]]],["=","nsmap",["new","weakmap"]],["travProc","expr"],["for",["let","lambda",["iter"],["=","iter",["iterate","nslist",["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],["=","dialect",[".","registry","findNamespace",["ns"]]],[[["&&","dialect",["not",["member","dialect","langs"]]],["push","dialect","langs"]]]]]],"langs"]],["set.","utils",["`","unparseInfo"],["function","unparseInfo",["expr","false","up"],[[["not","upcache"],["=","upcache",["new","nonce"]],["set.","upcache",["`","map"],["new","weakmap"]],["set.","upcache",["`","lru"],{array:[]}]],["=","up",["deref",[".","upcache","map"],"expr"]],[["&&","up",["!==",["deref","lru",["-",[".","lru","length"],1]],"up"]],["set.","upcache",["`","lru"],[".",[".","upcache","lru"],"filter",[["function","lambda",["entry"],["!==","entry","up"]]]]],[".",[".","upcache","lru"],"push",["up"]]]],[[["not","up"],["=","up",{dictionary:{$expression:"expr",$dialects:[".","utils","calculateDialects",["expr"]]}}],["set.","up",["`","dialect"],[".",[".","up","dialects"],0]],[[["not",[".","up","dialect"]],["set.","up",["`","dialect"],[".","registry","findName",[[".",[".","registry","dialects","false"],0]]]]]],[[[".","up","dialect"],["set.","up",["`","unparser"],[".",[".","up","dialect"],"unparse",["expr"]]]]],["set[",[".","upcache","map"],"expr","up"],[".",[".","upcache","lru"],"push",["up"]],[[">",[".",[".","upcache","lru"],"length"],[".","options","cacheSize"]],["set[",[".","upcache","map"],[".",[".",[".","upcache","lru"],"shift","false"],"expression"],"undefined"]]]],"up"]],["set.","utils",["`","unparser"],["function","unparser",["expr"],[".",["unparseInfo","expr"],"unparser"]]],["set.","utils",["`","sourcelist"],["function","sourcelist",["procdef","start","end","marks","false","up"],["=","up",[".","utils","unparser",["procdef"]]],[".","up","setmarks",["marks"]],[[["identity","start"],["=","start",["list",["-","start",1]]],[["identity","end"],["=","end",["list",["-","end",1]]]],["=","end","start"]]],[".","up","string",["start","end",{dictionary:{$lineNumbers:1}}]]]],["set.","utils",["`","symns"],["function","symns",["name","ns"],[[["symbol","name"],["return","name"]]],[[["not","ns"],["=","ns",[".",["nsactive"],0]]]],[".","ns","lookup",["name"]]]],["set.","utils",["`","findns"],["function","findns",["nstr","false","ns"],[[["not",["string","nstr"]],["return","nstr"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["nsactive"],["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],[[["==","nstr",["namespace","ns"]],["return","ns"]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["nsactive","true"],["`","ns"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ns",[".","iter","$value"]],[[["==","nstr",["namespace","ns"]],["return","ns"]]]]]],"false"]],["set.","utils",["`","makeLocation"],["function","makeLocation",["sym","task","false","start"],[[["identity","task"],["=","tuplespec",[".",[".","utils","unparser",[["getproc","sym"]]],"findtuple",["task"]]],["=","start",["+",[".",[".","tuplespec","first"],0],1]]]],["list",[".",[".","sym","namespace"],"tostring"],"sym","start"]]],["set.","utils",["`","resolveLocation"],["function","resolveLocation",["location","symbols","false","path","procname","procsym","ns","procdef"],["function","pathmatch",["parent","path","false","segment"],[[["empty","path"],["return","parent"]]],["=","segment",["tostring",["pop","path"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",["deref",["@","parent"],["`","\\.children"]],["`","child"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","child",[".","iter","$value"]],[[["==",["tostring","child"],"segment"],["return",["pathmatch","child","path"]]]]]]],"false"],["function","findsym",["name"],["for",["let","lambda",["iter"],["=","iter",["iterate","symbols",["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],[[["==","sym","name"],["return","sym"]]]]]],"false"],["=","path",[".","location",1]],[[["symbol","path"],["=","procsym","path"]],[[["tuple","path"],["=","procname",["car","path"]]],["=","procname","path"]],["=","procsym",["findsym","procname"]],[[["not","procsym"],[[".","location",0],[[["string",[".","location",0]],["=","ns",[".","utils","findns",[[".","location",0]]]]],["=","ns",[".","location",0]]],["=","procsym",[".","utils","symns",["procname","ns"]]]],["=","procsym",["interned","procname"]]]],[["tuple","path"],["=","procsym",["pathmatch","procsym",["cdr","path"]]]]],["=","procdef",["getproc","procsym"]],[[["||",["not",["tuple","procdef"]],["not",["cdddr","procdef"]]],["=","procdef","false"]]],"procdef"]],["set.","utils",["`","breakLocation"],["function","breakLocation",["location","symbols","false","procdef"],["=","procdef",[".","utils","resolveLocation",["location","symbols"]]],[[["not","procdef"],["return"]]],[[".","location",2],[".",[".",[".","utils","unparser",["procdef"]],"findbreak",[["list",["-",[".","location",2],1]]]],"tuple"]],["cdddr","procdef"]]],["set.","utils",["`","locationString"],["function","locationString",["location","false","output"],[[["symbol",[".","location",1]],["=","output",[".","utils","procname",[[".","location",1]]]]],[["tuple",[".","location",1]],["=","output",[".",["new","array",[".","location",1]],"join",["$."]]]],["=","output",["tostring",[".","location",1]]]],[[[".","location",0],["=","output",[".",[".","location",0],"concat",["$::","output"]]]]],[[[".","location",2],["=","output",[".","output","concat",["$:",[".","location",2]]]]]],[[[".","location",3],["=","output",[".","output","concat",["$:",[".","location",3]]]]]],"output"]],["set.","utils",["`","alignColumns"],["function","alignColumns",["lex1","widths","false","ex1"],["function","calcrow",["row","false","col","coldex"],["function","cf",["field","prev","false","width"],["=","width",[".",["tostring","field"],"length"]],[[["<","width","prev"],["=","width","prev"]]],"width"],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[["not",["deref","widths","coldex"]],["set[","widths","coldex",0]]],["set[","widths","coldex",["cf","col",["deref","widths","coldex"]]],["preadjust","coldex","+",1]]]]],["=","widths",{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate","lex1",["`","ex1"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","ex1",[".","iter","$value"]],["calcrow","ex1"]]]],"widths"]],["set.","utils",["`","proclist"],["function","proclist",["name","false","result"],["while","false",[["not","name"]],["=","result",["cons","name","result"]],["=","name",["deref",["@","name"],["`","\\.parent"]]]],"result"]],["set.","utils",["`","procname"],["function","procname",["name"],[".",[".",[".",["proclist","name"],"toarray"],"map",[["function","lambda",["x"],["tostring","x"]]]],"join",["$."]]]],["set.","utils",["`","procstring"],["function","procstring",["proc","false","output","parm"],[[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$()"]]]]],[[["atom",[".","proc",2]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$ ",[".","proc",2]]]]]],["=","output",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",["parm","$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","utils",["`","callstring"],["function","callstring",["proc","dons","false","output","parm","name"],["=","name",["procname",[".","proc",1]]],[[["identity","dons"],["=","name",[".",[".",[".",[".","proc",1],"namespace"],"tostring"],"concat",["$::","name"]]]]],[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],[".","name","concat",["$()"]]],[["atom",[".","proc",2]],[".","name","concat",["space",[".","proc",2]]]],["=","output",[".","name","concat",["$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",[["car","parm"],"$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","utils",["`","getnumargs"],["function","getnumargs",["cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\d+)\\s*$"]]]],[[["identity","args"],["return",["toint",["deref","args",1]]]]],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\d+)\\s*:\\s*(\\d+)\\s*$"]]]],[[["identity","args"],["return",["list",["`","range"],["toint",["deref","args",1]],["toint",["deref","args",2]]]]]],["=","args",[".","cmdargs","match",[["RegExp","$\\d+","$g"]]]],[[["identity","args"],["return",["cons",["`","set"],["totuple",[".","args","map",[["function","lambda",["nstr"],["toint","nstr"]]]]]]]]],"false"]],["set.","utils",["`","getnameargs"],["function","getnameargs",["cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s*$"]]]],[[["identity","args"],["return",["deref","args",1]]]],["=","args",[".","cmdargs","match",[["RegExp","$\\S+","$g"]]]],[[["identity","args"],["return",["totuple","args"]]]],"false"]],["set.","utils",["`","getprocarg"],["function","getprocarg",["cmdargs","false","args","procpath"],["=","args",[".","cmdargs","match",[["RegExp","$^(\\S*::)?([^\\s:]+)(:\\s*\\d*)?(:\\s*\\d*)?\\s*$"]]]],[["identity","args"],["=","procpath",[".",["deref","args",2],"split",["$."]]],[[["==",[".","procpath","length"],1],["=","procpath",[".","procpath",0]]],["=","procpath",["totuple","procpath"]]],["list",[".",["deref","args",1],"substring",[0,["-",[".",["deref","args",1],"length"],2]]],"procpath",["toint",[".",[".",["deref","args",3],"substring",[1]],"trim","false"]],["toint",[".",[".",["deref","args",4],"substring",[1]],"trim","false"]]]],"false"]],"utils"]),e._SetBindingList("Info",["closure","Info",["console","false","info"],["=","info",["new","object","this"]],["set.","info",["`","utils"],["Utils"]],["set.","info",["`","options"],{dictionary:{$indent:4,$wrapMinAmount:29,$wrapMaxCol:79,$maxColWidth:60,$maxSymColWidth:40}}],["function","plist",["itemlist","depth","false","item","first","width"],["=","first","$"],["for",["let","lambda",["iter"],["=","iter",["iterate","itemlist",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","width",[".",["tostring","item"],"length"]],[[["&&",[">",["+","width",[".",[".","console","printloc","false"],1]],[".",[".","info","options"],"wrapMaxCol"]],[">=",[".",[".","console","printloc","false"],1],[".",[".","info","options"],"wrapMinAmount"]]],[".","console","print",["$,\n"]],["=","first",[".","space","repeat",[["*",[".",[".","info","options"],"indent"],"depth"]]]]]],[".","console","print",["first","item"]],["=","first","$, "]]]]],["function","prows",["rows","depth","widths","false","coldex","row"],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],"depth"]]]]],["=","coldex",0],["for",["let","lambda",["iter"],["=","iter",["iterate","row",["`","col"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","col",[".","iter","$value"]],[[[">",[".","col","length"],["deref","widths","coldex"]],[".","console","print",[[".","col","substring",[0,["-",["deref","widths","coldex"],1]]],"$…","space"]]],[".","console","print",["col",[".","space","repeat",[["+",["-",["deref","widths","coldex"],[".","col","length"]],1]]]]]],["preadjust","coldex","+",1]]]],[".","console","newline","false"]]]]],["function","printmods",["onemod","false","modid"],["function","pexports",["mod","false","xid","maxwidth"],[".","console","printline",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$exports:"]],["=","maxwidth",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","exports"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[[["<","maxwidth",[".",["tostring","xid"],"length"]],["=","maxwidth",[".",["tostring","xid"],"length"]]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","exports"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],2]]],"xid",[".","space","repeat",[["-","maxwidth",[".",["tostring","xid"],"length"]]]],"$: "]],[[["symbol",["deref",[".","mod","exports"],"xid"]],[".","console","print",[[".",[".","info","utils"],"procstring",[["getproc",["deref",[".","mod","exports"],"xid"]]]]]]],[".","console","print",[["deref",[".","mod","exports"],"xid"]]]],[".","console","newline","false"]]]]],["function","pcomponents",["mod","false","xid","maxwidth"],["printline",[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$components:"],["=","maxwidth",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","components"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[[["<","maxwidth",[".",["tostring","xid"],"length"]],["=","maxwidth",[".",["tostring","xid"],"length"]]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","mod","components"],["`","xid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","xid",[".","iter","$value"]],[".","console","print",[[".","space","repeat",[["*",[".",[".","info","options"],"indent"],2]]],"xid",[".","space","repeat",[["-","maxwidth",[".",["tostring","xid"],"length"]]]],"$: "]],[[["not",[".",["deref",[".","mod","components"],"xid"],"manifest"]],[".","console","print",["$<empty manifest>"]]],["plist",[".",["deref",[".","mod","components"],"xid"],"manifest"],3]],[".","console","newline","false"]]]]],["function","pdetailmod",["mod"],[".","console","printline",[[".","mod","id"]]],[[["\\.*",[".","mod","exports"]],["pexports","mod"]]],[["\\.*",[".","mod","components"]],["pcomponents","mod"]]],["function","psummarymod",["mod"],[".","console","printline",[[".","mod","id"]]],[[["\\.*",[".","mod","exports"]],[".","console","print",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$exports: "]],["plist",[".","mod","exports"],3],[".","console","newline","false"]]],[["\\.*",[".","mod","components"]],[".","console","print",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],"$components: "]],["plist",[".","mod","components"],3],[".","console","newline","false"]]],[["identity","onemod"],["pdetailmod","onemod"]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".",[".","Naan","module"],"modlist","false"],["`","modid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","modid",[".","iter","$value"]],["psummarymod",["deref",[".",[".","Naan","module"],"modlist","false"],"modid"]]]]]],["function","printsyms",["syms","false","sym","rows","row","coldex","nprops","bound","widths"],["=","rows",["cons",["list","$symbol","$namespace","$value","$procedure","$attr."]]],["for",["let","lambda",["iter"],["=","iter",["iterate","syms",["`","sym"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","sym",[".","iter","$value"]],["=","bound",["getproc","sym"]],[[["tuple","bound"],["=","bound",["tostring",[".","bound",0]]]],[["not","bound"],["=","bound","$"]]],[[["rest","sym"],["=","nprops",["prepad",["length",["rest","sym"]],3]]],["=","nprops","$"]],["push",["list",["tostring","sym"],["namespace",["namespace","sym"]],["tostring",["car","sym"]],"bound","nprops"],"rows"]]]],["=","widths",[".",[".","info","utils"],"alignColumns",["rows"]]],["=","coldex",0],["while","false",[["not",["<","coldex",[".","widths","length"]]]],[[[">",["deref","widths","coldex"],[".",[".","info","options"],"maxSymColWidth"]],["set[","widths","coldex",[".",[".","info","options"],"maxSymColWidth"]]]],["push",[".","$-","repeat",[["deref","widths",["postadjust","coldex","+",1]]]],"row"]],["=","row",["reverse","row"]],["=","rows",["reverse","rows"]],["=","rows",["cons",["car","rows"],"row",["cdr","rows"]]],["prows","rows",1,"widths"]],["set.","info",["`","setDefloc"],["function","setDefloc",["location"],["set.","info",["`","defloc"],"location"]]],["function","getDefproc",["cmdargs","nochain","false","location","procdef"],[[["||",["not","cmdargs"],["==","cmdargs","$"]],["=","location",[".","info","defloc"]],[["identity","nochain"],["=","location",["list",[".","location",0],["car",[".","location",1]]]]]]],[[["not","location"],["=","location",[".",[".","info","utils"],"getprocarg",["cmdargs"]]]]],[[["not","location"],[".","console","printline",['$error: "',"cmdargs",'$" not a valid procedure specification']],["return"]]],["=","procdef",[".",[".","info","utils"],"resolveLocation",["location"]]],[[["not","procdef"],[[["||",["not","cmdargs"],["==","cmdargs","$"]],["=","cmdargs",[".",[".","info","utils"],"locationString",["location"]]]]],[".","console","printline",['$error: procedure "',"cmdargs",'$" not found']],["return","false"]]],["list","location","procdef"]],["set.","info",["`","infoproc"],["function","infoproc",["cmdargs","false","location","procdef","child"],["=",["location","procdef"],["getDefproc","cmdargs","true"]],[[["not","location"],["return"]]],[".","console","printline",[[".",[".","info","utils"],"locationString",["location"]]]],["=","syms",["reverse",["deref",["@",[".","procdef",1]],["`","\\.children"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","syms",["`","child"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","child",[".","iter","$value"]],["=","procdef",["getproc","child"]],[[["not","procdef"],["continue"]]],[".","console","printline",[[".","space","repeat",[[".",[".","info","options"],"indent"]]],[".",[".","info","utils"],"procstring",["procdef"]]]]]]]]],["set.","info",["`","infolist"],["function","infolist",["cmdargs","false","location","procdef","start","end"],["=",["location","procdef"],["getDefproc","cmdargs"]],[[["not","location"],["return"]]],["=","start",[".","location",2]],["=","end",[".","location",3]],[[["&&","start",["not","end"]],["=","end",["+","start",10]]]],[".","console","print",[[".",[".","info","utils"],"sourcelist",["procdef","start","end"]]]]]],["set.","info",["`","infomod"],["function","infomod",["cmdargs","false","modlist","modid","mod"],[[["not","modlist"],["=","modlist",[".",[".","info","utils"],"getnameargs",["cmdargs"]]]]],[["not","modlist"],["printmods"]],[[["string","modlist"],["=","modlist",["list","modlist"]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","modlist",["`","modid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","modid",[".","iter","$value"]],["=","mod",["deref",[".",[".","Naan","module"],"modlist","false"],"modid"]],[[["identity","mod"],["printmods","mod"]],[".","console","printline",['$error: module "',"modid",'$" not found']]]]]]]],["set.","info",["`","infofind"],["function","infofind",["cmdargs","false","args","pattern","ns","found"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s*$"]]]],[[["identity","args"],["=","pattern",["deref","args",1]]],["=","args",[".","cmdargs","match",[["RegExp","$\\S+","$g"]]]],["=","pattern",["deref","args",0]],[["&&",["==",[".","args","length"],3],["==",["deref","args",1],"$in"]],["=","ns",[".",[".","info","utils"],"findns",[["deref","args",2]]]],[["not","ns"],[".","console","printline",['$error: namespace "',["deref","args",2],'$" not found']],["return"]]],[["&&",["==",[".","args","length"],2],["==",["deref","args",1],"$all"]],["=","ns","true"]],[".","console","printline",['$error: cannot interpret "',"cmdargs",'$"']],["return"]],["catch",[[[".","pattern","match",[["RegExp",'$".*"']]],["=","found",["exists",["RegExp",[".","$^","concat",[[".","pattern","slice",[1,-1]],"$$"]]],"ns"]]],["=","found",["exists",["RegExp","pattern","$i"],"ns"]]],[[["identity","true"],[".","console","printline",['$error: regular expression "',"cmdargs",'$" not valid']],["return"]]],"false"],[[["==","ns","true"],["=","locstr","$in all namespaces"]],[["identity","ns"],["=","locstr","$in namespace "]],["=","locstr","$in active namespaces"]],[["identity","found"],[[[">",["length","found"],1],[".","console","print",[["length","found"],"$ symbols "]]],[".","console","print",["$one symbol "]]],[".","console","printline",['$matching "',"pattern",'$" ',"locstr","$:"]],["printsyms","found"]],[".","console","printline",['$no symbols match "',"pattern",'$" ',"locstr"]]]],["set.","info",["`","infofutures"],["function","infofutures",["cmdargs","false","pending","rows","row","item","procstr","waiting","delays","delayms","widths","coldex"],["function","procReference",["procdef","prefix","false","str"],[[["not","prefix"],["=","prefix","$"]]],[["identity","procdef"],[[["&&",["symbol","procdef"],[".","procdef","proc"]],["=","procdef",[".","procdef","proc"]]]],[[["procedure","procdef"],["=","str",[".",[".","info","utils"],"callstring",["procdef","true"]]]],["=","str",[".","procdef","tostring"]]],[".","prefix","concat",["str"]]],"$"],["=","pending",["reverse",["futures"]]],[[["not","pending"],[".","console","printline",["$no futures pending"]],["return"]]],[".","console","printline",[["length","pending"],"$ futures pending:"]],["=","rows",["cons",["list","$start","$count","$delay","$procedures"]]],["for",["let","lambda",["iter"],["=","iter",["iterate","pending",["`","item"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","item",[".","iter","$value"]],["=","procstr",["procReference",[".","item","execute"],"$x "]],["=","waiting",[".","item","waiting"]],[[["==",[".","procstr","length"],0],["=","procstr",["procReference",["pop","waiting"],"$w "]]]],["=","delayms",[".","Math","trunc",[[".","item","delay"]]]],["=","delays",[".","Math","trunc",[["quotient","delayms",1e3]]]],["preadjust","delayms","-",["*","delays",1e3]],["push",["list",[".","item","start"],["prepad",[".","item","count"],4],[".",["tostring","delays"],"concat",["$.",["prepad","delayms",3,"$0"]]],"procstr"],"rows"],["while","false",[["not",["not",["empty","waiting"]]]],["push",["list","$","$","$",["procReference",["pop","waiting"],"$w "]],"rows"]]]]],["=","widths",[".",[".","info","utils"],"alignColumns",["rows"]]],["=","coldex",0],["while","false",[["not",["<","coldex",[".","widths","length"]]]],[[[">",["deref","widths","coldex"],[".",[".","info","options"],"maxColWidth"]],["set[","widths","coldex",[".",[".","info","options"],"maxColWidth"]]]],["push",[".","$-","repeat",[["deref","widths",["postadjust","coldex","+",1]]]],"row"]],["=","row",["reverse","row"]],["=","rows",["reverse","rows"]],["=","rows",["cons",["car","rows"],"row",["cdr","rows"]]],["prows","rows",1,"widths"]]],"info"]),e._AddPropertyList("CliUtilsInit",[["$.lingoInit","true"]]),e._SetBindingList("CliUtilsInit",["function","CliUtilsInit",["false","manifest"],["=","manifest",["`",["CliUtilsPreload","Utils","Info","CliUtilsInit"]]],[".",[".","Naan","module"],"build",["$CLI","$CliUtils",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","Utils"],"Utils"],["set.",[".","modobj","exports"],["`","Info"],"Info"]]]]]),e._Execute(["CliUtilsInit"]),e._SetBindingList("driver_chmods",["function","driver_chmods",["driverob","cmdword","cmdargs"],[".",[".","Naan","module"],"chns",["cmdargs"]]]),e._SetBindingList("driver_debugs",["function","driver_debugs",["driverob","cmdword","cmdargs"],["debugger"]]),e._SetBindingList("driver_helps",["function","driver_helps",["driverob","cmdword","cmdargs","false","text"],["=","text",["call",["let","lambda",["proc"],[["eq","proc","driver_chmods"],"$    /ch[mod]                       - list modules\n    /ch[mod] <module>              - change active module\n"],[["eq","proc","driver_debugs"],"$    /d[ebug]                       - enter debugger\n"],[["eq","proc","driver_helps"],"$    /help                          - display overall help\n    /help <command>                - display help for <command>\n"],[["eq","proc","driver_infos"],["return",["driver_infos","driverob","cmdword","$"]]],[["eq","proc","driver_languages"],"$    /dialect                       - list available dialects\n    /dialect <name>                - change the CLI dialect\n"],[["eq","proc","driver_list"],"$    /list [<namespace>::]<procedure-name>[.<nestedname>]*[:start[:end]]\n"],[["eq","proc","driver_options"],["return",["driver_options","driverob","cmdword","$"]]],[["eq","proc","driver_quit"],"$    /quit                          - decamp / depart / absquatulate\n"],"$About Naan: https://github.com/naanlang/naan#readme\n/commands:\n    /ch[mod]   [<module>]          - change active module\n    /d[ebug]                       - enter debugger\n    /help      [<command>]         - help [command]\n    /i[nfo]    [<topic>]           - info on topic\n    /op[tions]                     - view or modify options\n    /r[estart]                     - restart REPL\n    /q[uit]                        - decamp / depart / absquatulate\n"],["deref","driverCmds","cmdargs"]]],[".",[".","driverob","console"],"print",["text"]]]),e._SetBindingList("driver_infos",["function","driver_infos",["driverob","cmdword","cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".",[".","driverob","console"],"print",["$/info topics:\n    /i[nfo] (f)ind         <regex>                     - find matching symbols in active namespaces\n                           <regex> all | in <namespace>    ...in all or specified namespace\n    /i[nfo] f(u)tures                                  - show pending futures\n    /i[nfo] (m)odules      [<name> [<name> ...]]       - show modules and components\n    /i[nfo] (p)rocedure    <name>                      - summarize a procedure\n"]]],[["||",["==","cmdword","$f"],["==","cmdword","$find"]],[".",[".","driverob","info"],"infofind",["cmdargs"]]],[["||",["==","cmdword","$u"],["==","cmdword","$future"],["==","cmdword","$futures"]],[".",[".","driverob","info"],"infofutures",["cmdargs"]]],[["||",["==","cmdword","$m"],["==","cmdword","$module"],["==","cmdword","$modules"]],[".",[".","driverob","info"],"infomod",["cmdargs"]]],[["||",["==","cmdword","$p"],["==","cmdword","$proc"],["==","cmdword","$procedure"]],[".",[".","driverob","info"],"infoproc",["cmdargs"]]],[".",[".","driverob","console"],"printline",["$info topic ","cmdword","$ not implemented"]]]),e._SetBindingList("driver_languages",["function","driver_languages",["driverob","cmdword","cmdargs","false","dialob"],[["==","cmdword","$dialect"],[["!=","cmdargs","$"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",["cmdargs"]]],[["not","dialob"],[".",[".","driverob","console"],"print",["$unregistered language"]]],["set.","driverob",["`","parse"],[".","dialob","parse"]],["set.","driverob",["`","print"],[".","dialob","print"]],["set.","driverob",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","driverob",["`","dialect"],"dialob"],[".",[".","driverob","console"],"print",["$language is now ","cmdargs"]]],[".",[".","driverob","console"],"print",["$dialects: ",[".",[".",[".",[".","Naan","runtimelib"],"dialect","false"],"toarray"],"join",["space"]]]]]]),e._SetBindingList("driver_list",["function","driver_list",["driverob","cmdword","cmdargs"],[".",[".","driverob","info"],"infolist",["cmdargs"]]]),e._SetBindingList("driver_options",["function","driver_options",["driverob","cmdword","cmdargs","false","args"],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".",[".","driverob","console"],"print",["$/options:\n    /op[tions] [no]prompt            - turn on/off command line prompt\n    /op[tions] [no]blank             - turn on/off blank line before prompt\n"]]],[["==","cmdword","$prompt"],[".","driverob","setOptions",[{dictionary:{$prompt:"true"}}]]],[["==","cmdword","$noprompt"],[".","driverob","setOptions",[{dictionary:{$prompt:"false"}}]]],[["==","cmdword","$blank"],[".","driverob","setOptions",[{dictionary:{$blank:"true"}}]]],[["==","cmdword","$noblank"],[".","driverob","setOptions",[{dictionary:{$blank:"false"}}]]]]),e._SetBindingList("driver_restarts",["function","driver_restarts",["driverob","cmdword","cmdargs"],["return",["`","break"]]]),e._SetBindingList("driver_quits",["function","driver_quits",["driverob","cmdword","cmdargs"],[[".","js","g"],[".",[".","js","r",["$process"]],"exit",[0]]],[[".","js","s"],[".",[".","js","t"],"Terminate","false"]],[[".","js","w"],[".",[".","js","w"],"close","false"]]]),e._SetValue("driverCmds",{dictionary:{$ch:"driver_chmods",$chmod:"driver_chmods",$d:"driver_debugs",$debug:"driver_debugs",$help:"driver_helps",$i:"driver_infos",$info:"driver_infos",$dialect:"driver_languages",$list:"driver_list",$op:"driver_options",$option:"driver_options",$options:"driver_options",$r:"driver_restarts",$restart:"driver_restarts",$q:"driver_quits",$quit:"driver_quits"}}),e._SetBindingList("Driver",["closure","Driver",["welcome","false","driverob","console","dialob","source","emptyflag","endtoken","exop","exconsole"],["=","driverob",["new","object","this"]],["=","driverObject","driverob"],["=","console",["new","textstream"]],["set.","driverob",["`","console"],"console"],["set.","driverob",["`","options"],{dictionary:{$prompt:"false",$blank:"false"}}],["set.","driverob",["`","utils"],["Utils"]],["set.","driverob",["`","info"],["Info","console"]],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],["set.","driverob",["`","parse"],[".","dialob","parse"]],["set.","driverob",["`","print"],[".","dialob","print"]],["set.","driverob",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","driverob",["`","dialect"],"Dialect"],["=","emptyflag",{dictionary:{}}],["function","readline",["false","cc","output"],[[["not",[".","console","readchar"]],["=","console",["new","textstream"]],["set.","driverob",["`","console"],"console"],["set.","driverob",["`","utils"],["Utils"]],["set.","driverob",["`","info"],["Info","console"]]]],["=","output","$"],["while","false",[["not",["=","cc",[".","console","readchar","false"]]]],[".",[".","driverob","waiting"],"reset","false"],["=","output",[".","output","concat",["cc"]]],[[["==","cc","$\n"],["break"]]]],"output"],["function","freshline","false",[["!=",[".",[".","console","printloc","false"],1],0],[".","console","newline","false"]]],["function","driverPrompt",["false","prompt","name"],["freshline"],[[["&&",[".",[".","driverob","options"],"blank"],["!=",["printloc"],["`",[0,0]]]],[".","console","newline","false"]]],["=","name",[".",[".",[".","driverob","dialect"],"name"],"toLowerCase","false"]],["catch",[["=","prompt",["strcat",["namespace",["first",["nsactive"]]],["strcat","$-","name","$> "]]],[".",[".","js","t"],"setPrompt",["prompt"]]],[[["identity","true"],["=","prompt",["strcat","name","$ > "]]]],"false"],"prompt"],["function","parseBuffer",["false","result"],[[["not","source"],["return","emptyflag"]]],["catch",[["=","result",[".","driverob","parse",["source"]]],["=","endtoken",[".","source","tokenlast","false"]],[[["==",[".","source","readready","false"],0],["=","source","false"]]],"result"],[[["and",["==",["tostring",["first","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]],["=","source","false"],"emptyflag"]],"false"]],["function","repl",["false","text","result","expr","cmdword","accum"],["=","exop","false"],["=","exconsole","console"],["loop","repl",[[["not",[".","driverob","waiting"]],["set.","driverob",["`","waiting"],["new","nonce"]]]],["catch",[[[["identity","source"],["freshline"],["=","result",["parseBuffer"]],[["eq","result","emptyflag"],["continue"]]],[["not","exop"],["freshline"],[[["&&",[".",[".","driverob","options"],"prompt"],["==",[".","console","readready","false"],0]],[".","console","print",[["driverPrompt"]]]]],[[["==",[".","console","readready","false"],0],[".",[".","driverob","waiting"],"signal",["true"]]]],["loop","false",["=","text",["readline"]],[[[">",[".","console","readready","false"],0],["while","false",[["not",[">",[".","console","readready","false"],0]]],["=","text",[".","text","concat",[[".","console","readchar","false"]]]]],["=","source",["new","textstream","text"]],["continue","repl"]]],["=","expr",[".","text","match",[["RegExp","$^/([A-Za-z_]+)\\s*(.*)"]]]],[[["identity","expr"],["=","cmdword",["deref","expr",1]],[[["deref","driverCmds","cmdword"],[["eq",["call",["deref","driverCmds","cmdword"],"driverob","cmdword",["deref","expr",2]],["`","break"]],["break","repl"]]],[".","console","printline",['$driver command "/',"cmdword",'$" not understood']]],["continue","repl"]],[["!=",[".",[".","text","trim","false"],"length"],0],["break"]],["continue","repl"]]],["loop","false",["=","source",["new","textstream","text"]],["=","result",["parseBuffer"]],[["not",["eq","result","emptyflag"]]],["=","source","false"],["=","accum","text"],[[[".","text","match",[["RegExp","$^\\s*/[/*]"]]],["continue","repl"]]],[[["not",[".","text","match",[["RegExp","$(;|;>|;;)\\s*$"]]]],["=","source",["new","textstream",[".",[".","text","trim","false"],"concat",["$;\n"]]]],["=","result",["parseBuffer"]],[["not",["||",["eq","result","emptyflag"],[".","result",0]]],["break"]]]],["freshline"],[".","console","print",["$>> "]],["=","text",["readline"]],[[["==",[".","text","trim","false"],"$"],[".","console","print",["$command entry canceled"]],["continue","repl"]]],[[["==",[".","text","slice",[-1]],"$\n"],["=","text",[".","accum","concat",["text"]]]],["=","text",[".","accum","concat",["$\n","text"]]]]]],[[[".","exop","display"],[".","console","printline",[[".","exop","display"]]]]],["=","result",["list","false",[".","exop","expr"]]],["=","endtoken",{dictionary:{$atom:["`",";"]}}],[[[".","exop","ending"],["set.","endtoken",["`","atom"],[".","exop","ending"]]]],["=","exop","false"]],[[[".","result",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","result",0],["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[".","console","printline",[[".","driverob","errorstr",["expr"]]]]]]],["=","source","false"]],[["==",[".","endtoken","atom"],["`",";;"]],["\\$",["evalactive",[".","result",1]]]],["\\$",["evalactive",[".","result",1]]],[["!==","\\$",[".",[".","Naan","local"],"mu"]],["freshline"],[".","console","print",["$$: "]],[["!=",[".","endtoken","atom"],["`",";>"]],[".","console","print",[[".","driverob","print",["\\$"]]]]],[".","console","printq",["\\$"]]]]],[[["==","exception","Driver"]],[["==","exception","driver"],["=","exop","false"],["=","exconsole","false"],["throw","driver"]],[["identity","true"],["=","expr",["tostring",["first","exception"]]],[["==","expr","$debugger"],[".","console","printline",["$==> terminated in debugger"]],["=","exop","false"],["=","exconsole","false"],["throw",["list","internal","$exit"]]],[["==","expr","$internal"],[".","console","printline",["$==> error: ",["second","exception"]]]],[[["&&",["dictionary","exception"],["==",[".","exception","error"],"$Naan Error"]],["=","expr",["ErrorString","exception"]]],["=","expr","exception"]],[".","console","printline",["$==> exception: ","expr"]]]],"false"]]],["set.","driverob",["`","setOptions"],["function","setOptions",["options"],[[["identity","options"],["set.","driverob",["`","options"],["merge",[".","driverob","options"],"options"]]]],[".","driverob","options"]]],["set.","driverob",["`","readready"],["function","readready","false",[".","console","readready","false"]]],["set.","driverob",["`","waitIdle"],["closure","waitIdle",["toMS","false","start","totimer"],[[["not",[".","driverob","waiting"]],["set.","driverob",["`","waiting"],["new","nonce"]]]],["=","start",["milliseconds"]],[[["identity","toMS"],["=","totimer",["future",["function","lambda","false",["=","start","false"]],"toMS"]]]],["while","false",[["not","start"]],[".",[".","driverob","waiting"],"wait","false"],["sleep",10],[[[">",["-",["milliseconds"],"start"],50],["break"]]]],[".","totimer","reset","false"],["!=","start","false"]]],["set.","driverob",["`","execute"],["function","execute",["expr","options"],[[["not","options"],["=","options",{dictionary:{}}]]],["set.","options",["`","expr"],"expr"],[["identity","exconsole"],["=","exop","options"],[".","exconsole","readex",["Driver"]],"true"]]],["set.",[".","Naan","runtimelib"],["`","curdriver"],"curdriver"],["set.",[".","Naan","runtimelib"],["`","exec"],"exec"],[[["identity","welcome"],["set.",[".","driverob","options"],["`","prompt"],"true"],[["==","welcome",100],[".","console","printline",['$Naan REPL - type "/help" for more information']]]]],["repl"]]),e._SetBindingList("curdriver",["function","curdriver","false","driverObject"]),e._SetBindingList("exec",["function","exec",["expr","options"],[".","driverObject","execute",["expr","options"]]]),e._SetBindingList("DriverInstall",["function","DriverInstall",["false","curnsactive"],["=","curnsactive",["nsactive"]],["sudo",["nsactive",["list",[".",["nsactive","true"],1]]]],["copyproc",["compress","$driver"],"Driver"],["sudo",["nsactive","curnsactive"]],["throw",["`","driver"]]]),e._AddPropertyList("DriverInit",[["$.lingoInit","true"]]),e._SetBindingList("DriverInit",["function","DriverInit",["false","manifest"],["=","manifest",["`",["driverObject","driver_chmods","driver_debugs","driver_helps","driver_infos","driver_languages","driver_list","driver_options","driver_restarts","driver_quits","driverCmds","Driver","curdriver","exec","DriverInstall","DriverInit"]]],[".",[".","Naan","module"],"build",["$CLI","$Driver",["function","lambda",["modobj","compobj"],[".",[".","Naan","module"],"require",["$Lib/RuntimeLib.nlg"]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DriverInstall"],"DriverInstall"]]]]]),e._Execute(["DriverInit"]),e._CopyBinding("Driver","driver"),e._SetBindingList("DebuggerREPL",["closure","DebuggerREPL",["debug","false","commander","console","dialob","lastCmd"],["=","commander",["new","object","this"]],["=","console",["new","textstream"]],["set.","commander",["`","console"],"console"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],["set.","commander",["`","parse"],[".","dialob","parse"]],["set.","commander",["`","print"],[".","dialob","print"]],["set.","commander",["`","errorstr"],[".","dialob","parseErrorString"]],["set.","commander",["`","utils"],["Utils"]],["set.","commander",["`","info"],["Info","console"]],["set.","commander",["`","catch"],"false"],["set.","commander",["`","breakpoints"],{dictionary:{}}],["function","frameDict",["frame","false","proctask","location","markdict"],["=","proctask",[".","debug","frameProcTask",["frame"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","frame",3],1],[".","proctask",1]]]],[[[".","location",2],["=","markdict",{dictionary:{}}],["set[","markdict",[".","location",2],"$--\x3e"]]],"markdict"],["function","frameProc",["frame","false","proctask","location"],["=","proctask",[".","debug","frameProcTask",["frame"]]],[["identity","proctask"],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".","proctask",1]]]],[".",["tostring",[".",[".","proctask",0],0]],"concat",["space",[".",[".","commander","utils"],"locationString",["location"]]]]]],["function","initconsole","false",[["not","console"],["=","console",["new","textstream"]],["set.","commander",["`","console"],"console"],["set.","commander",["`","utils"],["Utils","console"]],["set.","commander",["`","info"],["Info","console"]]]],["function","readline",["crok","false","cc","output"],["initconsole"],[[["identity","crok"],["=","output","$"]],["while","false",[["not",["==",["=","cc",[".","console","readchar","false"]],"$\n"]]]],["=","output","cc"]],["while","false",[["not",["&&",["!=",["=","cc",[".","console","readchar","false"]],"$\n"],"cc"]]],["=","output",[".","output","concat",["cc"]]]],"output"],["function","driverprompt",["false","prompt"],["catch",[["=","prompt",["strcat","$(ndb-",[".","debug","depth","false"],"$) "]],[".",[".","js","t"],"setPrompt",["prompt"]]],[[["identity","true"],["=","prompt","$(ndb)"]]],"false"],"prompt"],["function","freshline","false",["initconsole"],[["!=",[".",[".","console","printloc","false"],1],0],[".","console","newline","false"]]],["set.","commander",["`","parseText"],["function","parseText",["cmdargs","false","error","expr"],["catch",[["=","source",["new","textstream",[".","cmdargs","concat",["$ ;"]]]],[".","source","setsymbols",[[".","commander","localist",[["deref",[".","commander","frames"],[".","commander","focus"]]]]]],["=",["error","expr"],[".","commander","parse",["source"]]]],[[["identity","true"]]],"false"],[[["identity","error"],["for",["let","lambda",["iter"],["=","iter",["iterate","error",["`","expr"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","expr",[".","iter","$value"]],[".","console","printline",[[".","commander","errorstr",["expr"]]]]]]],["=","expr","false"]]],"expr"]],["set.","commander",["`","getprocarg"],["function","getprocarg",["text","false","args","expr","result","location"],["=","args",[".","text","match",[["RegExp","$^([^:]+)(:\\s*\\d*)?(:\\s*\\d*)?\\s*$"]]]],[[["&&",[">",[".","args","length"],1],["=","expr",[".","commander","parseText",[["deref","args",1]]]]],["catch",[["=","result",["eval","expr"]],[["procedure","result"],["=","result",[".","result",1]]],[["symbol","result"],["=","result",[".",[".","result","proc"],1]]],["=","result","false"]],[[["identity","true"],["=","result","false"]]],"false"],[["identity","result"],["=","location",["list",[".",[".","result","namespace"],"tostring"],"result",["toint",[".",[".",["deref","args",2],"substring",[1]],"trim","false"]],["toint",[".",[".",["deref","args",3],"substring",[1]],"trim","false"]]]]]]],[[["not","location"],["=","location",[".",[".","commander","utils"],"getprocarg",["text"]]]]],"location"]],["function","breakHit",["where","value","false","firstid","location","entry","result","sourceline"],["=","firstid",1],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","bpid",["toint","bpid"]],[[["==","firstid","bpid"],["=","firstid",["+","bpid",1]]]],[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],[".","where","task"]],["=","firstid","bpid"]]]]],[[["not",["deref",[".","commander","breakpoints"],"firstid"]],["breakpoint",[".","where","task"],"undefined"],[".","debug","resume","false"],["return","true"]]],["=","entry",["deref",[".","commander","breakpoints"],"firstid"]],["preadjust",[".","entry","hitcount"],"+",1],[[[".","entry","conditional"],[[["procedure",[".","entry","conditional"]],["=","result",["call",[".","entry","conditional"],[".","entry","hitcount"],[".","entry","value"]]]],["=","result",["eval",[".","entry","conditional"]]]],[["not","result"],[".","debug","resume","false"],["return","true"]]]],[".","console","printline",["$Breakpoint ","firstid","$ at ",[".",[".","commander","utils"],"locationString",[[".","entry","location"]]],"$ with value ","value"]],[[["not",[".","entry","sourced"]],["set.","entry",["`","sourced"],"true"],[[[".",[".","entry","location"],2],["=","sourceline",[".",[".","commander","utils"],"sourcelist",[[".","entry","procdef"],[".",[".","entry","location"],2],[".",[".","entry","location"],2]]]]],["=","sourceline",["tostring",["car",[".","where","task"]]]]],[".","console","printline",["$    ","sourceline"]]]],"false"],["function","stepHit",["dict","false","procdef","location","sourceline"],["=","procdef",[".","debug","insideProc","false"]],[[["not","procdef"],[".","console","printline",["$Stepped to unknown location: ",[".","dict","task"]]],["return","false"]]],[[["member",[".",[".","procdef",1],"namespace"],[".","debug","nshidden"]],[".","debug","stepup","false"],["return","true"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".","procdef",1],[".","dict","task"]]]],[".",[".","commander","info"],"setDefloc",["location"]],[".","console","printline",["$Stepped to ",[".",[".","commander","utils"],"locationString",["location"]],"$ with value ",[".","dict","value"]]],[[["!=",[".","dict","state"],"$task"],["=","sourceline","$[end of body]"]],[[".","location",2],["=","sourceline",[".",[".","commander","utils"],"sourcelist",["procdef",[".","location",2],[".","location",2]]]]],["=","sourceline","$unknown line"]],[".","console","printline",["$    ","sourceline"]],"false"],["function","exceptionHit",["except","false","exceptstr","proctask","location"],[[["||",["not",[".","commander","catch"]],["&&",["tuple",[".","commander","catch"]],["not",["eval",[".","commander","catch"]]]]],["return","true"]]],["freshline"],["=","exceptstr",[".","debug","startExcept"]],[[["&&",["dictionary","exceptstr"],["==",[".","exceptstr","error"],"$Naan Error"]],["=","exceptstr",["ErrorString","exceptstr"]]]],[".","console","printline",["$==> Entering debugger on exception: ","exceptstr"]],["=","proctask",[".","debug","frameProcTask",["false"]]],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".",[".","proctask",1],0]]]],[[["&&","proctask","location"],[".","console","printline",[[".",[".","commander","utils"],"locationString",["location"]]]],[[".","location",2],[".","console","printline",["$    ",[".",[".","commander","utils"],"sourcelist",[[".","proctask",0],[".","location",2],[".","location",2]]]]]]]],"false"],["set.","commander",["`","updateDefproc"],["function","updateDefproc",["frame","false","proctask","location"],["=","proctask",[".","debug","frameProcTask",["frame"]]],[[["identity","proctask"],["=","location",[".",[".","commander","utils"],"makeLocation",[[".",[".","proctask",0],1],[".",[".","proctask",1],0]]]]]],[".",[".","commander","info"],"setDefloc",["location"]]]],["function","findCommand",["text","false","cmd","found"],[["deref","debugCmds","text"],"text"],["for",["let","lambda",["iter"],["=","iter",["iterate","debugCmds",["`","cmd"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","cmd",[".","iter","$value"]],[[[".","cmd","startsWith",["text"]],[["identity","found"],["return","false"]],["=","found","cmd"]]]]]],"found"],["set.","commander",["`","entering"],["function","entering","false",["textstreams",["`",["false","false"]]]]],["set.","commander",["`","pauser"],["function","pauser",["entry","arg1","arg2","arg3","false","cmd","cmdword","proc1"],["updateDefproc","false"],["initconsole"],[[["==","entry","$startpause"],[[["atom","arg1"],[".","console","printline",["$can't debug atoms like: \"","arg1",'$"']],["return"]]],["freshline"],[".","console","printline",["$debugger paused before eval: ","arg1"]]],[["==","entry","$breakpoint"],[["breakHit","arg1","arg2"],["return"]]],[["==","entry","$steptrap"],[["stepHit","arg1"],["return"]]],[["==","entry","$startfail"],["freshline"],[".","console","printline",["$debugger could not pause before eval"]]],[["==","entry","$escape"],[".","console","printline",["$^C"]]],[["==","entry","$exception"],[["exceptionHit","arg1"],["return"]]],[["==","entry","$"]],["freshline"],[".","console","printline",['$debugger entry type "',"entry",'$" not known']]],["set.","commander",["`","frames"],{array:[]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","debug","frames"],["`","frame"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","frame",[".","iter","$value"]],[[["procedure","frame"],["=","proc1","true"]]],[[["&&",["!=",[".","frame",0],["`","body"]],["||",["not","proc1"],["!=",[".","frame",0],["`","loop"]]]],[".",[".","commander","frames"],"push",["frame"]]]]]]],["set.","commander",["`","focus"],0],[".","console","readex",["false"]],["loop","false",["catch",[["freshline"],[".","console","print",[["driverprompt"]]],["=","cmd",["readline","true"]],["=","cmd",[".","cmd","match",[["RegExp","$(\\S+)\\s*(.*)"]]]],[[["not","cmd"],[[["||",["not","lastCmd"],["not",["eq",["deref","debugCmds",["deref","lastCmd",1]],"debug_execs"]]],["continue"]]],["=","cmd","lastCmd"]]],["=","lastCmd","cmd"],["=","cmdword",["findCommand",["deref","cmd",1]]],[[["deref","debugCmds","cmdword"],[["eq",["call",["deref","debugCmds","cmdword"],"cmdword",["deref","cmd",2],"commander","debug"],["`","break"]],["return"]]],[".","console","printline",['$debugger command "',["deref","cmd",1],'$" is undefined or ambiguous']]]],[[["==","exception","DebuggerREPL"],["return","false"]],[["!=","exception","debugger"],[".","console","printline",["$debugger caught: ","exception"]],"false"]],"false"]]]],["set.","commander",["`","endPauser"],["function","endPauser","false",[".","console","readex",["DebuggerREPL"]]]],["set.","commander",["`","procstring"],["function","procstr",["proc","false","output","parm"],[[["||",["not",[".","proc",2]],["not",["car",[".","proc",2]]]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$()"]]]]],[[["atom",[".","proc",2]],["return",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$ ",[".","proc",2]]]]]],["=","output",[".",["tostring",[".","proc",0]],"concat",["$ ",[".","proc",1],"$("]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","proc",2],["`","parm"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","parm",[".","iter","$value"]],[["not","parm"]],["=","output",[".","output","concat",["parm","$, "]]]]]],["=","output",[".","output","slice",[0,-2]]],[".","output","concat",["$)"]]]],["set.","commander",["`","localist"],["function","localist",["frame","false","symbols"],[[["not",["procedure","frame"]],["return","false"]]],["call",["function","scope",["parent","false","lex1","ex1","proc"],["while","false",[["not","parent"]],["=","proc",["getproc","parent"]],["=","lex1",["third","proc"]],[[["atom","lex1"],["push","lex1","symbols"]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["identity","ex1"],["push","ex1","symbols"]]]]],["push","parent","symbols"],["=","lex1",["deref",["@","parent"],["`","\\.children"]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["&&","ex1",["not",["member","ex1","symbols"]]],["push","ex1","symbols"]]]],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]]],[".",[".","frame",3],1]],["reverse","symbols"]]],["set.","commander",["`","exprstr"],["function","exprstr",["expr","false","condexpr"],[[["not","expr"],["return","$"]]],["=","condexpr",[".",[".","commander","utils"],"sourcelist",["expr"]]],["=","condexpr",[".","condexpr","replace",[["RegExp","$^ *\\d+","$mg"],"$"]]],["=","condexpr",[".","condexpr","replace",[["RegExp","$[\\s\\n\\r]{2,}","$mg"],"$ "]]],[".","condexpr","trim","false"]]],["set.","commander",["`","printlocals"],["function","printlocals",["frame","uopts","false","uopt","widths","header","begun"],["=","options",{dictionary:{$indent:4,$header:"false",$parents:"true",$trim:"false",$maxstr:30}}],["for",["let","lambda",["iter"],["=","iter",["iterate","uopts",["`","uopt"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","uopt",[".","iter","$value"]],["set[","options","uopt",["deref","uopts","uopt"]]]]],["=","header",["list","$symbol","$value","$previous"]],["function","calc1",["lex1","false","ex1"],["function","calcitem",["item"],["function","cf",["field","prev","false","width"],["=","width",[".",["tostring","field",{dictionary:{$quote:"true"}}],"length"]],[[[">","width",[".","options","maxstr"]],["=","width",[".","options","maxstr"]]]],[[["<","width","prev"],["=","width","prev"]]],"width"],["set[","widths",0,["cf",["first","item"],["deref","widths",0]]],["set[","widths",1,["cf",["second","item"],["deref","widths",1]]],[["cddr","item"],["set[","widths",2,["cf",["third","item"],["deref","widths",2]]]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[[["not","widths"],["=","widths",{array:[0,0,0]}],[[".","options","header"],["calcitem","header"]]]],["calcitem","ex1"]]]]],["function","print1",["lex1","nameline","false","ex1"],["function","printitem",["item"],["function","pf",["field","width","false","fwidth"],["=","field",["tostring","field",{dictionary:{$quote:"true"}}]],["=","fwidth",[".","field","length"]],[[[">","fwidth",[".","options","maxstr"]],["=","fwidth",[".","options","maxstr"]],["=","field",[".","field","substring",[0,"fwidth"]]]]],[".","console","print",["field",[".","space","repeat",[["-","width","fwidth"]]]]]],[".","console","print",[[".","$ ","repeat",[[".","options","indent"]]]]],["pf",["first","item"],["deref","widths",0]],[".","console","print",["$ "]],["pf",["second","item"],["deref","widths",1]],[[["&&",["cddr","item"],[">",["deref","widths",2],0]],[".","console","print",["$ "]],["pf",["third","item"],["deref","widths",2]]]],[".","console","newline","false"]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[[["not","begun"],[[[".","options","header"],["printitem","header"],["printitem",["list",[".","$-","repeat",[["deref","widths",0]]],[".","$-","repeat",[["deref","widths",1]]],[".","$-","repeat",[["deref","widths",2]]]]]]],["=","begun","true"]]],[[["identity","nameline"],[".","console","printline",["nameline"]],["=","nameline","false"]]],["printitem","ex1"]]]]],["function","printer",["false","procsym","procname","parent","proc","params","parents"],["calc1",["third","frame"]],["=","procsym",[".",[".","frame",3],1]],["=","parent",["deref",["@","procsym"],["`","\\.parent"]]],["while","false",[["not","parent"]],["=","proc",["getproc","parent"]],["=","lex1",["third","proc"]],[[["atom","lex1"],["=","params",["push",["list","lex1",["first","lex1"]],"params"]]],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["&&",[".","options","trim"],["not",["within","ex1",[".","frame",3]]]],["continue"]]],[[["identity","ex1"],["push",["list","ex1",["first","ex1"]],"params"]]]]],["calc1","params"],["push","params","parents"],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]],["=","parents",["reverse","parents"]],["push",["third","frame"],"parents"],["=","parent","procsym"],["while","false",[["not","parent"]],[[["identity","begun"],["=","procname","$"]],["=","procname",[".","procname","concat",["$\n"]]]],["=","proc",["getproc","parent"]],["=","procname",[".","procname","concat",[["first","proc"],"space",["tostring",["namespace","parent"]],"$::",[".","debug","procname",["parent"]]]]],["print1",["pop","parents"],"procname"],["=","parent",["deref",["@","parent"],["`","\\.parent"]]]]],[["procedure","frame"],["printer"]]]],["set.","commander",["`","printframe"],["function","printframe",["frame","false","procstr"],["function","printparms",["lex1","false","ex1"],["loop","false",[["empty","lex1"]],["=","ex1",["pop","lex1"]],[[["first","ex1"],[".","console","print",["$  ",["first","ex1"],"$: ",["second","ex1"],"$ (",["third","ex1"],"$)"]],[".","console","newline","false"]]]]],[["member",["first","frame"],["`",["let","let","&"]]],[".","console","print",[["first","frame"]]],[".","console","newline","false"],[".","console","printparms",[["third","frame"]]],[".","console","print",["$-----------"]],[".","console","newline",[2]],[".","console","print",[[".",[".","commander","utils"],"sourcelist",[[".","frame",3],"false","false",["frameDict","frame"]]]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","builtin"]],[".","console","print",[["first","frame"]]],[".","console","newline","false"],[".","console","print",[["second","frame"]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","interrupt"]],[".","console","print",[["first","frame"],"$ ",["third","frame"],"$ in ",["second","frame"]]],[".","console","newline","false"],[".","console","print",["$exec: ",[".","frame",3]]],[".","console","newline",[2]]],[["procedure","frame"],[".","commander","printlocals",["frame",{dictionary:{$trim:"true"}}]],[".","console","print",["$-----------"]],[".","console","newline",[2]],[".","console","print",[[".",[".","commander","utils"],"sourcelist",[[".","frame",3],"false","false",["frameDict","frame"]]]]],[".","console","newline",[2]]],[["==",["first","frame"],["`","catch"]],[".","console","print",[["first","frame"]]],["=","procstr",["frameProc","frame"]],[[["identity","procstr"],[".","console","newline","false"],[".","console","print",["procstr"]]]],[".","console","newline",[2]]],[".","console","print",["$frame type:",["first","frame"]]],[".","console","newline",[2]]]],["set.","commander",["`","printframedivider"],["function","printframedivider",["frameno","false","header","trailer"],["=","header",[".","$============ Frame #","concat",["frameno","$ ==========="]]],["=","trailer","$================================"],[["not","frameno"],[".","console","printline",["trailer"]]],[".","console","printline",[[".","header","slice",[["length","frameno"]]]]]]],["set.","commander",["`","breakGlobalEnable"],["function","breakGlobalEnable",["enable"],[".","debug","breakGlobalAble",["enable"]]]],["set.","commander",["`","breakAdd"],["function","breakAdd",["location","expr","false","task","firstid","bpdict","procdef","exprstr"],["=","procdef",[".",[".","commander","utils"],"resolveLocation",["location"]]],[[["not","procdef"],[".","console","printline",["$ndb: can't find procedure ",[".",[".","commander","utils"],"locationString",["location"]]]],["return","false"]]],[[["not",[".","location",0]],["=","location",["cons",[".",[".",[".","procdef",1],"namespace"],"tostring"],["cdr","location"]]]]],[[["not",["integer",[".","location",2]]],["=","location",["list",[".","location",0],[".","location",1],1]]],[[".","location",3],["=","location",["list",[".","location",0],[".","location",1],[".","location",2]]]]],["=","task",[".",[".","commander","utils"],"breakLocation",["location"]]],[[["not","task"],[".","console","printline",["$ndb: can't find location ",[".",[".","commander","utils"],"locationString",["location"]]]],["return","false"]]],["=","firstid",1],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","bpid",["toint","bpid"]],[[["==","firstid","bpid"],["=","firstid",["+","bpid",1]]]],[[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],"task"],[".","console","printline",["$ndb: breakpoint ","bpid","$ already exists"]],["return","false"]]]]]],["=","bpdict",["breakpoint","task"]],[[["identity","bpdict"],[["eq",[".","bpdict","proc"],[".","debug","debugBlock"]],[".","console","printline",["$ndb: warning: closure breakpoints would conflict"]],["return","false"]],[".","console","printline",["$ndb: warning: overwriting breakpoint from different debugger"]]]],["=","bpdict",["breakpoint","task",[".","debug","debugBlock"]]],[[["not","bpdict"],[".","console","printline",["$ndb: cannot add that breakpoint"]],["return","false"]]],["set.","bpdict",["`","breakID"],"firstid"],["set[",[".","commander","breakpoints"],"firstid",{dictionary:{$location:"location",$procdef:"procdef",$where:"bpdict",$hitcount:0,$conditional:"expr"}}],[[["identity","expr"],["=","exprstr","$ (conditional)"]],["=","exprstr","$"]],[".","console","printline",["$breakpoint ","firstid","$ at ",[".",[".","commander","utils"],"locationString",["location"]],"exprstr"]],[[["not",[".","debug","bpenable"]],[".","console","printline",["$ndb: warning: breakpoints currently disabled"]]]],"firstid"]],["set.","commander",["`","breakClear"],["function","breakClear",["location","false","task"],["=","task",[".",[".","commander","utils"],"breakLocation",["location"]]],[[["not","task"],["return","false"]]],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],[[["eq",[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"task"],"task"],["breakpoint","task","undefined"],[".","console","printline",["$breakpoint ","bpid","$ at ",[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"bpid"],"location"]]],"$ cleared"]],["set[",[".","commander","breakpoints"],"bpid","undefined"],["return"]]]]]],[".","console","printline",["$ndb: breakpoint not found for ",[".",[".","commander","utils"],"locationString",["location"]]]]]],["set.","commander",["`","breakDelete"],["function","breakDelete",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]],["return","false"]]],["breakpoint",[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"task"],"undefined"],[".","console","printline",["$breakpoint ","breaknum","$ at ",[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"breaknum"],"location"]]],"$ deleted"]],["set[",[".","commander","breakpoints"],"breaknum","undefined"]]],["set.","commander",["`","breakDisable"],["function","breakDisable",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]]]],[[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"enable"],["set.",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],["`","enable"],"false"],[".","console","printline",["$ndb: breakpoint ","breaknum","$ disabled"]]]]],["set.","commander",["`","breakEnable"],["function","breakEnable",["breaknum"],[[["not",["deref",[".","commander","breakpoints"],"breaknum"]],[".","console","printline",["$ndb: breakpoint ","breaknum","$ does not exist"]]]],[["not",[".",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],"enable"]],["set.",[".",["deref",[".","commander","breakpoints"],"breaknum"],"where"],["`","enable"],"true"],[".","console","printline",["$ndb: breakpoint ","breaknum","$ enabled"]]]]],["set.","commander",["`","breakList"],["function","breakList",["false","rows","counts","rowdex","coldex"],[[["==",["length",[".","commander","breakpoints"]],0],[".","console","printline",["$no breakpoints"]],["return"]]],["=","rows",{array:[]}],["=","counts",{array:[]}],["set[","rows",0,{array:["$num","$enable","$count","$location","$condition"]}],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","breakpoints"],["`","bpid"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","bpid",[".","iter","$value"]],["=","rowdex",["+",-1,[".","rows","push",[{array:["bpid","$N",[".",["deref",[".","commander","breakpoints"],"bpid"],"hitcount"],[".",[".","commander","utils"],"locationString",[[".",["deref",[".","commander","breakpoints"],"bpid"],"location"]]],[".","commander","exprstr",[[".",["deref",[".","commander","breakpoints"],"bpid"],"conditional"]]]]}]]]],[[[".",[".",["deref",[".","commander","breakpoints"],"bpid"],"where"],"enable"],["set[",["deref","rows","rowdex"],1,"$Y"]]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],["=","coldex",0],["while","false",[["not",["<=","coldex",4]]],[[["||",["not",["deref","counts","coldex"]],["<",["deref","counts","coldex"],[".",["deref","row","coldex"],"length"]]],["set[","counts","coldex",[".",["deref","row","coldex"],"length"]]]],["preadjust","coldex","+",1]]]]],["for",["let","lambda",["iter"],["=","iter",["iterate","rows",["`","row"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","row",[".","iter","$value"]],[".","console","print",[["prepad",["deref","row",0],["deref","counts",0]]]],[".","console","print",[["prepad",["deref","row",1],["+",["deref","counts",1],1]]]],[".","console","print",[["prepad",["deref","row",2],["+",["deref","counts",2],1]]]],[".","console","print",["$  ",["deref","row",3],[".","space","repeat",[["-",["deref","counts",3],[".",["deref","row",3],"length"]]]]]],[[["deref","row",4],[".","console","print",["$ ",["deref","row",4]]]]],[".","console","newline","false"],[[[">","coldex",0],["=","coldex",0],[".","console","print",[["prepad","$",["deref","counts",0],"$-"]]],[".","console","print",["$ ",["prepad","$",["deref","counts",1],"$-"]]],[".","console","print",["$ ",["prepad","$",["deref","counts",2],"$-"]]],[".","console","print",["$  ",[".","$-","repeat",[["deref","counts",3]]]]],[".","console","printline",["$ ",[".","$-","repeat",[["deref","counts",4]]]]]]]]]]]],["=","debugCmds",{dictionary:{$b:"debug_breaks",$break:"debug_breaks",$clear:"debug_breaks",$delete:"debug_breaks",$disable:"debug_breaks",$enable:"debug_breaks",$catch:"debug_exceptions",$c:"debug_execs",$continue:"debug_execs",$f:"debug_execs",$finish:"debug_execs",$n:"debug_execs",$next:"debug_execs",$s:"debug_execs",$step:"debug_execs",$eval:"debug_evals",$p:"debug_evals",$print:"debug_evals",$pp:"debug_evals",$help:"debug_helps",$i:"debug_infos",$info:"debug_infos",$list:"debug_list",$bt:"debug_stacks",$backtrace:"debug_stacks",$frame:"debug_stacks",$scope:"debug_stacks",$up:"debug_stacks",$down:"debug_stacks",$q:"debug_quit",$quit:"debug_quit"}}],"commander"]),e._SetBindingList("debug_breaks",["function","debug_breaks",["cmdword","cmdargs","commander","debug","false","console","args","expr","location","breaknum"],["=","console",[".","commander","console"]],[["==",[".","cmdword","charAt",[0]],"$b"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*(\\S+)\\s+if\\s+(\\S+.*)\\s*$"]]]],[[["identity","args"],["=","location",[".","commander","getprocarg",[["deref","args",1]]]],["=","expr",[".","commander","parseText",[["deref","args",2]]]],[["not","expr"],["return",[".","console","print",["$ndb: conditional breakpoint expression not understood"]]]]],["=","location",[".","commander","getprocarg",["cmdargs"]]]],[[["not","location"],["return",[".","console","print",["$ndb: please specify a valid procedure"]]]]],[".","commander","breakAdd",["location","expr"]]],[["==","cmdword","$clear"],["=","location",[".","commander","getprocarg",["cmdargs"]]],[[["not","location"],["return",[".","console","print",["$ndb: please specify a valid procedure"]]]],[["numeric",["toint",[".","location",1]]],["return",[".","console","print",["$ndb: please specify a procedure (or use delete <number>)"]]]]],[".","commander","breakClear",["location"]]],[["||",["==","cmdword","$delete"],["==","cmdword","$disable"],["==","cmdword","$enable"]],["=","breaknum",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["||",["==","cmdargs","$"],["==",[".","cmdargs","toLowerCase","false"],"$all"]],[["==","cmdword","$enable"],[".","console","printline",["$breakpoints enabled"]],["return",[".","commander","breakGlobalEnable",["true"]]]],[["==","cmdword","$disable"],[".","console","printline",["$breakpoints disabled"]],["return",[".","commander","breakGlobalEnable",["false"]]]]]],[[["||",["not","breaknum"],["&&",["not",["numeric","breaknum"]],["!=",["pop","breaknum"],["`","set"]]]],["return",[".","console","print",["$ndb: please specify breakpoint number(s)"]]]]],["loop","false",[[["numeric","breaknum"],["=","expr","breaknum"],["=","breaknum","false"]],[["empty","breaknum"],["break"]],["=","expr",["pop","breaknum"]]],[[["==","cmdword","$delete"],[".","commander","breakDelete",["expr"]]],[["==","cmdword","$disable"],[".","commander","breakDisable",["expr"]]],[".","commander","breakEnable",["expr"]]]]]]),e._SetBindingList("debug_exceptions",["function","debug_exceptions",["cmdword","cmdargs","commander","debug","nsteps","false","console","args","expr"],["=","console",[".","commander","console"]],[[["==","cmdargs","$disable"],["set.","commander",["`","catch"],"false"]],[["||",["==","cmdargs","$enable"],["==","cmdargs","$all"]],["set.","commander",["`","catch"],"true"]],[["!=","cmdargs","$"],["=","args",[".","cmdargs","match",[["RegExp","$^\\s*if\\s+(\\S+.*)\\s*$"]]]],[[["identity","args"],["=","expr",[".","commander","parseText",[["deref","args",1]]]],[["not","expr"],["return",[".","console","print",["$ndb: conditional catch expression not understood"]]]]]],["set.","commander",["`","catch"],"expr"]]],[["not",[".","commander","catch"]],[".","console","printline",["$exceptions: catch disabled"]]],[["atom",[".","commander","catch"]],[".","console","printline",["$exceptions: catch all"]]],[".","console","printline",["$exceptions: catch if ",[".","commander","exprstr",[[".","commander","catch"]]]]]]),e._SetBindingList("debug_execs",["function","debug_execs",["cmdword","cmdargs","commander","debug","nsteps"],[[["==",[".","cmdword","charAt",[0]],"$c"],[".","debug","resume","false"]],[["==",[".","cmdword","charAt",[0]],"$f"],[".","debug","stepup","false"]],[["==",[".","cmdword","charAt",[0]],"$n"],[".","debug","stepover","false"]],[["==",[".","cmdword","charAt",[0]],"$s"],["=","nsteps",["toint","cmdargs"]],[[["not",["numeric","nsteps"]],["=","nsteps",1]]],[".","debug","step",["nsteps"]]],["return"]],["`","break"]]),e._SetBindingList("debug_evals",["function","debug_evals",["cmdword","cmdargs","commander","debug","false","console","ex1","ex2","aterm","printlevel","result"],["=","console",[".","commander","console"]],["=","ex1",[".","commander","parseText",["cmdargs"]]],[[["==","cmdword","$eval"],["=","ex2",["tokenlast"]],["=","aterm",["atTerminator"]],[["==",["first","ex2"],["`",";"]],["=","printlevel",2]],[["==",["first","ex2"],["`",";>"]],["=","printlevel",1]]],["=","aterm","true"],[["==","cmdword","$pp"],["=","printlevel",2]],[["==",[".","cmdword","charAt",[0]],"$p"],["=","printlevel",1]],["return"]],[["not","aterm"],[".","console","printline",[["langExprLoc","ex2"],"$operator missing between ","ex1","$ and ","ex2"]],[".","console","newline","false"]],["=","result",["eval","ex1"]],[["identity","printlevel"],[".","console","print",["$    result: "]],[[["==","printlevel",2],[".","console","print",[[".","commander","print",["result"]]]]],[".","console","printq",["result"]]],[".","console","newline","false"]]]),e._SetBindingList("debug_helps",["function","debug_helps",["cmdword","cmdargs","commander","debug","false","console","text"],["=","console",[".","commander","console"]],[[["==","cmdargs","$me"],["=","text","$you're beyond it"]],["=","text",["call",["let","lambda",["proc"],[["||",["eq","proc","debug_breaks"],["==","cmdargs","$breakpoints"]],"$    b[reak] <location>             - set breakpoint at location\n            <location> if function(count, value) { <body> }\n            <location> if <expression>\n    clear   <location>             - clear breakpoint at location\n    delete <#> [<#>...]            - delete breakpoint(s) by #\n    disable [<#>]                  - disable breakpoint # | all\n    enable [<#>]                   - enable breakpoint # | all\n    i[nfo] (b)reakpoints           - show current breakpoints\n"],[["||",["eq","proc","debug_exceptions"],["==","cmdargs","$exceptions"]],"$    catch enable                   - catch all exceptions (default)\n    catch disable                  - don't catch any exceptions\n    catch if <expr>                - catch if <expr> true\n"],[["||",["eq","proc","debug_execs"],["==","cmdargs","$execution"]],"$    c[continue]                    - continue execution\n    f[finish]                      - finish current procedure\n    n[ext]                         - step over to next expression\n    s[tep]                         - step into next expression\n"],[["||",["eq","proc","debug_evals"],["==","cmdargs","$eval"]],"$    pp <expr>                      - evaluate expr and pretty-print result\n    eval <expr> [;]                - (same)\n    p <expr>                       - evaluate expr and print basic result\n    eval <expr> ;>                 - (same)\n    eval <expr> ;;                 - evaluate expr and don't print result\n"],[["eq","proc","debug_helps"],"$    help                           - list help topics\n    help <debug-command>           - get specific help on a command\n"],[["||",["eq","proc","debug_infos"],["==","cmdargs","$info"]],"$    i[nfo]                         - list info topics\n    i[nfo] <topic>                 - print debugger info on topic\n"],[["eq","proc","debug_list"],"$    list [<namespace>::]<procedure-name>[.<nestedname>]*[:start[:end]]\n"],[["==","cmdargs","$locations"],"$    [<namespace>::] <procname> [.<procname>...] [: line-number]\n"],[["||",["eq","proc","debug_stacks"],["==","cmdargs","$stacks"]],"$    bt                             - print backtrace\n    backtrace                      - (same)\n    frame <start#> [- <end#>]      - display stack frame(s)\n    scope <frame#>                 - change focus frame and display variables\n    up                             - change focus frame higher\n    down                           - change focus frame lower\n"],[["eq","proc","debug_quit"],"$    q[uit]                         - abandon all execution and restart repl\n"],"$help topics:\n    breakpoints                    - work with breakpoints\n    exceptions                     - work with exceptions\n    execution                      - stepping and continuing execution\n    eval                           - evaluating and printing expressions\n    help                           - using help\n    info                           - print debugger information\n    list                           - list procedure source\n    locations                      - syntax for procedure location references\n    stacks                         - backtrace and stack frame details\n    quit                           - quitting current execution\n"],["deref","debugCmds","cmdargs"]]]],[".","console","print",["text"]]]),e._SetBindingList("debug_infos",["function","debug_infos",["cmdword","cmdargs","commander","debug","false","console","args"],["=","console",[".","commander","console"]],["=","args",[".","cmdargs","match",[["RegExp","$([A-Za-z_]+)\\s*(.*)"]]]],["=","cmdword",["deref","args",1]],["=","cmdargs",["deref","args",2]],[["not","cmdword"],[".","console","print",["$info topics:\n    i[nfo] (b)reakpoints                           - show current breakpoints\n    i[nfo] (f)ind          <regex>                 - find matching symbols in active namespaces\n                           <regex> all | in <namespace>    ...in all or specified namespace\n    i[nfo] f(u)tures                               - show pending futures\n    i[nfo] (m)odules       [<name> [<name> ...]]   - show modules and components\n    i[nfo] (p)roc          [<name>]                - show information about procedure\n    i[nfo] (s)scope        [<frame>]               - show parameters and locals for frame\n"]]],[["||",["==","cmdword","$b"],["==","cmdword","$breakpoints"]],[".","commander","breakList","false"]],[["||",["==","cmdword","$f"],["==","cmdword","$find"]],[".",[".","commander","info"],"infofind",["cmdargs"]]],[["||",["==","cmdword","$u"],["==","cmdword","$future"],["==","cmdword","$futures"]],[".",[".","commander","info"],"infofutures",["cmdargs"]]],[["||",["==","cmdword","$m"],["==","cmdword","$module"],["==","cmdword","$modules"]],[".",[".","commander","info"],"infomod",["cmdargs"]]],[["||",["==","cmdword","$s"],["==","cmdword","$scope"]],["debug_stacks","$scope","cmdargs","commander","debug"]],[["||",["==","cmdword","$p"],["==","cmdword","$proc"],["==","cmdword","$procedure"]],[".",[".","commander","info"],"infoproc",["cmdargs"]]],[".","console","printline",["$ndb: info topic ","cmdword","$ not implemented"]]]),e._SetBindingList("debug_list",["function","debug_list",["cmdword","cmdargs","commander","debug","false","console","procdef","start","end","center","markdict"],["=","console",[".","commander","console"]],[[["&&","cmdargs",["!=","cmdargs","$"]],[".",[".","commander","info"],"infolist",["cmdargs"]],["return"]]],[[["not",[".",[".","commander","info"],"defloc"]],[".","console","printline",["$ndb: nothing to list"]],["return"]]],["=","procdef",[".",[".","commander","utils"],"resolveLocation",[[".",[".","commander","info"],"defloc"]]]],[[["not","procdef"],[".","console","printline",["$ndb: can't find ",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],["return"]]],["=","start",[".",[".",[".","commander","info"],"defloc"],2]],["=","center",20],[[["not","start"],["=","start",1],["=","end","center"]],["preadjust","start","-",["quotient","center",2]],[[["<","start",1],["=","start",1]]],["=","end",["-",["+","start","center"],1]]],[".","console","printline",[[".","procdef",0],"space",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],[[[".",[".",[".","commander","info"],"defloc"],2],["=","markdict",{dictionary:{}}],["set[","markdict",[".",[".",[".","commander","info"],"defloc"],2],"$--\x3e"]]],[".","console","print",[[".",[".",[".","commander","info"],"utils"],"sourcelist",["procdef","start","end","markdict"]]]]]),e._SetBindingList("debug_stacks",["function","debug_stacks",["cmdword","cmdargs","commander","debug","false","console"],["=","console",[".","commander","console"]],["function","backtrace",["false","framedex","frame"],["function","paramstr",["frame","false","params","pinfo"],["=","params",[".",[".","frame",3],2]],[["not","params"],["=","pinfo","$()"]],[["atom","params"],["=","pinfo",[".","$ ","concat",[["tostring","params"]]]]],["=","pinfo","false"],["for",["let","lambda",["iter"],["=","iter",["iterate","params",["`","param"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","param",[".","iter","$value"]],[[["not","param"],["push",["`","local"],"pinfo"]],["push","param","pinfo"]]]]],["=","pinfo",["tostring",["reverse","pinfo"]]]],["=","framedex",0],["for",["let","lambda",["iter"],["=","iter",["iterate",[".","commander","frames"],["`","frame"]]],["loop","false",[[".","iter","$next",["iter"]],[".","iter","$final",["iter"]]],["=","frame",[".","iter","$value"]],[[["procedure","frame"],["=","finfo",[".","$ ","concat",[["tostring",["namespace",["second","frame"]]],"$::",[".","debug","procname",[[".",[".","frame",3],1]]],["paramstr","frame"]]]]],[["eq",["first","frame"],["`","interrupt"]],["=","finfo",[".","$ ","concat",[["tostring",["third","frame"]]]]]],["=","finfo","$"]],[".","console","printline",[["prepad",["postadjust","framedex","+",1],5],"$ ",["prepad",[".","frame",0],10],"finfo"]]]]]],["function","pscope",["false","nargs","frame"],["=","nargs",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["not","nargs"],["=","nargs",[".","commander","focus"]],[".","console","printline",["$Scope is frame #","nargs"]]],[["||",["not",["numeric","nargs"]],[">=","nargs",[".",[".","commander","frames"],"length"]]],[".","console","printline",["$ndb: invalid frame number:","nargs"]],["return"]],[".","console","printline",["$Scope now frame #","nargs"]]],["set.","commander",["`","focus"],"nargs"],["=","frame",["deref",[".","commander","frames"],"nargs"]],[".","commander","updateDefproc",["frame"]],[".","console","printline",[[".","frame",0],"space",[".",[".","commander","utils"],"locationString",[[".",[".","commander","info"],"defloc"]]]]],[".","commander","printlocals",["frame"]]],["function","pframes",["false","nargs","startx","lastx"],["=","startx",["=","lastx",[".","commander","focus"]]],["=","nargs",[".",[".","commander","utils"],"getnumargs",["cmdargs"]]],[[["numeric","nargs"],["=","startx",["=","lastx","nargs"]]],[["eq",["first","nargs"],["`","range"]],[["<",[".","nargs",1],[".","nargs",2]],["=","startx",[".","nargs",1]],["=","lastx",[".","nargs",2]]],["=","startx",[".","nargs",2]],["=","lastx",[".","nargs",1]]],[["identity","nargs"],[".","console","print",["$ndb: invalid frame number or range:","nargs"]],["return"]]],[["<","startx",[".",[".","commander","frames"],"length"]],[[[">=","lastx",[".",[".","commander","frames"],"length"]],["=","lastx",["-",[".",[".","commander","frames"],"length"],1]]]],["while","false",[["not",["<=","startx","lastx"]]],[".","commander","printframedivider",["startx"]],[".","commander","printframe",[["deref",[".","commander","frames"],["postadjust","startx","+",1]]]]],[".","commander","printframedivider","false"]]],[["||",["==","cmdword","$bt"],["==","cmdword","$backtrace"]],["backtrace"]],[["==","cmdword","$frame"],["pframes"]],[["==","cmdword","$scope"],["pscope"]],[["||",["==","cmdword","$up"],["==","cmdword","$down"]],[[["&&",["==","cmdword","$up"],["<",[".","commander","focus"],["-",[".",[".","commander","frames"],"length"],1]]],[".","console","print",["$+Scope now frame #",["preadjust",[".","commander","focus"],"+",1]]]],[["&&",["==","cmdword","$down"],[">",[".","commander","focus"],0]],[".","console","print",["$-Scope now frame #",["preadjust",[".","commander","focus"],"-",1]]]],["return"]],[".","commander","updateDefproc",[["deref",[".","commander","frames"],"nargs"]]]],[".","console","printline",["$ndb: ","cmdword","$ not implemented yet"]]]),e._SetBindingList("debug_quit",["function","debug_quit",["cmdword","cmdargs","commander","debug"],["sudo",["=","exception",["`","exception"]]],["throw","debugger"]]),e._AddPropertyList("DebuggerInit",[["$.lingoInit","true"]]),e._SetBindingList("DebuggerInit",["function","DebuggerInit",["false","manifest"],["=","manifest",["`",["DebuggerREPL","debug_breaks","debug_exceptions","debug_execs","debug_evals","debug_helps","debug_infos","debug_list","debug_stacks","debug_quit","DebuggerInit"]]],[".",[".","Naan","module"],"build",["$CLI","$Debugger",["function","lambda",["modobj","compobj","false","debug"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DebuggerREPL"],"DebuggerREPL"],["=","debug",[".",[".",[".",["modlist"],"Util"],"exports"],"DebugController","false"]],[".","debug","setDefCommander",[["DebuggerREPL","debug"]]]]]]]),e._Execute(["DebuggerInit"]),e._SetNamespace(t,!0)}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
 
 /* Copyright (c) 2017-2026 by Zulch Laboratories, Inc. */
-!function(e){e.BootModule=function(e){"use strict";var t=e._SetNamespace("Util");e._CopyBinding("equal","=="),e._CopyBinding("setq","="),e._CopyBinding("times","*"),e._CopyBinding("and","&&"),e._CopyBinding("or","||"),e._CopyBinding("loop","while"),e._Import("number","difference","-"),e._Import("number","greater",">"),e._Import("number","lesser","<"),e._Import("number","times","*"),e._Import("number","plus","+"),e._Import("number","quotient","/"),e._Import("number","quotient","/."),e._Import("number","mod","%"),e._SetBindingList("!=",["function","!=",["ex1","ex2"],["not",["equal","ex1","ex2"]]]),e._SetBindingList(">=",["function",">=",["ex1","ex2"],["or",["greater","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("<=",["function","<=",["ex1","ex2"],["or",["lesser","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("+=",["macro","+=",["ex1","ex2"],["assign","ex1",["+",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("-=",["macro","-=",["ex1","ex2"],["assign","ex1",["-",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("*=",["macro","*=",["ex1","ex2"],["assign","ex1",["*",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("/=",["macro","/=",["ex1","ex2"],["assign","ex1",["/",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("Component",["closure","Component",["modobj","name","filename","false","compobj"],["=","compobj",["new","object","this"]],["set.","compobj",["`","module"],"modobj"],["set.","compobj",["`","name"],"name"],["set.","compobj",["`","filename"],"filename"],["set.","compobj",["`","modsym"],[".","modobj","modsym"]],["set.","compobj",["`","manifest"],"false"],["set.","compobj",["`","loaded"],"false"],["set.","compobj",["`","package"],["function","package",["false","pkg","curactns","returner"],[".",[".","Naan","module"],"require",["$Util/Packager.nlg"]],[[["not",[".",[".","module","exports"],"pkgSave"]],["return","false"]]],["=","curactns",["nsactive"]],["=","returner",["makeReturner"]],["catch",[[".","modobj","activate","false"],["=","pkg",["pkgSave",["compress",[".","compobj","name"]],[".","compobj","manifest"]]]],[[["identity","true"],["ErrorDebuglog","$package exception: ","exception"],["return","false"]]],[["returner"]]],"pkg"]],["set.","compobj",["`","jspackage"],["function","jspackage",["false","pkg"],["=","pkg",["package"]],[[["not","pkg"],["return","false"]]],["pkgToJsSource","pkg"]]],["set.","compobj",["`","npackage"],["function","npackage",["false","pkg"],["=","pkg",["package"]],[["identity","pkg"],["JSONstringify","pkg"]]]],["set.","compobj",["`","save"],["function","save",["fpath","overwrite","false","text","pathobj","options"],["=","text",["jspackage"]],[[["not","text"],["return","false"]]],["=","fpath",[".","JSpath","normalize",["fpath"]]],["=","pathobj",[".","JSpath","parse",["fpath"]]],[[["==",["length",[".","pathobj","ext"]],0],["=","fpath",["strcat","fpath","$.json"]]]],["=","options",["xnew"]],[[["identity","overwrite"],["set.","options",["`","flags"],"$w"]],["set.","options",["`","flags"],"$wx"]],["=","fpath",[".","JSpath","join",[[".","js","d"],"fpath"]]],[".",[".","js","r",["$fs"]],"writeFileSync",["fpath","text","options"]],"fpath"]],"compobj"]),e._SetBindingList("Module",["closure","Module",["modules","modid","exns","false","modobj"],["=","modobj",["new","object","this"]],["set.","modobj",["`","owner"],"modules"],["set.","modobj",["`","id"],"modid"],["set.","modobj",["`","created"],[".","Date","now","false"]],["closure","makeActivator",["false","checkns","targns"],["=","checkns",["nsrights"]],["=","targns",["car",["nsactive"]]],["call",["enclose",["function","lambda","false",["function","returner","false",[["eq","checkns",[".",[".","Naan","local"],"nscaller","false"]],["nsactive",["cons","targns",["inherits"]]]]],"returner"],"targns"]]],["set.","modobj",["`","inherits"],["function","inherits",["false","result","nslist"],["=","nslist",[".","modobj","inherit"]],["loop","false",[["empty","nslist"]],["=","ns",["pop","nslist"]],[[["not",["member","ns","result"]],["push","ns","result"]]]],["push",["second",["nsactive","true"]],"result"],["reverse","result"]]],["set.","modobj",["`","makeComponent"],["function","lambda",["compname","filename","false","compobj"],["=","compobj",["Component","modobj","compname","filename"]],["set[",[".","modobj","components"],"compname","compobj"]]],["set.","modobj",["`","destroy"],["function","destroy","false",[".","modules","destroy",["modobj"]],"true"]],["call",["let","lambda",["false","mtuple"],["function","nsinit",["modobj","false","modsym"],["letlocal","$module"],["=","modsym",["compress","$module"]],["putproc","modsym",[".","modules","moduleProc"]],["assign","modsym","modobj"],["list",["car",["nsactive"]],["makeActivator"],"modsym"]],["function","registerns",["ns","modobj","false","curactns"],["=","curactns",["nsactive"]],["sudo",["nsactive",["cons","ns","curactns"]]],["=","ns",["nsinit","modobj"]],["sudo",["nsactive","curactns"]],"ns"],["function","makens",["nsname","modobj","false","ns"],["=","ns",["new","namespace","nsname"]],["=","ns",["nsinit","modobj"]],["sudo",["nsactive",["cdr",["nsactive"]]]],"ns"],["set.","modobj",["`","locpath"],"$"],["set.","modobj",["`","exports"],{dictionary:{}}],["put",[".","modobj","exports"],["`","module"],"modobj"],["set.","modobj",["`","children"],{array:[]}],["set.","modobj",["`","components"],{dictionary:{}}],[[["identity","exns"],["=","mtuple",["registerns","exns","modobj"]]],["=","mtuple",["makens","modid","modobj"]]],["set.","modobj",["`","namespace"],["car","mtuple"]],["set.","modobj",["`","activate"],["second","mtuple"]],["set.","modobj",["`","modsym"],["third","mtuple"]]]],"modobj"]),e._SetBindingList("Modules",["closure","Modules",["false","modules"],["=","modules",["new","object","this"]],["set.","modules",["`","list"],{dictionary:{}}],["set.","modules",["`","locations"],{dictionary:{$naanlib:"$"}}],["set.","modules",["`","extensions"],{array:["$nlg","$npk"]}],["set.","modules",["`","queryString"],"$"],["function","reload",["false","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"reload","false"]],[[["identity","true"],"false"]],"false"]],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"postload","false"]],[[["identity","true"],"false"]],"false"]]],["loadNotify","reload"],["function","resave",["false","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"resave","false"]],[[["identity","true"],"false"]],"false"]]],["saveNotify","resave"],["set.","modules",["`","moduleProc"],["function","moduleProc",["modid"],[["not","modid"],["keys",[".","modules","list"]]],["deref",[".","modules","list"],"modid"]]],["set.","modules",["`","find"],["function","find",["test","false","modobj","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"],"false"],["=","modobj",["xget",[".","modules","list"],["pop","mkeys"]]],[["test","modobj"],"modobj"]]]],["set.","modules",["`","letinherit"],["function","letinherit",["modfrom","false","modto","curac","nsfrom","nsto"],["=","curac",["nsactive"]],[[["string","modfrom"],["=","modfrom",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modfrom"]]]]]],[["not","modfrom"],"false"],["=","modto",["find",["function","lambda",["mod"],["eq",[".","mod","namespace"],["car","curac"]]]]],[[[".","modfrom","inherit"],["=","nsfrom",["cons",[".","modfrom","namespace"],[".","modfrom","inherit"]]]],["=","nsfrom",["list",[".","modfrom","namespace"]]]],[[["identity","modto"],[[[".","modto","inherit"],["set.","modto",["`","inherit"],["append","nsfrom",[".","modto","inherit"]]]],["set.","modto",["`","inherit"],"nsfrom"]],["=","nsto",[".","modto","inherits","false"]]],["=","nsto","nsfrom"]],["nsactive",["append",["car","curac"],"nsto",["cdr","curac"]]],["nsactive"]]],["set.","modules",["`","require"],["closure","require",["fpath","options","data","false","locin","ns","parent","pathobj","locpath","modname","modobj","compname","compath","compobj","error","presult","returner","extensions","pathext","query","hostpath"],["sprint"],[[["&&","options",["not",["dictionary","options"]]],["throw",["Error",[".","$require(","concat",["fpath","$): invalid options"]]]]]],["=","locin",[".","fpath","split",["$:"]]],[[["&&",["==",[".","locin","length"],2],[">",[".",[".","locin",0],"length"],1]],["=","fpath",[".","locin",1]],["=","locin",[".","locin",0]]],["=","locin",[".","options","in"]]],["=","ns",["||",[".","options","parent"],["nscaller"]]],["=","parent",["find",["function","lambda",["mod"],["eq",[".","mod","namespace"],"ns"]]]],["=","pathobj",[".","JSpath","parse",["fpath"]]],[[["||",["==",[".","pathobj","ext"],"$"],[".",["RegExp","$[/\\\\]$"],"test",["fpath"]]],["=","compath",[".","JSpath","join",["fpath",[".","pathobj","base"]]]],["=","pathobj",[".","JSpath","parse",["compath"]]]]],["=","locpath",[".","pathobj","dir"]],["=","modname",[".","JSpath","basename",["locpath"]]],[[["||",["==","modname","$."],["==","modname","$.."]],["=","modname","$"]]],[[["identity","locin"],["=","presult",["deref",[".","modules","locations"],"locin"]],[[["not","presult"],["throw",["Error",[".","$require(","concat",["fpath","$): in:","locin","$ undefined"]]]]]],["=","locpath",[".","JSpath","resolve",["presult","locpath"]]]],[["&&",["!=",[".","pathobj","ext"],"$"],["==","locpath","$"]],["=","locpath",[".","parent","locpath"]]],[["&&",[".",["RegExp","$^[.][.]?[/\\\\]"],"test",["fpath"]],[".","parent","locpath"]],["=","locpath",[".","JSpath","join",[[".","parent","locpath"],"locpath"]]]]],[[["not","locpath"],["=","locpath","$"]]],["set.","pathobj",["`","dir"],"locpath"],["=","compname",[".","pathobj","name"]],[[["&&","locpath",["!=","locpath","$"]],[["==","locpath","$."],["=","modobj","parent"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","locpath"],"locpath"]]]]]],[[["not","modobj"],[["==","modname","$"],["=","modobj","parent"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modname"]]]]]],[[["&&",["not",[".","options","read"]],["not",[".","options","reload"]],["deref",[".","modobj","components"],"compname"]],["return",[".","modobj","exports"]]]],["=","returner",["makeReturner"]],["catch",[["=","extensions",["new",[".","modules","extensions"]]],["loop","false",["=","pathext",[".","extensions","pop","false"]],[["not","pathext"]],["set.","pathobj",["`","ext"],[".","$.","concat",["pathext"]]],["set.","pathobj",["`","base"],[".",[".","pathobj","name"],"concat",[[".","pathobj","ext"]]]],["=","compath",[".","JSpath","format",["pathobj"]]],[[["not","modobj"],["=","modobj",["makeModule","modname"]]]],["=","query",[".","options","query"]],[[["not","query"],["=","query",[".","modules","queryString"]]]],["=","hostpath",[".",[".",[".",[".","js","w"],"location"],"origin"],"concat",[[".","JSpath","dirname",[[".",[".",[".","js","w"],"location"],"pathname"]]]]]],[[[".","options","source"],[["string",[".","options","source"]],["=","presult",[".","options","source"]]],["=",["error","presult"],["call",[".","options","source"],"compath","query"]]],[["identity","hostpath"],["=",["error","presult"],["modWebReadFile","compath","hostpath","query"]]],["=",["error","presult"],["modNodeReadFile","compath"]]],[[[">",["length","presult"],0],[[["==",[".","modobj","locpath"],"$"],["set.","modobj",["`","locpath"],"locpath"]]],[[[".","options","read"],["return","presult"]]],["=","compobj",[".","modobj","makeComponent",["compname",[".","pathobj","base"]]]],[".","modobj","activate","false"],["set.","modobj",["`","data"],"data"],["rdsDriver","presult","compath"],["set.","modobj",["`","data"],"undefined"],["returner"],["set.","compobj",["`","loaded"],"true"],["return",[".","modobj","exports"]]]]],["throw",["Error",[".","$require(","concat",["fpath","$): failed: "]],"compath","error"]],["set[",[".","modobj","components"],"compname","false"],"false"],[[["identity","true"],["ErrorDebuglog",[".","$require(","concat",["fpath","$): exception: "]],"exception"],["set[",[".","modobj","components"],"compname","false"],["returner"],["throw","exception"]]],"false"]]],["set.","modules",["`","defineLoc"],["function","defineLoc",["id","path"],[["not","id"],[".","modules","locations"]],["set[",[".","modules","locations"],"id","path"]]],["set.","modules",["`","defineExt"],["function","defineExt",["ext","reset","false","value"],[[["not","ext"],["=","value",[".","modules","extensions"]]]],[[["identity","reset"],["set.","modules",["`","extensions"],{array:[]}]]],[[["identity","ext"],[".",[".","modules","extensions"],"push",["ext"]],["=","value",[".","modules","extensions"]]]],"value"]],["set.","modules",["`","requireQuery"],["function","requireQuery",["query"],[["not","query"],[".","modules","queryString"]],["set.","modules",["`","queryString"],["modEncodeQuery","query"]]]],["set.","modules",["`","build"],["closure","build","args",["call",["function","lambda",["modname","compname","proc","args","false","modobj","compobj","curactns","presult","returner"],["=","curactns",["nsactive"]],["=","returner",["makeReturner"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modname"]]]],[[["identity","modobj"]],[["==",["namespace",["car","curactns"]],"modname"],["=","modobj",["makeModule","modname",["car","curactns"]]]],["=","modobj",["makeModule","modname"]]],[[["not","compname"],["=","compname","modname"]]],["=","compobj",["deref",[".","modobj","components"],"compname"]],[[["not","compobj"],["=","compobj",[".","modobj","makeComponent",["compname"]]]]],["catch",[[[["identity","proc"],[".","modobj","activate","false"],["set.","compobj",["`","loaded"],"false"],["=","presult",["apply","proc",["cons","modobj","compobj","args"]]],["returner"],[["not","presult"],"false"]]],["set.","compobj",["`","loaded"],"true"],[".","modobj","exports"]],[[["identity","true"],["ErrorDebuglog","$module build exception: ","exception"],["returner"],["throw","exception"]]],"false"]],["car","args"],["second","args"],["third","args"],["cdddr","args"]]]],["set.","modules",["`","changeModNS"],["function","changeModNS",["name","create","false","modobj"],["=","name",["tostring","name"]],[[["||",["not","name"],["==","name","$"]],["printline","$modules: ",["keys",[".","modules","list"]]],["return","false"]]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"name"]]]],[[["not","modobj"],[["identity","create"],["build","name"],["return",["changeModNS","name"]]],["printline","$can't find ","name","$ -- please select from ",["keys",[".","modules","list"]]],["return","false"]]],[".","modobj","activate","false"],[".","modobj","id"]]],["set.","modules",["`","makeModule"],["function","makeModule",["name","exns","false","modobj"],["=","modobj",["Module","modules","name","exns"]],["set[",[".","modules","list"],"name","modobj"],"modobj"]],["set.","modules",["`","destroy"],["function","destroy",["modobj"],["set[",[".","modules","list"],[".","modobj","id"],"undefined"],["delete",[".","modobj","namespace"]],"true"]],"modules"]),e._SetBindingList("modEncodeQuery",["function","modEncodeQuery",["query","false","result","qkeys","item"],[[["not",["dictionary","query"]],["return","query"]]],["=","result",{array:[]}],["=","qkeys",["keys","query"]],["loop","false",[["empty","qkeys"]],["=","item",["pop","qkeys"]],[".","result","push",[[".",[".",[".","js","w"],"encodeURIComponent",["item"]],"concat",["$=",[".",[".","js","w"],"encodeURIComponent",[["deref","query","item"]]]]]]]],["=","result",[".","result","join",["$&"]]],[[">",[".","result","length"],0],[".","$?","concat",["result"]]],"result"]),e._SetBindingList("modAwait",["closure","modAwait",["promise","false","pending"],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[".","pending","wait","false"]]),e._SetBindingList("modWebReadFile",["closure","modWebReadFile",["filename","href","query","false","url","error","response","content"],[[["not","href"],["=","url","filename"]],[[["not",[".","href","endsWith",["$/"]]],["=","href",[".","href","concat",["$/"]]]]],[[[".","filename","startsWith",["$/"]],["=","filename",[".","filename","slice",[1]]]]],["=","url",[".","href","concat",["filename",["modEncodeQuery","query"]]]]],["=",["error","response"],["modAwait",[".",[".","js","w"],"fetch",["url",{dictionary:{$mode:"$cors",$cache:"$no-cache",$credentials:"$same-origin",$headers:{dictionary:{}},$redirect:"$follow",$referrerPolicy:"$no-referrer"}}]]]],[[["and",["not","error"],[">=",[".","response","status"],200],["<",[".","response","status"],299]],["=",["error","content"],["modAwait",[".","response","text","false"]]]],[["not","error"],["=","error",["Error","$modWebReadFile failed:","url",[".","response","status"]]]]],[["identity","error"],["list","error"]],["list","false","content"]]),e._SetBindingList("modWebParseFile",["closure","modWebParseFile",["filename","href","query","false","error","text"],["=",["error","text"],["modWebReadFile","filename","href","query"]],[["identity","error"],["ErrorDebuglog","error"]],[["&&",[">",["length","text"],0],["rdsDriver","text","filename"]],"filename"]]),e._SetBindingList("modNodeReadFile",["closure","modNodeReadFile",["filename","false","fs","locpath","error","error2","text"],["function","readFileSync",["path","false","pending"],["=","pending",["new","nonce"]],[".","fs","readFile",["path",{dictionary:{$encoding:"$utf8"}},["function","lambda",["error","data"],[[["identity","error"],["=","error",["Error","$modNodeReadFile failed:","path","error"]]]],[".","pending","signal",[["list","error","data"]]]]]],[".","pending","wait","false"]],["=","fs",[".","js","r",["$fs"]]],["=","locpath",[".","JSpath","resolve",[[".","js","d"],"filename"]]],["=",["error","text"],["readFileSync","locpath"]],[[["identity","error"],["=","locpath",[".","JSpath","resolve",[[".","js","d"],"$../","filename"]]],["=",["error2","text"],["readFileSync","locpath"]],[["not","error2"],["=","error","false"]]]],["list","error","text"]]),e._SetBindingList("modNodeParseFile",["closure","modNodeParseFile",["filename","false","error","text"],["=",["error","text"],["modNodeReadFile","filename"]],[["identity","error"],["ErrorDebuglog","error"]],[["&&",[">",["length","text"],0],["rdsDriver","text","filename"]],"filename"]]),e._SetBindingList("modDriver",["closure","modDriver",["text","sourcename","false","error"],["=",["error"],["modTextParse","text"]],[[["identity","error"],["=","error",["Error","$require(","sourcename","$) failed: ","error"]],["ErrorDebuglog","error"],["throw","error"]]],"true"]),e._SetBindingList("modTextParse",["closure","modTextParse",["text","false","package","dialob","errors","source","error","expr"],[[[".","text","startsWith",['$[["NaanPackage"']],["catch",[[[".",[".","js","w"],"JSON"],["=","package",[".",[".",[".","js","w"],"JSON"],"parse",["text"]]]],["=","package",[".",[".",[".","js","g"],"JSON"],"parse",["text"]]]],[[["identity","true"],["return",["list",["Error","$exception:","exception"]]]]],"false"],["=","roots",["pkgLoad","package"]],[["tuple","roots"],["return",["list","false","roots"]]],["return",["list",["Error","$package load failed"]]]]],["=","text",[".","text","replace",[["RegExp","$[\\r\\n^]+/(dialect)\\s+(\\w+)(?=[\\r\\n$])","$g"],["function","lambda",["match","cmd","arg","offset","str"],[[["==","cmd","$dialect"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",["arg"]]],[["not","dialob"],["return",["list",["Error",["strcat","$dialect ","arg","$ not found"]]]]]],["return",["list",["Error",["strcat","$source /","cmd","$ not understood"]]]]],[".","$\n","repeat",[["-",[".",[".","match","split",["$\n"]],"length"],1]]]]]]],[[["not","dialob"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],[["not","dialob"],["return",["list",["Error","$dialect support not available"]]]]]],["catch",[["=","errors",{array:[]}],["=","source",["new","textstream",[".","text","concat",["$\\r"]]]],["loop","false",["=",["error","expr"],[".","dialob","parse",["source"]]],[[["identity","expr"],["\\$",["evalactive","expr"]]],["=","errors",[".","errors","concat",["error"]]]]]],[[["and",["==",["tostring",["car","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]]],[["identity","true"],["return",["list",["Error","$exception:","exception"]]]]],"false"],[["==",[".","errors","length"],0],["list","false","\\$"]],["=","errors",[".","errors","reverse","false"]],["=","errors",[".","errors","map",[["function","lambda",["error"],[".","dialob","parseErrorString",[[".","errors","pop","false"]]]]]]],["list",["Error","$parse errors:","errors"]]]),e._SetBindingList("letlocal",["macro","letlocal","names",["call",["function","lambda",["false","localname","curac","syms"],["=","curac",["nsactive"]],["nsactive",["list",["car","curac"]]],["loop","false",[["atom","names"]],["=","localname",["pop","names"]],["=","syms",["cons",["compress","localname"],"syms"]]],["nsactive","curac"],["reverse","syms"]]]]),e._SetBindingList("letimport",["function","letimport","names",["call",["function","lambda",["false","item","count"],["function","import1",["source","localname","false","curac","sym"],[["not","source"],["debuglog","$letimport: source undefined:","source"]],[["not",["deref",[".",[".",["nsactive","true"],1],"index"],"localname"]],["=","curac",["nsactive"]],["nsactive",["list",["car","curac"]]],["=","sym",["compress","localname"]],["nsactive","curac"],[[["getproc","source"],["copyproc","sym","source"]],[["||",["procedure","source"],["xobject","source"]],["assign","sym","source"]],["debuglog","$letimport: no procedure binding:","source"],["return"]],["=","count",["+","count",1]]]],["function","importCat",["category","false","item","exlist","source"],[["not",["dictionary","category"]],["debuglog","$letimport: invalid category:","category"]],["=","exlist",["keys","category"]],["loop","false",[["empty","exlist"]],["=","item",["pop","exlist"]],["=","source",["xget","category","item"]],[[["||",["symbol","source"],["tuple","source"],["xobject","source"]],["import1","source",["tostring",["unintern","item"]]]],[["dictionary","source"],["importCat","source"]],["debuglog","$letimport: invalid category entry:",["keys","category"],"item"]]]],["=","count",0],["loop","false",[["empty","names"]],["=","item",["pop","names"]],[[["not",["atom","item"]],[["and",["==",["length","item"],2],["atom",["car","item"]],["string",["second","item"]]],["import1",["car","item"],["second","item"]]],["debuglog","$letimport: invalid pair:","item"],"false"],[["getproc","item"],["import1","item",["tostring",["unintern","item"]]]],[["dictionary","item"],["importCat","item"]],["debuglog","$letimport: invalid source:","item"]]],"count"]]]),e._SetBindingList("makeExport",["function","makeExport",["syms","false","result","sym"],["=","result",["new","dictionary"]],["loop","false",[["empty","syms"]],["=","sym",["pop","syms"]],["xset","result","sym","sym"]],"result"]),e._SetBindingList("makeReturner",["closure","makeReturner",["nslist","false","checkns","targns"],["=","checkns",["nsrights"]],[[["not","nslist"],["=","nslist",["nsactive"]]]],["=","targns",["car","nslist"]],["enclose",["function","lambda","false",[["eq","checkns",["nscaller"]],["nsactive","nslist"]]],"targns"]]),e._SetBindingList("loadNotify",["function","loadNotify",["recipient"],[[["not",["member","recipient","notifyList"]],["push","recipient","notifyList"]]],"true"]),e._SetBindingList("loadTrap",["function","loadTrap",["false","trav","tell"],["=","tell",[".","notifyList","reverse"]],["while","false",[["not",["tuple","tell"]]],["=","trav",["pop","tell"]],["call","trav"]]]),e._SetBindingList("saveNotify",["function","saveNotify",["recipient"],[[["not",["member","recipient","saveNotifyList"]],["push","recipient","saveNotifyList"]]],"true"]),e._SetBindingList("SaveTrap",["function","SaveTrap",["false","trav","tell"],["=","tell",[".","saveNotifyList","reverse"]],["while","false",[["not",["tuple","tell"]]],["=","trav",["pop","tell"]],["call","trav"]]]),e._SetBindingList("jsReload",["function","jsReload",["false","wsg"],["=","wsg",["||",[".","js","w"],[".","js","s"],[".","js","g"]]],["=","JSpath",[".","js","r",["$path"]]],["=","JSONstringify",[".",[".","wsg","JSON"],"stringify"]],["=","JSONparse",[".",[".","wsg","JSON"],"parse"]]]),e._SetValue("NaanBuildComponent",{dictionary:{$filename:"$Module.nlg",$name:"$Module",$manifest:["Component","Module","Modules","modEncodeQuery","modAwait","modWebReadFile","modWebParseFile","modNodeReadFile","modNodeParseFile","modDriver","modTextParse","letlocal","letimport","makeExport","makeReturner","loadNotify","loadTrap","saveNotify","SaveTrap","jsReload","NaanBuildComponent","ModuleInit"]}}),e._SetBindingList("ModuleInit",["closure","ModuleInit",["false","modules","naanMod","utilMod"],["function","findNS",["nsid","false","allns","nsns"],["=","allns",["nsactive","true"]],["loop","false",[["empty","allns"]],["=","nsns",["pop","allns"]],[["==",["namespace","nsns"],"nsid"],"nsns"]]],["function","modlist","false",[".","modules","list"]],["jsReload"],["loadNotify","jsReload"],["=","modules",["Modules"]],["=","naanMod",[".","modules","makeModule",["$Naan","false",["findNS","$NaanRoot"]]]],["=","utilMod",[".","modules","makeModule",["$Util","naanMod",["nsrights"]]]],["set.",[".","utilMod","components"],["`","Module"],["Component","utilMod",[".","NaanBuildComponent","name"]]],["set.",[".",[".","utilMod","components"],"Module"],["`","loaded"],"true"],["set.",[".",[".","utilMod","components"],"Module"],["`","manifest"],[".","NaanBuildComponent","manifest"]],["set.",[".","Naan","module"],["`","require"],[".",[".","modules","require"],1]],["set.",[".","Naan","module"],["`","defineLoc"],[".",[".","modules","defineLoc"],1]],["set.",[".","Naan","module"],["`","defineExt"],[".",[".","modules","defineExt"],1]],["set.",[".","Naan","module"],["`","requireQuery"],[".",[".","modules","requireQuery"],1]],["set.",[".","Naan","module"],["`","build"],[".",[".","modules","build"],1]],["set.",[".","Naan","module"],["`","letinherit"],[".",[".","modules","letinherit"],1]],["set.",[".","Naan","module"],["`","chns"],[".",[".","modules","changeModNS"],1]],["set.",[".","Naan","module"],["`","letimport"],"letimport"],["set.",[".","Naan","module"],["`","export"],"makeExport"],["set.",[".","Naan","module"],["`","letlocal"],"letlocal"],["set.",[".","Naan","module"],["`","modlist"],"modlist"],["set.",[".","Naan","module"],["`","nodeparse"],"modNodeParseFile"],["set.",[".","Naan","module"],["`","webparse"],"modWebParseFile"],["set.",[".","Naan","module"],["`","textparse"],"modTextParse"],["=","LoadTrap","loadTrap"],["set.",[".","Naan","module"],["`","LoadNotify"],"loadNotify"],["set.",[".","Naan","module"],["`","SaveNotify"],"saveNotify"],["xlock",[".","Naan","module"],["car",["nsactive"]]],["sudo",["putproc","rdsDriver",["enclose",["getproc","modDriver"],["car",["nsactive","true"]]]]],"true"]),e._Execute(["ModuleInit"]),e._AddPropertyList("bt",[["$lingoDriver","bt"],["$escape","bt"],["$debugger","bt"],["$debugexception","bt"],["$driver","bt"],["$evalactive","break"]]),e._SetBindingList("debugCon",["closure","debugCon",["false","debug","nslist","defCommander"],["=","debug",["new","object","this"]],["=","nslist",["nsactive","true"]],["set.","debug",["`","nshidden"],["list",[".","nslist",0],[".","nslist",1],[".",[".",[".",[".","module","owner"],"list"],"Lib"],"namespace"]]],["set.","debug",["`","breakpoints"],{dictionary:{}}],["set.","debug",["`","bpenable"],"true"],["function","dsave",["false","saveob"],["=","saveob",{dictionary:{}}],["set.","saveob",["`","curns"],["nsactive"]],[[["not",["positive","debugDepth"]],["=","debugDepth",1],[".",[".","js","t"],"Saving",["false"]]],["preadjust","debugDepth","+",1]],"saveob"],["function","drestore",["saveob"],[[["==",["preadjust","debugDepth","-",1],0],[".",[".","js","t"],"Saving",["true"]]]],["nsactive",[".","saveob","curns"]],"saveob"],["function","insertns",["curns"],[["not",["rest","curns"]],["cons",["nsrights"],"curns"]],["cons",["first","curns"],["insertns",["rest","curns"]]]],["function","clearframes","false",["set.","debug",["`","entrystack"],"false"],["set.","debug",["`","frames"],{array:[]}]],["function","storeframes",["all","false","procount","framex","framelist","frame","status"],["function","evaluate",["expr"],["eval","expr"]],[["not",[".","debug","entrystack"]],["=","procount",0],["set.","debug",["`","entrystack"],["stacktrace"]],[[["identity","all"],["=","framex",1]],["=","framex",["stepframe",[".","debug","entrystack"]]]],["set.","debug",["`","frames"],{array:[]}],["=","framelist",["deref",[".","debug","entrystack"],["-",["-","framex"],1]]],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["procedure","frame"],[[["not","all"],["=","status",["get","bt",["procname",[".",[".","frame",3],1]]]],[[["eq","status","bt"],["continue"]]],[["&&",[">","procount",0],["eq","status",["`","break"]]],["break"]]]],["preadjust","procount","+",1]]],[".",[".","debug","frames"],"push",["frame"]]],[["==","procount",0],[".",[".","debug","frames"],"push",[["list",["`","function"],"evaluate",[".",[".","evaluate","proc"],-3],[".","evaluate","proc"]]]]]]],["function","stepframe",["stack","false","framex","framelist","frame","found","debugout"],["=","framex",0],["=","framelist","stack"],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["&&","debugout",["==",[".","frame",0],"interrupt"]],[["||",["==",[".","frame",2],"$steptrap"],["==",[".","frame",2],"$breakpoint"]],["=","found","framex"],["break"]],[["&&",["not",["eq","exception",["`","exception"]]],["==",[".","frame",2],"$exception-hook"]],["=","found",["+","framex",1]],["break"]]],[["&&",["member",[".","frame",0],["`",["function","closure"]]],["member",[".","frame",1],["`",["debugBlock","startException","startEscape","start"]]]],["=","debugout","true"],["=","found","framex"]],[["&&",["==",[".","frame",0],["`","function"]],["==",[".","frame",1],["`","debugger"]]],["=","found","framex"],["break"]]],["preadjust","framex","+",1]],"found"],["function","procframe",["stack","startx","false","frame"],["loop","false",["=","frame",["deref","stack","startx"]],[[["not","frame"],["return","false"]]],[["procedure","frame"]],["preadjust","startx","+",1]],"startx"],["function","intrap",["false","framelist","frame"],["=","framelist",["stacktrace"]],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["==",[".","frame",0],"interrupt"],[["||",["==",[".","frame",2],"$steptrap"],["==",[".","frame",2],"$breakpoint"]],["return",[".","frame",2]]]]]],"false"],["function","steppedover",["dict","false","stack","curframe","origframe","procdex"],["=","curframe",["stepframe",["=","stack",["stacktrace"]]]],["=","origframe",["-",["length","stack"],[".","debug","nextOffset"]]],["=","procdex",["procframe","stack","curframe"]],["set.","debug",["`","nextOffset"],"false"],[[["||",["not","procdex"],[">","procdex","origframe"]],["return","false"]]],[[["==","procdex",["procframe","stack",["+","origframe",1]]],["return","false"]]],[[["stacktrap",["+","procdex",1],0,"debugBlock"],["return"]]],"false"],["function","brokeover",["dict","false","resume"],["=","resume",[".",[".","debug","breakHitDict"],"resume"]],["set.",[".","debug","breakHitDict"],["`","resume"],"undefined"],["set.",[".","debug","breakHitDict"],["`","enable"],"true"],["set.","debug",["`","breakHitDict"],"false"],"resume"],["function","checkReady","false",["!=",[".",[".",[".","js","t"],"termlist"],"length"],0]],["set.","debug",["`","depth"],["function","depth","false","debugDepth"]],["set.","debug",["`","procname"],["function","procname",["name","false","parent"],["=","parent",["deref",["@","name"],["`","\\.parent"]]],["=","name",["tostring","name"]],[["identity","parent"],[".",["procname","parent"],"concat",["$.","name"]]],"name"]],["set.","debug",["`","insideProc"],["function","insideProc",["false","frames","frame"],["=","frames",["new",[".","debug","frames"]]],["loop","false",[["==",[".","frames","length"],0]],["=","frame",[".","frames","shift","false"]],[[["procedure","frame"],["return",[".","frame",3]]]]],"false"]],["set.","debug",["`","frameProcTask"],["function","frameProcTask",["frame","false","frames","ftrav","procdef","bodydef"],[[["not",["array",[".","debug","frames"]]],["return","false"]]],["=","frames",["new",[".","debug","frames"]]],["loop","false",[["==",[".","frames","length"],0]],["=","ftrav",[".","frames","shift","false"]],[[["eq","ftrav","frame"],["=","frame","false"]]],[[["procedure","ftrav"],[[["not","frame"],["=","procdef",[".","ftrav",3]],[[["not","bodydef"],["=","bodydef","procdef"]]],["break"]]],["=","bodydef","false"]],[["||",["==",[".","ftrav",0],["`","body"]],["==",[".","ftrav",0],["`","loop"]]],[["not","bodydef"],["=","bodydef",[".","ftrav",2]]]]]],[["identity","procdef"],["list","procdef","bodydef"]]]],["set.","debug",["`","debugBlock"],["closure","debugBlock",["arg1","arg2","arg3","false","saveob","savech","savecmd","entry"],[[[">=","debugDepth",1],["set.","debug",["`","entrystack"],"false"],["storeframes","true"]],["storeframes"]],["=","saveob",["dsave"]],["=","savech",["textstreams"]],["nsactive",["insertns",[".","saveob","curns"]]],["=","savecmd",{dictionary:{}}],[".",[".","debug","commander"],"entering",["savecmd"]],["catch",[[[["string","arg1"],["=","entry","arg1"]],["=","entry",["intrap"]],[["==","entry","$steptrap"],[[[".","debug","breakHitDict"],[["brokeover","arg1"],["return"]]]],[[".","debug","nextOffset"],[["steppedover","arg1"],["return"]]],[[".","debug","startPause"],["set.","debug",["`","startPause"],"false"],["=","entry","$startpause"]]],[["==","entry","$breakpoint"],[[["not",[".","debug","bpenable"]],["return"]]],["set.","debug",["`","breakHitDict"],"arg1"]],[["not","entry"],["=","entry","$"]]],["set.","debug",["`","nextOffset"],"false"],["loop","false",[[".",[".","debug","commander"],"pauser",["entry","arg1","arg2","arg3"]]]]],"false",[[".",[".","debug","commander"],"leaving",["savecmd"]],["textstreams","savech"],["drestore","saveob"],[[[".","debug","bpenable"],["breakpoint","true"]]],["clearframes"]]]]],["function","skipbreak","false",["set.",[".","debug","breakHitDict"],["`","enable"],"false"]],["set.","debug",["`","resume"],["function","resume","false",[[".",[".","debug","breakHitDict"],"enable"],["set.",[".","debug","breakHitDict"],["`","resume"],"true"],["skipbreak"],["stacktrap",["stepframe",["stacktrace"]],1,"debugBlock"]]]],["set.","debug",["`","step"],["function","step",["nstep","false","stack","stackdex","task"],["=","stackdex",["stepframe",["=","stack",["stacktrace"]]]],["=","task",[".",[".",["deref","stack","stackdex"],3],2]],[[["&&",["symbol",[".","task",0]],["member",[".",[".",[".",[".","task",0],"proc"],1],"namespace"],[".","debug","nshidden"]]],["return",["stepover"]]]],["set.","debug",["`","nextOffset"],"false"],["skipbreak"],["stacktrap",["stepframe",["stacktrace"]],"nstep","debugBlock"]]],["set.","debug",["`","stepup"],["function","stepup",["false","stack","stackdex","found"],["set.","debug",["`","nextOffset"],"false"],["skipbreak"],["=","stackdex",["stepframe",["=","stack",["stacktrace"]]]],["loop","false",[[[">=","stackdex",["length","stack"]],["return"]]],[[["procedure",["deref","stack","stackdex"]],[[["get","bt",["procname",[".",[".",["deref","stack","stackdex"],3],1]]],["return"]]],[[["identity","found"],["break"]]],["=","found","stackdex"]]],[[["eq",["deref","stack",0],["`","loop"]],["=","found","stackdex"]]],["preadjust","stackdex","+",1]],["stacktrap","found",0,"debugBlock"]]],["set.","debug",["`","stepover"],["function","stepover",["false","stack","curframe"],["skipbreak"],["=","curframe",["stepframe",["=","stack",["stacktrace"]]]],["set.","debug",["`","nextOffset"],["-",["length","stack"],"curframe"]],[[["stacktrap","curframe",1,"debugBlock"],["return","true"]]],["set.","debug",["`","nextOffset"],"false"]]],["set.","debug",["`","quit"],["function","quit","false",["sudo",["=","exception",["`","exception"]]],["throw","debugger"]]],["set.","debug",["`","startEscape"],["function","startEscape","false",[[["not",["checkReady"]],["debuglog","$debug.startEscape: can't enter debugger before terminal is ready"],["return"]]],["storeframes"],["debugBlock","$escape"]]],["set.","debug",["`","startException"],["function","startException",["except"],[[["not",["checkReady"]],[[["ErrorObject","except"],["=","except",["ErrorString","except"]]]],["debuglog","$debug.startException: debugger not ready for","except"],["return"]]],["storeframes"],["set.","debug",["`","startExcept"],"except"],["debugBlock","$exception","except"]]],["set.","debug",["`","start"],["function","start",["pause"],[[["not",["checkReady"]],["debuglog","$debug.start: can't enter debugger before terminal is ready"],["return"]]],["storeframes"],[["identity","pause"],["set.","debug",["`","startPause"],"true"],[[["stacktrap",["stepframe",["stacktrace"]],0,"debugBlock"],["return"]]],["debugBlock","$startfail"]],["debugBlock","$"]]],["set.","debug",["`","setDefCommander"],["function","setDefCommander",["commander"],["=","defCommander","commander"],[["not",[".","debug","commander"]],["set.","debug",["`","commander"],"defCommander"]]]],["set.","debug",["`","setCommander"],["function","setCommander",["commander"],[["not","commander"],["set.","debug",["`","commander"],"defCommander"]],[".",[".","debug","commander"],"endPauser","false"],["set.","debug",["`","commander"],"commander"]]],["set.","debug",["`","breakHit"],["function","breakHit",["where","value","false","keylist","bpid","entry","result"],["=","keylist",["keys",[".","debug","breakpoints"]]],["loop","false",["=","bpid","false"],[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],[["eq",[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"],[".","where","task"]]]],[[["not",["deref",[".","debug","breakpoints"],"bpid"]],["breakpoint",[".","where","task"],"undefined"],[".","debug","resume","false"],["return","false"]]],["=","entry",["deref",[".","debug","breakpoints"],"bpid"]],["preadjust",[".","entry","hitcount"],"+",1],[[[".","entry","conditional"],[[["procedure",[".","entry","conditional"]],["=","result",["call",[".","entry","conditional"],[".","entry","hitcount"],[".","entry","value"]]]],["=","result",["eval",[".","entry","conditional"]]]],[["not","result"],[".","debug","resume","false"],["return","false"]]]],"bpid"]],["function","breakTasks",["procdef","task","false","taskpath","above","below","pardef","procs","tasks"],["=","taskpath",["tuplepath","procdef","task"]],["=","above",["new","array","taskpath"]],["loop","false",["=","pardef",["apply",["`","."],["list","procdef",["totuple","above"]]]],[[["member",[".","pardef",0],["`",["closure","macro"]]],["=","procs",["instances",[".","pardef",1]]],[[["not","procs"],["return","task"]]],["=","tasks",{array:[]}],["while","false",[["not",["tuple","procs"]]],["=","task",["apply",["`","."],["list",[".",["pop","procs"],"proc"],"below"]]],[[["identity","task"],[".","tasks","push",["task"]]]]],["return","tasks"]]],[["==",[".","above","length"],0]],["push",[".","above","pop","false"],"below"]],"task"],["set.","debug",["`","breakAdd"],["function","breakAdd",["procdef","task","expr","false","firstid","keylist","bpid","tasks","bpdict"],["=","firstid",0],["=","keylist",["keys",[".","debug","breakpoints"]]],["loop","false",[["not",["member",["tostring",["preadjust","firstid","+",1]],"keylist"]]]],["loop","false",[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],["=","bpdict",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"]],[[["eq",[".","bpdict","task"],"task"],["set.","bpdict",["`","conditional"],"expr"],["set.","bpdict",["`","hitcount"],0],["return","bpid"]]]],["=","tasks",["breakTasks","procdef","task"]],["=","bpdict",["breakpoint","tasks",[".","debug","debugBlock"]]],["set.","bpdict",["`","task"],"task"],[[["not","bpdict"],["return","false"]]],["set.","bpdict",["`","breakID"],"firstid"],["set[",[".","debug","breakpoints"],"firstid",{dictionary:{$procdef:"procdef",$where:"bpdict",$hitcount:0,$conditional:"expr"}}],"firstid"]],["set.","debug",["`","breakClear"],["function","breakClear",["procdef","task","false","keylist","tasks","bpid"],["=","keylist",["keys",[".","debug","breakpoints"]]],["=","tasks",["breakTasks","procdef","task"]],["loop","false",[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],[[[">=",[".","tasks","indexOf",[[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"]]],0],["breakpoint","tasks","undefined"],["set[",[".","debug","breakpoints"],"bpid","undefined"],["return","true"]]]],"false"]],["set.","debug",["`","breakDelete"],["function","breakDelete",["bpid","false","tasks"],[[["not",["deref",[".","debug","breakpoints"],"bpid"]],["return","false"]]],["=","tasks",["breakTasks",[".",["deref",[".","debug","breakpoints"],"bpid"],"procdef"],[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"]]],["breakpoint","tasks","undefined"],["set[",[".","debug","breakpoints"],"bpid","undefined"],"true"]],["set.","debug",["`","breakAble"],["function","breakAble",["bpid","enabled","false","bpdict"],["=","bpdict",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"]],[["identity","enable"],["set.","bpdict",["`","enable"],"true"]],["set.","bpdict",["`","enable"],"false"]]],["set.","debug",["`","breakGlobalAble"],["function","breakGlobalAble",["enable"],[[["identity","enable"],["set.","debug",["`","bpenable"],"true"]],["set.","debug",["`","bpenable"],"false"]],["breakpoint",[".","debug","bpenable"]]]],"debug"]),e._SetBindingList("debugger",["function","debugger",["pause"],[".",["DebugController"],"start",["pause"]]]),e._SetBindingList("debugescape",["function","debugescape","false",[".",["DebugController"],"startEscape","false"]]),e._SetBindingList("debugexception",["function","debugexception","false",[[["and",["==",["tostring",["first","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]],["return"]]],[[["==",["tostring","exception"],"$driver"],["return"]]],[[["==",["tostring","exception"],"$debugger"],["return"]]],[[["==",["tostring","exception"],"$DebuggerREPL"],["return"]]],[".",["DebugController"],"startException",["exception"]]]),e._SetBindingList("DebugController",["function","DebugController","false",[[["eq","ndbController",["`","ndbController"]],["=","ndbController",["debugCon"]]]],"ndbController"]),e._AddPropertyList("DebugInit",[["$.lingoInit","true"]]),e._SetBindingList("DebugInit",["function","DebugInit",["false","manifest"],["=","manifest",["`",["bt","debugCon","debugger","debugescape","debugexception","DebugController","DebugInit"]]],[".",[".","Naan","module"],"build",["$Util","$Debug",["function","lambda",["modobj","compobj"],["=","ndbController",["`","ndbController"]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DebugController"],"DebugController"],["set.",[".","modobj","exports"],["`","debugger"],"debugger"],[["symbol","NideBuild"],["sudo",["moveproc","debugescape",["`","escape"]]],["sudo",["moveproc","debugexception",["`","exception"]]],["sudo",["set.",[".","Naan","debug"],["`","debugger"],"debugger"]]]]]]]),e._Execute(["DebugInit"]),e._SetBindingList("NaanError",["closure","NaanError",["false","nerr"],["=","nerr",["new","object","this"]],["set.","nerr",["`","errorID"],"$Naan Error"],["set.","nerr",["`","debug"],"false"],["function","procname",["name","defns","false","parent","strname"],["=","parent",["deref",["@","name"],["`","\\.parent"]]],[[["lambda","name"],["=","strname","$()"]],["=","strname",[".","name","tostring","false"]]],[["identity","parent"],[".",["procname","parent","defns"],"concat",["$.","strname"]]],[["!=",[".","name","namespace"],"defns"],[".",[".",[".","name","namespace"],"tostring"],"concat",["$::","strname"]]],"strname"],["function","trace",["exclude","defns","false","stack","frame","output"],["=","stack",["stacktrace"]],["=","output",{array:[]}],["loop","false",[["atom","stack"]],["=","frame",["pop","stack"]],[[["procedure","frame"],[["<=",["postadjust","exclude","-",1],0],[".","output","push",[["procname",[".",[".","frame",3],1],"defns"]]]]],[["==",[".","frame",0],["`","interrupt"]],[".","output","push",["$[interrupt]"]],["break"]]]],[".",[".","output","reverse","false"],"join",["$ / "]]],["set.","nerr",["`","createError"],["function","createError",["parts","ns","false","nanerr","part","lastparts","badarray"],["function","addToHistory",["item","false","hist","keylist","key","history"],[[["||",["not",[".","nanerr","history"]],["not",["array",[".","nanerr","history"]]]],["set.","nanerr",["`","history"],{array:[]}]]],["=","hist",{dictionary:{}}],["=","keylist",["keys","item"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["==","key","$history"],["=","history",[".","item","history"]]],[["!=","key","$error"],["set[","hist","key",["deref","item","key"]]]]],[".",[".","nanerr","history"],"push",["hist"]],[".","history","forEach",[["function","lambda",["old"],["addToHistory","old"]]]]],["function","addErrorList",["errs","false","err","etrim","keylist","key"],["loop","false",[["atom","errs"]],["=","err",["pop","errs"]],[[["==",[".","err","error"],[".","nerr","errorID"]],["=","etrim",{dictionary:{}}],["=","keylist",["keys","err"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["&&",["!=","key","$error"],["||",["!=","key","$stack"],["!=",["deref","err","key"],[".","nanerr","stack"]]],["||",["!=","key","$module"],["!=",["deref","err","key"],[".","nanerr","module"]]]],["set[","etrim","key",["deref","err","key"]]]]],[[["||",["not",[".","nanerr","errors"]],["not",["array",[".","nanerr","errors"]]]],["set.","nanerr",["`","errors"],{array:[]}]]],[".",[".","nanerr","errors"],"push",["etrim"]]],["=","badarray","true"]]]],["function","addKeys",["dict","keylist","false","key","dkey"],["while","false",[["not",["tuple","keylist"]]],["=","dkey",["=","key",["pop","keylist"]]],["while","false",[["not",["deref","nanerr","dkey"]]],["=","dkey",[".","dkey","concat",["$_"]]]],[[["deref","item","key"],["set[","nanerr","dkey",["deref","dict","key"]]]]]],["function","addJSerror",["item","false","keylist"],["=","keylist",["keys","item"]],[[["not","keylist"],["=","keylist",["`",["$name","$message"]]]]],["addKeys","item","keylist"]],["=","nanerr",{dictionary:{$error:[".","nerr","errorID"],$occurred:[".","Date","now","false"]}}],["loop","false",[["atom","parts"]],["=","part",["pop","parts"]],[[["xobject","part"],["addJSerror","part"]],[["dictionary","part"],[["==",[".","part","error"],[".","nerr","errorID"]],["addToHistory","part"]],["addKeys","part",["keys","part"]]],[["array","part"],["push","part","lastparts"]],[[".","nanerr","memo"],["set.","nanerr",["`","memo"],[".",[".","nanerr","memo"],"concat",["$ ",["tostring","part"]]]]],["set.","nanerr",["`","memo"],["tostring","part"]]]],["set.","nanerr",["`","stack"],["trace",3,"ns"]],["set.","nanerr",["`","module"],[".",["car",["exists","$module","ns"]],"id"]],["loop","false",[["atom","lastparts"]],["addErrorList",["pop","lastparts"]]],[[["not",[".","nanerr","memo"]],["debuglog","$NaanError.createError: no error memo at",[".","nanerr","stack"]]]],[[["identity","badarray"],["debuglog","$NaanError.createError: ignoring array argument"]]],[[[".","nerr","debug"],["call",["function","ErrorDebuglog","args",[".","nerr","debugError",["args"]]],"$new","nanerr"]]],"nanerr"]],["set.","nerr",["`","toString"],["function","toString",["nanerr","options","false","output","keylist","key","history"],["=","output","$"],["=","keylist",["keys","nanerr"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["==","key","$error"]],[["==","key","$occurred"]],[["==","key","$memo"]],[["==","key","$stack"]],[["==","key","$module"]],[["==","key","$history"],["=","history",[".","nanerr","history"]]],[[["!=","output","$"],["=","output",[".","output","concat",["$, "]]]]],["=","output",[".","output","concat",["key","$=",["tostring",["deref","nanerr","key"]]]]]]],[[["identity","history"],[[["!=","output","$"],["=","output",[".","output","concat",["$, "]]]]],["=","output",[".","output","concat",["$«"]]],[".",[".","nanerr","history"],"forEach",[["function","lambda",["item","index"],[[["!=","index",0],["=","output",[".","output","concat",["$ | "]]]]],["=","output",[".","output","concat",[["toString","item",{dictionary:{$memo:"true"}}]]]]]]],["=","output",[".","output","concat",["$»"]]]]],[["&&",[".","options","memo"],[".","nanerr","memo"]],[".",[".","nanerr","memo"],"concat",["$ ","output"]]],"output"]],["set.","nerr",["`","toDescription"],["function","toDescription",["nanerr"],[["!=",[".","nanerr","error"],[".","nerr","errorID"]],["tostring","nanerr"]],[[".","nanerr","memo"],["toString","nanerr",{dictionary:{$memo:"true"}}]],[".","$Error ","concat",[["toString","nanerr"]]]]],["set.","nerr",["`","debugError"],["function","debugError",["args","false","arg","text","nanerr","nanerrs"],["loop","false",[["atom","args"]],["=","arg",["pop","args"]],[[["&&",["dictionary","arg"],["==",[".","arg","error"],[".","nerr","errorID"]]],["=","nanerr","arg"]],[["array","arg"],["=","nanerrs","arg"]],["push","arg","text"]]],["=","text",["reverse","text"]],[[["identity","nanerr"],[[["identity","text"],["=","text",["append","text","$=>"]]],["=","text","$"]],["=","text",["append","text",[".","nerr","toDescription",["nanerr"]]]]],[["&&",["not","text"],"nanerrs"],["=","text",[".",[".",[".","nanerrs","length"],"tostring"],"concat",["$ errors:"]]]]],["apply","debuglog","text"],["loop","false",[["||",["not","nanerrs"],["==",[".","nanerrs","length"],0]]],["=","nanerr",[".","nanerrs","shift","false"]],["=","text",["append","$    ",[".","nerr","toDescription",["nanerr"]]]],["apply","debuglog","text"]]]],"nerr"]),e._SetBindingList("Error",["function","Error","parts",[".","naneErrorManager","createError",["parts",["nscaller"]]]]),e._SetBindingList("ErrorObject",["function","ErrorObject",["err"],["&&",["dictionary","err"],["==",[".","err","error"],"$Naan Error"]]]),e._SetBindingList("ErrorString",["function","ErrorString",["nanerr"],[["string","nanerr"],"nanerr"],[".","naneErrorManager","toString",["nanerr","true"]]]),e._SetBindingList("ErrorDebuglog",["function","ErrorDebuglog","args",[".","naneErrorManager","debugError",["args"]]]),e._AddPropertyList("ErrorInit",[["$.lingoInit","true"]]),e._SetBindingList("ErrorInit",["function","ErrorInit",["false","manifest"],["=","manifest",["`",["NaanError","Error","ErrorObject","ErrorString","ErrorDebuglog","ErrorInit"]]],[".",[".","Naan","module"],"build",["$Util","$Error",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","Error"],"Error"],["set.",[".","modobj","exports"],["`","ErrorObject"],"ErrorObject"],["set.",[".","modobj","exports"],["`","ErrorString"],"ErrorString"],["set.",[".","modobj","exports"],["`","ErrorDebuglog"],"ErrorDebuglog"],["set.",[".","Naan","module"],["`","Error"],"Error"],["set.",[".","Naan","module"],["`","ErrorObject"],"ErrorObject"],["set.",[".","Naan","module"],["`","ErrorString"],"ErrorString"],["set.",[".","Naan","module"],["`","ErrorDebuglog"],"ErrorDebuglog"]]]],["=","naneErrorManager",["NaanError"]]]),e._Execute(["ErrorInit"]),e._SetBindingList("makeSourceString",["function","makeSourceString",["item","false","text","result"],["=","text",["explode","item"]],["=","result",'$"'],[[["string","item"],["=","result",[".","result","concat",["$$"]]]],[["==",["tostring","item"],"$."]],[["or",["eq",["car","text"],"$$"],["eq",["car","text"],"$."],["eq",["car","text"],"$\\"]],["=","result",[".","result","concat",["$\\\\"]]]]],["loop","false",[["empty","text"]],[[["eq",["car","text"],'$"'],["=","result",[".","result","concat",['$\\"']]]],[["eq",["car","text"],"$\\"],["=","result",[".","result","concat",["$\\\\"]]]],[["eq",["car","text"],"$\t"],["=","result",[".","result","concat",["$\\t"]]]],[["eq",["car","text"],"$\n"],["=","result",[".","result","concat",["$\\n"]]]],[["eq",["car","text"],"$\r"],["=","result",[".","result","concat",["$\\r"]]]],[["eq",["car","text"],"$\b"],["=","result",[".","result","concat",["$\\b"]]]],[["eq",["car","text"],"$\f"],["=","result",[".","result","concat",["$\\f"]]]],[["eq",["car","text"],"$\v"],["=","result",[".","result","concat",["$\\u000b"]]]],[["eq",["car","text"],"$\0"],["=","result",[".","result","concat",["$\\u0000"]]]],["=","result",[".","result","concat",[["car","text"]]]]],["=","text",["cdr","text"]]],[".","result","concat",['$"']]]),e._SetBindingList("pkgSave",["function","pkgSave",["pkgname","roots","options"],["function","defObjEncoder",["obj","false","ident"],["=","ident",{dictionary:{$name:["||",["get","obj","\\.closure"],"undefined"]}}]],["function","dialectName",["ns"],[".",[".",[".",[".",[".",[".",[".","module","owner"],"list"],"Lib"],"exports"],"Registry"],"findNamespace",["ns"]],"name"]],["=","options",["merge",{dictionary:{$objectEncoder:"defObjEncoder",$dialectName:"dialectName"}},"options"]],["packageEncode","pkgname","roots","options"]]),e._SetBindingList("pkgDecode",["function","pkgDecode",["pkg","options"],["function","defObjDecoder",["ident","false","obj"],[[".","ident","name"],["putproc",[".","ident","name"],"false"],["=","obj",["call",["closure","lambda",["nn"],["call",["enclose",["list",["`","closure"],"nn",["`",["local","x"]],["quote",["=","x",["new","object","nn"]]],["quote",["put","x","\\.tostring",["function","lambda","false",["strcat","${blank-proxy ","nn","$}"]]]],["quote",["put","x","\\.undefined",["function","undef","args",["debuglog",["strcat","$call to {blank-proxy ","nn","$}.",[".","args",0],["||",[".","args",-1],"$()"],"$ ignored"]]]]],"x"]]]],[".","ident","name"]]]],["=","obj",["new","object"]]],["function","dialectSym",["name","sym"],["deref",[".",[".",[".","Naan","runtimelib"],"dialect",["name"]],"operators"],"sym"]],["=","options",["merge",{dictionary:{$objectDecoder:"defObjDecoder",$dialectSym:"dialectSym"}},"options"]],["packageDecode","pkg","options"]]),e._SetBindingList("pkgExamine",["function","pkgExamine",["pkg","false","exlist","header","state"],["function","printProps",["dict","false","keylist","key"],["=","keylist",["keys","dict"]],["loop","false",[["empty","keylist"]],["=","key",["pop","keylist"]],[[["member","key",["`",["$.sourcemap","$.children","$.parent"]]],["printline","$            ","key"]],["printline","$            ","key","$, ",["xget","dict","key"]]]]],["=","exlist",["pkgDecode","pkg"]],[[["atom","exlist"],["printline",[".","$pkgExamine error:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["newline"],["printline","$=================================================="],["printline","$     package: ",[".","header",0]],["printline","$     version: ",[".","header",1]],["printline","$     prereqs: ",[".","header",2]],["printline","$root symbols: ",[".","header",3]],["printline","$      states: ",["length","exlist"]],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["printline","$invalid symbol: ","state"]],["printline","$=================================================="],["printline","$   name: ",[".","state",0]],["printline","$--------------------------------------------------"],["printline","$         val: ",[".","state",1]],[[["dictionary",[".","state",2]],["printline","$        prop:"],["printProps",[".","state",2]]],["printline","$        prop: ",[".","state",2]]],["printline","$       sites: ",[".","state",4]],[["atom",[".","state",3]],["printline","$        proc: ",[".","state",3]]],["printline","$        proc: "],["printline",[".",[".",[".",[".",[".",[".","Naan","module"],"modlist","false"],"Lingo"],"exports"],"Base"],"print",[[".","state",3]]]]]],["printline","$=================================================="],[".","header",0]]),e._SetBindingList("pkgLoad",["function","pkgLoad",["pkg","options","false","exlist","header","roots","state","sym","sitelist","site","proc","executions"],["=","options",["merge",{dictionary:{$localroots:"true",$intern:"true",$execute:"true"}},"options"]],["=","exlist",["pkgDecode","pkg","options"]],[[["atom","exlist"],["debuglog",[".","$pkgLoad error:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["=","executions",{array:[]}],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["debuglog","$invalid symbol: ","state"]],[[[".","options","intern"],["=","sym",["compress",[".","state",0]]],[["not",["eq",[".","sym","namespace"],[".",["nsactive"],0]]],[[".","options","localroots"],["=","sym",["car",["letlocal","sym"]]]],["debuglog","$cannot overwrite symbol ","sym","$ in ",[".","sym","namespace"]],["continue"]]],["=","sym",["unintern",[".","state",0]]]],["push","sym","roots"],["assign","sym",[".","state",1]],["=","proc",[".","state",3]],["putproc","sym","proc"],["replacer","sym",[".","state",2]],[[[".","proc",1],["copyann",[".","proc",1],"sym"]]],["=","sitelist",[".","state",4]],["loop","false",[["empty","sitelist"]],["=","site",["pop","sitelist"]],["put",[".","site",0],[".","site",1],[".","site",2]]],[["&&",[".","options","execute"],[".","state",3],["get","sym","$.lingoInit"]],[".","executions","push",["sym"]]]]],["while","false",[["not",[">",[".","executions","length"],0]]],["call",[".","executions","shift","false"]]],["reverse","roots"]]),e._SetBindingList("pkgToJsSource",["function","pkgToJsSource",["pkg","false","output","indent","atnl"],["=","output","$"],["=","indent",0],["=","atnl","true"],["function","indent",["adj"],["preadjust","indent","+","adj"]],["function","newline","false",["=","atnl","true"],["=","output",[".","output","concat",["cr"]]]],["function","write","strings",["call",["function","lambda",["false","cnt","str"],["while","false",[["not",["not",["empty","strings"]]]],[[["identity","atnl"],["=","atnl","false"],["=","cnt","indent"],["while","false",[["not",[">",["postadjust","cnt","-",1],0]]],["=","output",[".","output","concat",["$    "]]]]]],["=","str",["pop","strings"]],[[[">=",[".","str","indexOf",["$\n"]],0],["=","atnl","true"]]],["=","output",[".","output","concat",["str"]]]]]],"output"],["function","writeline","strings",["apply","write","strings"],["newline"]],["function","atomString",["expr","false","vertical"],[["||",["symbol","expr"],["string","expr"]],["makeSourceString","expr"]],[["float","expr"],[".",'$".',"concat",["expr",'$"']]],[["integer","expr"],"expr"],[["array","expr"],["arrayString","expr","vertical"]],[["dictionary","expr"],["dictionaryString","expr","vertical"]],["debuglog","$pkgToJsSource: unsupported atom: ","expr"],"$false"],["function","arrayString",["arr","false","adex","expr","separator","result"],["=","result","${array:["],["=","adex",0],["loop","false",[[">=","adex",[".","arr","length"]]],["=","expr",["deref","arr",["postadjust","adex","+",1]]],[[["not","separator"],[[["identity","vertical"],["=","separator","$,\n"]],["=","separator","$, "]],["=","vertical","true"],["=","result",[".","result","concat",[["exprString","expr"]]]]],["=","result",[".","result","concat",["separator",["exprString","expr"]]]]]],[".","result","concat",["$]}"]]],["function","dictionaryString",["obj","false","keylist","key","separator","result"],[[["cdr","obj"],["=","result",[".","${tag:","concat",[["atomString",["cdr","obj"]],"$,dictionary:{"]]]],["=","result","${dictionary:{"]],["=","keylist",["keys","obj"]],["loop","false",[["empty","keylist"]],["=","key",["pop","keylist"]],[[["not","separator"],[[["identity","vertical"],["=","separator","$,\n"]],["=","separator","$, "]],["=","vertical","true"],["=","result",[".","result","concat",[["atomString","key"],"$: ",["exprString",["deref","obj","key"]]]]]],["=","result",[".","result","concat",["separator",["atomString","key"],"$: ",["exprString",["deref","obj","key"]]]]]]],[".","result","concat",["$}}"]]],["function","openListString",["exlist","false","expr","comma","result"],[[["atom","exlist"],["return",["atomString","exlist"]]]],["=","comma","$"],["=","result","$"],["loop","false",[["empty","exlist"]],["=","expr",["pop","exlist"]],["=","result",[".","result","concat",["comma",["exprString","expr"]]]],["=","comma","$, "]],"result"],["function","paramListString",["exlist"],[[["atom","exlist"],["return",["atomString","exlist"]]]],["exprString","exlist"]],["function","exprString",["exlist"],[[["atom","exlist"],["return",["atomString","exlist"]]]],[".","$[","concat",[["openListString","exlist"],"$]"]]],["function","procsym",["sym"],["=","sym",["tostring","sym"]],["return",["||",["==","sym","$function"],["==","sym","$function&"],["==","sym","$macro"],["==","sym","$closure"],["==","sym","$let"],["==","sym","$let&"]]]],["function","writeCall",["exlist","more","false","opstr"],[[["atom","exlist"],["write",["atomString","exlist"]],["return"]]],["=","opstr",["tostring",["car","exlist"]]],[[["procsym",["car","exlist"]],["writeline","$[",["atomString",["car","exlist"]],"$, ",["atomString",["second","exlist"]],"$, ",["paramListString",["third","exlist"]],"$,"],["indent",1],["writeBody",["cdddr","exlist"]],["indent",-1],["write","$]"]],[["||",["==","opstr","$loop"],["==",[".",["car","exlist"],"proc"],[".",["`","loop"],"proc"]]],["writeline","$[",["atomString",["car","exlist"]],"$, ",["atomString",["second","exlist"]],"$,"],["indent",1],["writeBody",["cddr","exlist"]],["indent",-1],["write","$]"]],[["==","opstr","$call"],["writeline","$[",["atomString",["car","exlist"]],"$,"],["indent",1],[[["cddr","exlist"],["writeCall",["second","exlist"],"$,"],["indent",-1],["newline"],["write",["openListString",["cddr","exlist"]]]],["writeCall",["second","exlist"],"$"],["indent",-1]],["write","$]"]],[["==","opstr","$catch"],["writeline","$[",["atomString",["pop","exlist"]],"$,"],["indent",1],[[["car","exlist"],["write","$["],["indent",1],["writeBody",["car","exlist"],"$"],["indent",-1],["write","$],\n"]],["writeline",["atomString","false"],"$,"]],[[["second","exlist"],["write","$["],["writeBody",["second","exlist"],"$"],["write","$],\n"]],["writeline",["atomString","false"],"$,"]],[[["third","exlist"],["write","$["],["indent",1],["writeBody",["third","exlist"],"$"],["indent",-1],["write","$]"]],["write",["atomString","false"]]],["indent",-1],["write","$]"]],[["||",["==","opstr","$quote"],["==","opstr","$`"]],["write",["exprString","exlist"]]],["write",[".","$[","concat",[["openListString","exlist"],"$]"]]]],["write","more"]],["function","writeBody",["exlist","false","expr","more"],["loop","false",[["empty","exlist"]],["=","expr",["pop","exlist"]],[[["empty","exlist"],["=","more","$"]],["=","more","$,\n"]],[[["atom","expr"],["write",["atomString","expr"],"more"]],[["atom",["car","expr"]],["writeCall","expr","more"]],[["atom",["caar","expr"]],[["cdr","expr"],["write","$["],["writeCall",["car","expr"],"$,\n"],["indent",1],["writeBody",["cdr","expr"]],["indent",-1],["write","$]","more"]],["write","$[",["exprString",["car","expr"]],"$]","more"]],["writeline","$["],["indent",1],["writeBody",["list",["car","expr"]]],[[["cdr","expr"],["writeline","$,"],["writeBody",["cdr","expr"]]]],["indent",-1],["write","$]","more"]]]],["function","writeProc",["sym","proc"],["writeline","$ninti._SetBindingList(",["atomString","sym"],"$,"],["indent",1],[[["string","proc"],["writeline","proc"]],["writeline","$[",["atomString",["car","proc"]],"$, ",["atomString",["second","proc"]],"$, ",["paramListString",["third","proc"]],"$,"],["indent",1],["writeBody",["cdddr","proc"]],["indent",-1],["writeline","$]"]],["indent",-1],["writeline","$);"]],["function","writeProps",["sym","props","false","prop","preceded","header"],[[["atom","props"],["return"]]],["=","preceded","$"],["while","false",[["not",["not",["empty","props"]]]],["=","prop",["pop","props"]],[[["==",["tostring",["car","prop"]],"$.sourcemap"],["continue"]]],[[["==",["tostring",["car","prop"]],"$.children"],["continue"]]],[[["not","header"],["=","header","true"],["writeline","$ninti._AddPropertyList(",["atomString","sym"],"$,"],["indent",1],["write","$["]]],["write","preceded","$[",["atomString",["car","prop"]],"$, ",["exprString",["cdr","prop"]],"$]"],["=","preceded","$,\n"]],[[["not","header"],["return"]]],["write","$]"],["indent",-1],["newline"],["writeline","$);"]],["function","writeValue",["sym","value"],["writeline","$ninti._SetValue(",["atomString","sym"],"$, ",["exprString","value"],"$);"]],["call",["function","lambda",["false","exlist","header","state","proc"],["=","exlist",["pkgDecode","pkg"]],[[["atom","exlist"],["debuglog",[".","$pkgToJsSource:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["indent",1],["writeline","$/*"],["writeline","$ * ",[".",[".","pkg",0],3]],["writeline","$ *"],["writeline","$ */"],["newline"],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["debuglog","$invalid symbol: ","state"]],[[["!=",[".","state",1],[".","state",0]],["writeValue",[".","state",0],[".","state",1]]]],[[[".","state",2],["writeProps",[".","state",0],["totuple",[".","state",2]]]]],["=","proc",[".","state",3]],[[["tuple","proc"],["writeProc",[".","state",0],"proc"]]],[["||",[".","state",2],["tuple","proc"]],["newline"]]]],["indent",-1],"output"]]]),e._AddPropertyList("PackagerInit",[["$.lingoInit","true"]]),e._SetBindingList("PackagerInit",["function","PackagerInit",["false","manifest"],["=","manifest",["`",["makeSourceString","pkgSave","pkgDecode","pkgExamine","pkgLoad","pkgToJsSource","PackagerInit"]]],[".",[".","Naan","module"],"build",["$Util","$Packager",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","pkgSave"],"pkgSave"],["set.",[".","modobj","exports"],["`","pkgExamine"],"pkgExamine"],["set.",[".","modobj","exports"],["`","pkgLoad"],"pkgLoad"],["set.",[".","modobj","exports"],["`","pkgToJsSource"],"pkgToJsSource"]]]]]),e._Execute(["PackagerInit"]),e._SetValue("jsScripts",{dictionary:{}}),e._SetBindingList("JsLoadScript",["closure","JsLoadScript",["libpath","globalID","false","locin","savens","hostpath","error","console","pending","scriptTag"],["global","module","jsScripts","Naan","JSpath","js"],["=","locin",[".","libpath","split",["$:"]]],[[["&&",["==",[".","locin","length"],2],[">",[".",[".","locin",0],"length"],1]],["=","libpath",[".","locin",1]],["=","locin",[".","locin",0]]],["=","locin","false"]],[[["deref","jsScripts","libpath"],["return"]]],["=","savens",["makeReturner"]],["=","hostpath",[".",[".",[".",[".","js","w"],"location"],"origin"],"concat",[[".","JSpath","join",[[".","JSpath","dirname",[[".",[".",[".","js","w"],"location"],"pathname"]]],"libpath"]]]]],[[["&&",[".",[".","js","s"],"importScripts"],["==",["tostring",[".",[".","js","s"],"importScripts"]],"$[Function importScripts]"]],["catch",[[".",[".","js","s"],"importScripts",["hostpath"]],["set[","jsScripts","libpath",["deref",[".","js","s"],"globalID"]]],[[["identity","true"],["=","error",["Error",["strcat","$JsLoadScript(","libpath","$) failed"],"exception"]],["=","console",[".","js","s"]]]],"false"]],[[".","js","w"],["=","pending",["new","nonce"]],["=","scriptTag",[".",[".",[".","js","w"],"document"],"createElement",["$script"]]],["set.","scriptTag",["`","src"],[".","hostpath","concat",[[".",[".","Naan","module"],"requireQuery","false"]]]],["set.","scriptTag",["`","onload"],["function","lambda",["event"],["set[","jsScripts","libpath",["deref",[".","js","w"],"globalID"]],[".","pending","signal",[["deref",[".","js","w"],"globalID"]]],"true"]],["set.","scriptTag",["`","onerror"],["function","lambda",["event"],["=","error",["Error",["strcat","$JsLoadScript(","libpath","$) not found"]]],["=","console",[".","js","w"]],[".","pending","signal",["false"]],"true"]],[".",[".",[".",[".","js","w"],"document"],"body"],"appendChild",["scriptTag"]],[".","pending","wait","false"]],[[".","js","g"],[[["identity","locin"],["=","locin",["deref",[".",[".","module","owner"],"locations"],"locin"]],[["identity","locin"],["=","libpath",[".","JSpath","resolve",["locin","libpath"]]]],["=","error",["Error",["strcat","$JsLoadScript(","locin","$:","libpath","$) is an undefined location"]]],["=","console",[".","js","g"]]]],[["not","error"],["set[","jsScripts","libpath",[".","js","r",["libpath"]]]]]],["savens"],[[["identity","error"],["ErrorDebuglog","error"],[".","console","log",[["ErrorString","error"]]],["throw","error"]]],["deref","jsScripts","libpath"]]),e._SetBindingList("JSONparse",["function","JSONparse",["str"],[".",[".",["||",[".","js","w"],[".","js","g"]],"JSON"],"parse",["str"]]]),e._SetBindingList("JSONstringify",["function","JSONstringify",["obj"],[".",[".",["||",[".","js","w"],[".","js","g"]],"JSON"],"stringify",["obj"]]]),e._SetBindingList("JsonParse",["function","JsonParse",["data"],["global","exception"],["catch",[["=","data",["JSONparse","data"]],["list","false","data"]],[[["identity","true"],["list","exception"]]],"false"]]),e._SetBindingList("JsonStringify",["function","JsonStringify",["data"],["global","exception"],["catch",[["=","data",["JSONstringify","data"]],["list","false","data"]],[[["identity","true"],["list","exception"]]],"false"]]),e._SetBindingList("EncodeBase64",["function","EncodeBase64",["data","false","blob","reader","pending","result"],[["not","data"],"$"],[[".","js","g"],[".",[".",[".",[".","js","g"],"Buffer"],"from",["data","$binary"]],"toString",["$base64"]]],[["xobject","data"],["=","blob",["xnew",[".",[".","js","w"],"Blob"],{array:["data"]}]],["=","reader",["xnew",[".",[".","js","w"],"FileReader"]]],["=","pending",["new","nonce"]],["set.","reader",["`","onload"],["function","lambda",["event"],[".","pending","signal",[[".",[".","event","target"],"result"]]]]],[".","reader","readAsDataURL",["blob"]],["=","result",[".","pending","wait","false"]],[".","result","slice",[37]]],[".",[".","js","w"],"btoa",["data"]]]),e._SetBindingList("DecodeBase64",["function","DecodeBase64",["data","false","error","resp","blob"],[["not","data"],["xnew"]],[[".","js","g"],[".",[".",[".","js","g"],"Buffer"],"from",["data","$base64"]]],["=",["error","resp"],["await",[".",[".","js","w"],"fetch",[["strcat","$data:application/octet-stream;base64,","data"]]]]],[[["not","error"],["=",["error","blob"],["await",[".","resp","blob","false"]]]]],[[["not","error"],["=",["error","blob"],["await",[".","blob","arrayBuffer","false"]]]]],[[["not","error"],["=","blob",["xnew",[".",[".","js","w"],"Uint8Array"],"blob"]]]],[["identity","error"],["debuglog","$DecodeBase64 failed","error"],["xnew"]],"blob"]),e._SetBindingList("IsBinary",["function","IsBinary",["obj","false","jio"],["=","jio",[".",[".",[".","Naan","runtimelib"],"jsInstanceOf"],"proc"]],[[".","js","g"],["||",["jio","obj",[".",[".","js","g"],"Buffer"]],["jio","obj",[".",[".","js","g"],"ArrayBuffer"]],["jio","obj",[".",[".","js","g"],"DataView"]]]],["||",["jio","obj",[".",[".","js","w"],"Uint8Array"]],["jio","obj",[".",[".","js","w"],"ArrayBuffer"]],["jio","obj",[".",[".","js","w"],"Blob"]]]]),e._SetBindingList("HashMD5",["function","HashMD5",["data"],["global","crypto","js"],[[".","js","g"],[[["not",["xobject","crypto"]],["=","crypto",[".","js","r",["$crypto"]]]]],[["identity","crypto"],["catch",[[".",[".",[".","crypto","createHash",["$MD5"]],"update",["data"]],"digest",["$hex"]]],[[["identity","true"],["debuglog","$HashMD5 failed:","exception"],"false"]],"false"]]],["JsLoadScript","$frameworks/browser/spark-md5/spark-md5.min.js","$SparkMD5"],[["not",[".",[".","js","w"],"SparkMD5"]],["debuglog","$HashMD5 unavailable"],"false"],[["xobject","data"],[".",[".",[".",[".","js","w"],"SparkMD5"],"ArrayBuffer"],"hash",["data"]]],[".",[".",[".","js","w"],"SparkMD5"],"hash",["data"]]]),e._SetBindingList("await",["closure","await",["promise","timeout","false","pending"],[[["not","promise"],["throw",["list","internal","$await on false promise"]]]],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[["identity","timeout"],[".","pending","wait",["timeout",["list",["Error",["strcat","$await timeout after ","timeout","$ msec"]]]]]],[".","pending","wait","false"]]),e._AddPropertyList("UtilInit",[["$.lingoInit","true"]]),e._SetBindingList("UtilInit",["function","UtilInit",["false","manifest"],["=","manifest",["`",["jsScripts","JsLoadScript","JSONparse","JSONstringify","JsonParse","JsonStringify","EncodeBase64","DecodeBase64","IsBinary","HashMD5","await","UtilInit"]]],[".",[".","Naan","module"],"build",["$Util","$Util",["function","lambda",["modobj","compobj"],["=","JSpath",[".","js","r",["$path"]]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","JSpath"],"JSpath"],["set.",[".","modobj","exports"],["`","JsLoadScript"],"JsLoadScript"],["set.",[".","modobj","exports"],["`","JSONstringify"],"JSONstringify"],["set.",[".","modobj","exports"],["`","JSONparse"],"JSONparse"],["set.",[".","modobj","exports"],["`","JsonStringify"],"JsonStringify"],["set.",[".","modobj","exports"],["`","JsonParse"],"JsonParse"],["set.",[".","modobj","exports"],["`","EncodeBase64"],"EncodeBase64"],["set.",[".","modobj","exports"],["`","DecodeBase64"],"DecodeBase64"],["set.",[".","modobj","exports"],["`","IsBinary"],"IsBinary"],["set.",[".","modobj","exports"],["`","HashMD5"],"HashMD5"]]]]]),e._Execute(["UtilInit"]),e._SetNamespace(t,!0)}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
+!function(e){e.BootModule=function(e){"use strict";var t=e._SetNamespace("Util");e._CopyBinding("equal","=="),e._CopyBinding("setq","="),e._CopyBinding("times","*"),e._CopyBinding("and","&&"),e._CopyBinding("or","||"),e._CopyBinding("loop","while"),e._Import("number","difference","-"),e._Import("number","greater",">"),e._Import("number","lesser","<"),e._Import("number","times","*"),e._Import("number","plus","+"),e._Import("number","quotient","/"),e._Import("number","quotient","/."),e._Import("number","mod","%"),e._SetBindingList("!=",["function","!=",["ex1","ex2"],["not",["equal","ex1","ex2"]]]),e._SetBindingList(">=",["function",">=",["ex1","ex2"],["or",["greater","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("<=",["function","<=",["ex1","ex2"],["or",["lesser","ex1","ex2"],["equal","ex1","ex2"]]]),e._SetBindingList("+=",["macro","+=",["ex1","ex2"],["assign","ex1",["+",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("-=",["macro","-=",["ex1","ex2"],["assign","ex1",["-",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("*=",["macro","*=",["ex1","ex2"],["assign","ex1",["*",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("/=",["macro","/=",["ex1","ex2"],["assign","ex1",["/",["car","ex1"],["eval","ex2"]]]]),e._SetBindingList("Component",["closure","Component",["modobj","name","filename","false","compobj"],["=","compobj",["new","object","this"]],["set.","compobj",["`","module"],"modobj"],["set.","compobj",["`","name"],"name"],["set.","compobj",["`","filename"],"filename"],["set.","compobj",["`","modsym"],[".","modobj","modsym"]],["set.","compobj",["`","manifest"],"false"],["set.","compobj",["`","loaded"],"false"],["set.","compobj",["`","package"],["function","package",["false","pkg","curactns","returner"],[".",[".","Naan","module"],"require",["$Util/Packager.nlg"]],[[["not",[".",[".","module","exports"],"pkgSave"]],["return","false"]]],["=","curactns",["nsactive"]],["=","returner",["makeReturner"]],["catch",[[".","modobj","activate","false"],["=","pkg",["pkgSave",["compress",[".","compobj","name"]],[".","compobj","manifest"]]]],[[["identity","true"],["ErrorDebuglog","$package exception: ","exception"],["return","false"]]],[["returner"]]],"pkg"]],["set.","compobj",["`","jspackage"],["function","jspackage",["false","pkg"],["=","pkg",["package"]],[[["not","pkg"],["return","false"]]],["pkgToJsSource","pkg"]]],["set.","compobj",["`","npackage"],["function","npackage",["false","pkg"],["=","pkg",["package"]],[["identity","pkg"],["JSONstringify","pkg"]]]],["set.","compobj",["`","save"],["function","save",["fpath","overwrite","false","text","pathobj","options"],["=","text",["jspackage"]],[[["not","text"],["return","false"]]],["=","fpath",[".","JSpath","normalize",["fpath"]]],["=","pathobj",[".","JSpath","parse",["fpath"]]],[[["==",["length",[".","pathobj","ext"]],0],["=","fpath",["strcat","fpath","$.json"]]]],["=","options",["xnew"]],[[["identity","overwrite"],["set.","options",["`","flags"],"$w"]],["set.","options",["`","flags"],"$wx"]],["=","fpath",[".","JSpath","join",[[".","js","d"],"fpath"]]],[".",[".","js","r",["$fs"]],"writeFileSync",["fpath","text","options"]],"fpath"]],"compobj"]),e._SetBindingList("Module",["closure","Module",["modules","modid","exns","false","modobj"],["=","modobj",["new","object","this"]],["set.","modobj",["`","owner"],"modules"],["set.","modobj",["`","id"],"modid"],["set.","modobj",["`","created"],[".","Date","now","false"]],["closure","makeActivator",["false","checkns","targns"],["=","checkns",["nsrights"]],["=","targns",["car",["nsactive"]]],["call",["enclose",["function","lambda","false",["function","returner","false",[["eq","checkns",[".",[".","Naan","local"],"nscaller","false"]],["nsactive",["cons","targns",["inherits"]]]]],"returner"],"targns"]]],["set.","modobj",["`","inherits"],["function","inherits",["false","result","nslist"],["=","nslist",[".","modobj","inherit"]],["loop","false",[["empty","nslist"]],["=","ns",["pop","nslist"]],[[["not",["member","ns","result"]],["push","ns","result"]]]],["push",["second",["nsactive","true"]],"result"],["reverse","result"]]],["set.","modobj",["`","makeComponent"],["function","lambda",["compname","filename","false","compobj"],["=","compobj",["Component","modobj","compname","filename"]],["set[",[".","modobj","components"],"compname","compobj"]]],["set.","modobj",["`","destroy"],["function","destroy","false",[".","modules","destroy",["modobj"]],"true"]],["call",["let","lambda",["false","mtuple"],["function","nsinit",["modobj","false","modsym"],["letlocal","$module"],["=","modsym",["compress","$module"]],["putproc","modsym",[".","modules","moduleProc"]],["assign","modsym","modobj"],["list",["car",["nsactive"]],["makeActivator"],"modsym"]],["function","registerns",["ns","modobj","false","curactns"],["=","curactns",["nsactive"]],["sudo",["nsactive",["cons","ns","curactns"]]],["=","ns",["nsinit","modobj"]],["sudo",["nsactive","curactns"]],"ns"],["function","makens",["nsname","modobj","false","ns"],["=","ns",["new","namespace","nsname"]],["=","ns",["nsinit","modobj"]],["sudo",["nsactive",["cdr",["nsactive"]]]],"ns"],["set.","modobj",["`","locpath"],"$"],["set.","modobj",["`","exports"],{dictionary:{}}],["put",[".","modobj","exports"],["`","module"],"modobj"],["set.","modobj",["`","children"],{array:[]}],["set.","modobj",["`","components"],{dictionary:{}}],[[["identity","exns"],["=","mtuple",["registerns","exns","modobj"]]],["=","mtuple",["makens","modid","modobj"]]],["set.","modobj",["`","namespace"],["car","mtuple"]],["set.","modobj",["`","activate"],["second","mtuple"]],["set.","modobj",["`","modsym"],["third","mtuple"]]]],"modobj"]),e._SetBindingList("Modules",["closure","Modules",["false","modules"],["=","modules",["new","object","this"]],["set.","modules",["`","list"],{dictionary:{}}],["set.","modules",["`","locations"],{dictionary:{$naanlib:"$"}}],["set.","modules",["`","extensions"],{array:["$nlg","$npk"]}],["set.","modules",["`","queryString"],"$"],["function","reload",["false","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"reload","false"]],[[["identity","true"],"false"]],"false"]],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"postload","false"]],[[["identity","true"],"false"]],"false"]]],["loadNotify","reload"],["function","resave",["false","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"]],["catch",[[".",["deref",[".","modules","list"],["pop","mkeys"]],"resave","false"]],[[["identity","true"],"false"]],"false"]]],["saveNotify","resave"],["set.","modules",["`","moduleProc"],["function","moduleProc",["modid"],[["not","modid"],["keys",[".","modules","list"]]],["deref",[".","modules","list"],"modid"]]],["set.","modules",["`","find"],["function","find",["test","false","modobj","mkeys"],["=","mkeys",["keys",[".","modules","list"]]],["loop","false",[["empty","mkeys"],"false"],["=","modobj",["xget",[".","modules","list"],["pop","mkeys"]]],[["test","modobj"],"modobj"]]]],["set.","modules",["`","letinherit"],["function","letinherit",["modfrom","false","modto","curac","nsfrom","nsto"],["=","curac",["nsactive"]],[[["string","modfrom"],["=","modfrom",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modfrom"]]]]]],[["not","modfrom"],"false"],["=","modto",["find",["function","lambda",["mod"],["eq",[".","mod","namespace"],["car","curac"]]]]],[[[".","modfrom","inherit"],["=","nsfrom",["cons",[".","modfrom","namespace"],[".","modfrom","inherit"]]]],["=","nsfrom",["list",[".","modfrom","namespace"]]]],[[["identity","modto"],[[[".","modto","inherit"],["set.","modto",["`","inherit"],["append","nsfrom",[".","modto","inherit"]]]],["set.","modto",["`","inherit"],"nsfrom"]],["=","nsto",[".","modto","inherits","false"]]],["=","nsto","nsfrom"]],["nsactive",["append",["car","curac"],"nsto",["cdr","curac"]]],["nsactive"]]],["set.","modules",["`","require"],["closure","require",["fpath","options","data","false","locin","ns","parent","pathobj","locpath","modname","modobj","compname","compath","compobj","error","presult","returner","extensions","pathext","query","hostpath"],["sprint"],[[["&&","options",["not",["dictionary","options"]]],["throw",["Error",[".","$require(","concat",["fpath","$): invalid options"]]]]]],["=","locin",[".","fpath","split",["$:"]]],[[["&&",["==",[".","locin","length"],2],[">",[".",[".","locin",0],"length"],1]],["=","fpath",[".","locin",1]],["=","locin",[".","locin",0]]],["=","locin",[".","options","in"]]],["=","ns",["||",[".","options","parent"],["nscaller"]]],["=","parent",["find",["function","lambda",["mod"],["eq",[".","mod","namespace"],"ns"]]]],["=","pathobj",[".","JSpath","parse",["fpath"]]],[[["||",["==",[".","pathobj","ext"],"$"],[".",["RegExp","$[/\\\\]$"],"test",["fpath"]]],["=","compath",[".","JSpath","join",["fpath",[".","pathobj","base"]]]],["=","pathobj",[".","JSpath","parse",["compath"]]]]],["=","locpath",[".","pathobj","dir"]],["=","modname",[".","JSpath","basename",["locpath"]]],[[["||",["==","modname","$."],["==","modname","$.."]],["=","modname","$"]]],[[["identity","locin"],["=","presult",["deref",[".","modules","locations"],"locin"]],[[["not","presult"],["throw",["Error",[".","$require(","concat",["fpath","$): in:","locin","$ undefined"]]]]]],["=","locpath",[".","JSpath","resolve",["presult","locpath"]]]],[["&&",["!=",[".","pathobj","ext"],"$"],["==","locpath","$"]],["=","locpath",[".","parent","locpath"]]],[["&&",[".",["RegExp","$^[.][.]?[/\\\\]"],"test",["fpath"]],[".","parent","locpath"]],["=","locpath",[".","JSpath","join",[[".","parent","locpath"],"locpath"]]]]],[[["not","locpath"],["=","locpath","$"]]],["set.","pathobj",["`","dir"],"locpath"],["=","compname",[".","pathobj","name"]],[[["&&","locpath",["!=","locpath","$"]],[["==","locpath","$."],["=","modobj","parent"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","locpath"],"locpath"]]]]]],[[["not","modobj"],[["==","modname","$"],["=","modobj","parent"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modname"]]]]]],[[["&&",["not",[".","options","read"]],["not",[".","options","reload"]],["deref",[".","modobj","components"],"compname"]],["return",[".","modobj","exports"]]]],["=","returner",["makeReturner"]],["catch",[["=","extensions",["new",[".","modules","extensions"]]],["loop","false",["=","pathext",[".","extensions","pop","false"]],[["not","pathext"]],["set.","pathobj",["`","ext"],[".","$.","concat",["pathext"]]],["set.","pathobj",["`","base"],[".",[".","pathobj","name"],"concat",[[".","pathobj","ext"]]]],["=","compath",[".","JSpath","format",["pathobj"]]],[[["not","modobj"],["=","modobj",["makeModule","modname"]]]],["=","query",[".","options","query"]],[[["not","query"],["=","query",[".","modules","queryString"]]]],["=","hostpath",[".",[".",[".",[".","js","w"],"location"],"origin"],"concat",[[".","JSpath","dirname",[[".",[".",[".","js","w"],"location"],"pathname"]]]]]],[[[".","options","source"],[["string",[".","options","source"]],["=","presult",[".","options","source"]]],["=",["error","presult"],["call",[".","options","source"],"compath","query"]]],[["identity","hostpath"],["=",["error","presult"],["modWebReadFile","compath","hostpath","query"]]],["=",["error","presult"],["modNodeReadFile","compath"]]],[[[">",["length","presult"],0],[[["==",[".","modobj","locpath"],"$"],["set.","modobj",["`","locpath"],"locpath"]]],[[[".","options","read"],["return","presult"]]],["=","compobj",[".","modobj","makeComponent",["compname",[".","pathobj","base"]]]],[".","modobj","activate","false"],["set.","modobj",["`","data"],"data"],["rdsDriver","presult","compath"],["set.","modobj",["`","data"],"undefined"],["returner"],["set.","compobj",["`","loaded"],"true"],["return",[".","modobj","exports"]]]]],["throw",["Error",[".","$require(","concat",["fpath","$): failed: "]],"compath","error"]],["set[",[".","modobj","components"],"compname","false"],"false"],[[["identity","true"],["ErrorDebuglog",[".","$require(","concat",["fpath","$): exception: "]],"exception"],["set[",[".","modobj","components"],"compname","false"],["returner"],["throw","exception"]]],"false"]]],["set.","modules",["`","defineLoc"],["function","defineLoc",["id","path"],[["not","id"],[".","modules","locations"]],["set[",[".","modules","locations"],"id","path"]]],["set.","modules",["`","defineExt"],["function","defineExt",["ext","reset","false","value"],[[["not","ext"],["=","value",[".","modules","extensions"]]]],[[["identity","reset"],["set.","modules",["`","extensions"],{array:[]}]]],[[["identity","ext"],[".",[".","modules","extensions"],"push",["ext"]],["=","value",[".","modules","extensions"]]]],"value"]],["set.","modules",["`","requireQuery"],["function","requireQuery",["query"],[["not","query"],[".","modules","queryString"]],["set.","modules",["`","queryString"],["modEncodeQuery","query"]]]],["set.","modules",["`","build"],["closure","build","args",["call",["function","lambda",["modname","compname","proc","args","false","modobj","compobj","curactns","presult","returner"],["=","curactns",["nsactive"]],["=","returner",["makeReturner"]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"modname"]]]],[[["identity","modobj"]],[["==",["namespace",["car","curactns"]],"modname"],["=","modobj",["makeModule","modname",["car","curactns"]]]],["=","modobj",["makeModule","modname"]]],[[["not","compname"],["=","compname","modname"]]],["=","compobj",["deref",[".","modobj","components"],"compname"]],[[["not","compobj"],["=","compobj",[".","modobj","makeComponent",["compname"]]]]],["catch",[[[["identity","proc"],[".","modobj","activate","false"],["set.","compobj",["`","loaded"],"false"],["=","presult",["apply","proc",["cons","modobj","compobj","args"]]],["returner"],[["not","presult"],"false"]]],["set.","compobj",["`","loaded"],"true"],[".","modobj","exports"]],[[["identity","true"],["ErrorDebuglog","$module build exception: ","exception"],["returner"],["throw","exception"]]],"false"]],["car","args"],["second","args"],["third","args"],["cdddr","args"]]]],["set.","modules",["`","changeModNS"],["function","changeModNS",["name","create","false","modobj"],["=","name",["tostring","name"]],[[["||",["not","name"],["==","name","$"]],["printline","$modules: ",["keys",[".","modules","list"]]],["return","false"]]],["=","modobj",["find",["function","lambda",["mod"],["==",[".","mod","id"],"name"]]]],[[["not","modobj"],[["identity","create"],["build","name"],["return",["changeModNS","name"]]],["printline","$can't find ","name","$ -- please select from ",["keys",[".","modules","list"]]],["return","false"]]],[".","modobj","activate","false"],[".","modobj","id"]]],["set.","modules",["`","makeModule"],["function","makeModule",["name","exns","false","modobj"],["=","modobj",["Module","modules","name","exns"]],["set[",[".","modules","list"],"name","modobj"],"modobj"]],["set.","modules",["`","destroy"],["function","destroy",["modobj"],["set[",[".","modules","list"],[".","modobj","id"],"undefined"],["delete",[".","modobj","namespace"]],"true"]],"modules"]),e._SetBindingList("modEncodeQuery",["function","modEncodeQuery",["query","false","result","qkeys","item"],[[["not",["dictionary","query"]],["return","query"]]],["=","result",{array:[]}],["=","qkeys",["keys","query"]],["loop","false",[["empty","qkeys"]],["=","item",["pop","qkeys"]],[".","result","push",[[".",[".",[".","js","w"],"encodeURIComponent",["item"]],"concat",["$=",[".",[".","js","w"],"encodeURIComponent",[["deref","query","item"]]]]]]]],["=","result",[".","result","join",["$&"]]],[[">",[".","result","length"],0],[".","$?","concat",["result"]]],"result"]),e._SetBindingList("modAwait",["closure","modAwait",["promise","false","pending"],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[".","pending","wait","false"]]),e._SetBindingList("modWebReadFile",["closure","modWebReadFile",["filename","href","query","false","url","error","response","content"],[[["not","href"],["=","url","filename"]],[[["not",[".","href","endsWith",["$/"]]],["=","href",[".","href","concat",["$/"]]]]],[[[".","filename","startsWith",["$/"]],["=","filename",[".","filename","slice",[1]]]]],["=","url",[".","href","concat",["filename",["modEncodeQuery","query"]]]]],["=",["error","response"],["modAwait",[".",[".","js","w"],"fetch",["url",{dictionary:{$cache:"$no-cache"}}]]]],[[["and",["not","error"],[">=",[".","response","status"],200],["<",[".","response","status"],299]],["=",["error","content"],["modAwait",[".","response","text","false"]]]],[["not","error"],["=","error",["Error","$modWebReadFile failed:","url",[".","response","status"]]]]],[["identity","error"],["list","error"]],["list","false","content"]]),e._SetBindingList("modWebParseFile",["closure","modWebParseFile",["filename","href","query","false","error","text"],["=",["error","text"],["modWebReadFile","filename","href","query"]],[["identity","error"],["ErrorDebuglog","error"]],[["&&",[">",["length","text"],0],["rdsDriver","text","filename"]],"filename"]]),e._SetBindingList("modNodeReadFile",["closure","modNodeReadFile",["filename","false","fs","locpath","error","error2","text"],["function","readFileSync",["path","false","pending"],["=","pending",["new","nonce"]],[".","fs","readFile",["path",{dictionary:{$encoding:"$utf8"}},["function","lambda",["error","data"],[[["identity","error"],["=","error",["Error","$modNodeReadFile failed:","path","error"]]]],[".","pending","signal",[["list","error","data"]]]]]],[".","pending","wait","false"]],["=","fs",[".","js","r",["$fs"]]],["=","locpath",[".","JSpath","resolve",[[".","js","d"],"filename"]]],["=",["error","text"],["readFileSync","locpath"]],[[["identity","error"],["=","locpath",[".","JSpath","resolve",[[".","js","d"],"$../","filename"]]],["=",["error2","text"],["readFileSync","locpath"]],[["not","error2"],["=","error","false"]]]],["list","error","text"]]),e._SetBindingList("modNodeParseFile",["closure","modNodeParseFile",["filename","false","error","text"],["=",["error","text"],["modNodeReadFile","filename"]],[["identity","error"],["ErrorDebuglog","error"]],[["&&",[">",["length","text"],0],["rdsDriver","text","filename"]],"filename"]]),e._SetBindingList("modDriver",["closure","modDriver",["text","sourcename","false","error"],["=",["error"],["modTextParse","text"]],[[["identity","error"],["=","error",["Error","$require(","sourcename","$) failed: ","error"]],["ErrorDebuglog","error"],["throw","error"]]],"true"]),e._SetBindingList("modTextParse",["closure","modTextParse",["text","false","package","dialob","errors","source","error","expr"],[[[".","text","startsWith",['$[["NaanPackage"']],["catch",[[[".",[".","js","w"],"JSON"],["=","package",[".",[".",[".","js","w"],"JSON"],"parse",["text"]]]],["=","package",[".",[".",[".","js","g"],"JSON"],"parse",["text"]]]],[[["identity","true"],["return",["list",["Error","$exception:","exception"]]]]],"false"],["=","roots",["pkgLoad","package"]],[["tuple","roots"],["return",["list","false","roots"]]],["return",["list",["Error","$package load failed"]]]]],["=","text",[".","text","replace",[["RegExp","$[\\r\\n^]+/(dialect)\\s+(\\w+)(?=[\\r\\n$])","$g"],["function","lambda",["match","cmd","arg","offset","str"],[[["==","cmd","$dialect"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",["arg"]]],[["not","dialob"],["return",["list",["Error",["strcat","$dialect ","arg","$ not found"]]]]]],["return",["list",["Error",["strcat","$source /","cmd","$ not understood"]]]]],[".","$\n","repeat",[["-",[".",[".","match","split",["$\n"]],"length"],1]]]]]]],[[["not","dialob"],["=","dialob",[".",[".","Naan","runtimelib"],"dialect",[0]]],[["not","dialob"],["return",["list",["Error","$dialect support not available"]]]]]],["catch",[["=","errors",{array:[]}],["=","source",["new","textstream",[".","text","concat",["$\\r"]]]],["loop","false",["=",["error","expr"],[".","dialob","parse",["source"]]],[[["identity","expr"],["\\$",["evalactive","expr"]]],["=","errors",[".","errors","concat",["error"]]]]]],[[["and",["==",["tostring",["car","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]]],[["identity","true"],["return",["list",["Error","$exception:","exception"]]]]],"false"],[["==",[".","errors","length"],0],["list","false","\\$"]],["=","errors",[".","errors","reverse","false"]],["=","errors",[".","errors","map",[["function","lambda",["error"],[".","dialob","parseErrorString",[[".","errors","pop","false"]]]]]]],["list",["Error","$parse errors:","errors"]]]),e._SetBindingList("letlocal",["macro","letlocal","names",["call",["function","lambda",["false","localname","curac","syms"],["=","curac",["nsactive"]],["nsactive",["list",["car","curac"]]],["loop","false",[["atom","names"]],["=","localname",["pop","names"]],["=","syms",["cons",["compress","localname"],"syms"]]],["nsactive","curac"],["reverse","syms"]]]]),e._SetBindingList("letimport",["function","letimport","names",["call",["function","lambda",["false","item","count"],["function","import1",["source","localname","false","curac","sym"],[["not","source"],["debuglog","$letimport: source undefined:","source"]],[["not",["deref",[".",[".",["nsactive","true"],1],"index"],"localname"]],["=","curac",["nsactive"]],["nsactive",["list",["car","curac"]]],["=","sym",["compress","localname"]],["nsactive","curac"],[[["getproc","source"],["copyproc","sym","source"]],[["||",["procedure","source"],["xobject","source"]],["assign","sym","source"]],["debuglog","$letimport: no procedure binding:","source"],["return"]],["=","count",["+","count",1]]]],["function","importCat",["category","false","item","exlist","source"],[["not",["dictionary","category"]],["debuglog","$letimport: invalid category:","category"]],["=","exlist",["keys","category"]],["loop","false",[["empty","exlist"]],["=","item",["pop","exlist"]],["=","source",["xget","category","item"]],[[["||",["symbol","source"],["tuple","source"],["xobject","source"]],["import1","source",["tostring",["unintern","item"]]]],[["dictionary","source"],["importCat","source"]],["debuglog","$letimport: invalid category entry:",["keys","category"],"item"]]]],["=","count",0],["loop","false",[["empty","names"]],["=","item",["pop","names"]],[[["not",["atom","item"]],[["and",["==",["length","item"],2],["atom",["car","item"]],["string",["second","item"]]],["import1",["car","item"],["second","item"]]],["debuglog","$letimport: invalid pair:","item"],"false"],[["getproc","item"],["import1","item",["tostring",["unintern","item"]]]],[["dictionary","item"],["importCat","item"]],["debuglog","$letimport: invalid source:","item"]]],"count"]]]),e._SetBindingList("makeExport",["function","makeExport",["syms","false","result","sym"],["=","result",["new","dictionary"]],["loop","false",[["empty","syms"]],["=","sym",["pop","syms"]],["xset","result","sym","sym"]],"result"]),e._SetBindingList("makeReturner",["closure","makeReturner",["nslist","false","checkns","targns"],["=","checkns",["nsrights"]],[[["not","nslist"],["=","nslist",["nsactive"]]]],["=","targns",["car","nslist"]],["enclose",["function","lambda","false",[["eq","checkns",["nscaller"]],["nsactive","nslist"]]],"targns"]]),e._SetBindingList("loadNotify",["function","loadNotify",["recipient"],[[["not",["member","recipient","notifyList"]],["push","recipient","notifyList"]]],"true"]),e._SetBindingList("loadTrap",["function","loadTrap",["false","trav","tell"],["=","tell",[".","notifyList","reverse"]],["while","false",[["not",["tuple","tell"]]],["=","trav",["pop","tell"]],["call","trav"]]]),e._SetBindingList("saveNotify",["function","saveNotify",["recipient"],[[["not",["member","recipient","saveNotifyList"]],["push","recipient","saveNotifyList"]]],"true"]),e._SetBindingList("SaveTrap",["function","SaveTrap",["false","trav","tell"],["=","tell",[".","saveNotifyList","reverse"]],["while","false",[["not",["tuple","tell"]]],["=","trav",["pop","tell"]],["call","trav"]]]),e._SetBindingList("jsReload",["function","jsReload",["false","wsg"],["=","wsg",["||",[".","js","w"],[".","js","s"],[".","js","g"]]],["=","JSpath",[".","js","r",["$path"]]],["=","JSONstringify",[".",[".","wsg","JSON"],"stringify"]],["=","JSONparse",[".",[".","wsg","JSON"],"parse"]]]),e._SetValue("NaanBuildComponent",{dictionary:{$filename:"$Module.nlg",$name:"$Module",$manifest:["Component","Module","Modules","modEncodeQuery","modAwait","modWebReadFile","modWebParseFile","modNodeReadFile","modNodeParseFile","modDriver","modTextParse","letlocal","letimport","makeExport","makeReturner","loadNotify","loadTrap","saveNotify","SaveTrap","jsReload","NaanBuildComponent","ModuleInit"]}}),e._SetBindingList("ModuleInit",["closure","ModuleInit",["false","modules","naanMod","utilMod"],["function","findNS",["nsid","false","allns","nsns"],["=","allns",["nsactive","true"]],["loop","false",[["empty","allns"]],["=","nsns",["pop","allns"]],[["==",["namespace","nsns"],"nsid"],"nsns"]]],["function","modlist","false",[".","modules","list"]],["jsReload"],["loadNotify","jsReload"],["=","modules",["Modules"]],["=","naanMod",[".","modules","makeModule",["$Naan","false",["findNS","$NaanRoot"]]]],["=","utilMod",[".","modules","makeModule",["$Util","naanMod",["nsrights"]]]],["set.",[".","utilMod","components"],["`","Module"],["Component","utilMod",[".","NaanBuildComponent","name"]]],["set.",[".",[".","utilMod","components"],"Module"],["`","loaded"],"true"],["set.",[".",[".","utilMod","components"],"Module"],["`","manifest"],[".","NaanBuildComponent","manifest"]],["set.",[".","Naan","module"],["`","require"],[".",[".","modules","require"],1]],["set.",[".","Naan","module"],["`","defineLoc"],[".",[".","modules","defineLoc"],1]],["set.",[".","Naan","module"],["`","defineExt"],[".",[".","modules","defineExt"],1]],["set.",[".","Naan","module"],["`","requireQuery"],[".",[".","modules","requireQuery"],1]],["set.",[".","Naan","module"],["`","build"],[".",[".","modules","build"],1]],["set.",[".","Naan","module"],["`","letinherit"],[".",[".","modules","letinherit"],1]],["set.",[".","Naan","module"],["`","chns"],[".",[".","modules","changeModNS"],1]],["set.",[".","Naan","module"],["`","letimport"],"letimport"],["set.",[".","Naan","module"],["`","export"],"makeExport"],["set.",[".","Naan","module"],["`","letlocal"],"letlocal"],["set.",[".","Naan","module"],["`","modlist"],"modlist"],["set.",[".","Naan","module"],["`","nodeparse"],"modNodeParseFile"],["set.",[".","Naan","module"],["`","webparse"],"modWebParseFile"],["set.",[".","Naan","module"],["`","textparse"],"modTextParse"],["=","LoadTrap","loadTrap"],["set.",[".","Naan","module"],["`","LoadNotify"],"loadNotify"],["set.",[".","Naan","module"],["`","SaveNotify"],"saveNotify"],["xlock",[".","Naan","module"],["car",["nsactive"]]],["sudo",["putproc","rdsDriver",["enclose",["getproc","modDriver"],["car",["nsactive","true"]]]]],"true"]),e._Execute(["ModuleInit"]),e._AddPropertyList("bt",[["$lingoDriver","bt"],["$escape","bt"],["$debugger","bt"],["$debugexception","bt"],["$driver","bt"],["$evalactive","break"]]),e._SetBindingList("debugCon",["closure","debugCon",["false","debug","nslist","defCommander"],["=","debug",["new","object","this"]],["=","nslist",["nsactive","true"]],["set.","debug",["`","nshidden"],["list",[".","nslist",0],[".","nslist",1],[".",[".",[".",[".","module","owner"],"list"],"Lib"],"namespace"]]],["set.","debug",["`","breakpoints"],{dictionary:{}}],["set.","debug",["`","bpenable"],"true"],["function","dsave",["false","saveob"],["=","saveob",{dictionary:{}}],["set.","saveob",["`","curns"],["nsactive"]],[[["not",["positive","debugDepth"]],["=","debugDepth",1],[".",[".","js","t"],"Saving",["false"]]],["preadjust","debugDepth","+",1]],"saveob"],["function","drestore",["saveob"],[[["==",["preadjust","debugDepth","-",1],0],[".",[".","js","t"],"Saving",["true"]]]],["nsactive",[".","saveob","curns"]],"saveob"],["function","insertns",["curns"],[["not",["rest","curns"]],["cons",["nsrights"],"curns"]],["cons",["first","curns"],["insertns",["rest","curns"]]]],["function","clearframes","false",["set.","debug",["`","entrystack"],"false"],["set.","debug",["`","frames"],{array:[]}]],["function","storeframes",["all","false","procount","framex","framelist","frame","status"],["function","evaluate",["expr"],["eval","expr"]],[["not",[".","debug","entrystack"]],["=","procount",0],["set.","debug",["`","entrystack"],["stacktrace"]],[[["identity","all"],["=","framex",1]],["=","framex",["stepframe",[".","debug","entrystack"]]]],["set.","debug",["`","frames"],{array:[]}],["=","framelist",["deref",[".","debug","entrystack"],["-",["-","framex"],1]]],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["procedure","frame"],[[["not","all"],["=","status",["get","bt",["procname",[".",[".","frame",3],1]]]],[[["eq","status","bt"],["continue"]]],[["&&",[">","procount",0],["eq","status",["`","break"]]],["break"]]]],["preadjust","procount","+",1]]],[".",[".","debug","frames"],"push",["frame"]]],[["==","procount",0],[".",[".","debug","frames"],"push",[["list",["`","function"],"evaluate",[".",[".","evaluate","proc"],-3],[".","evaluate","proc"]]]]]]],["function","stepframe",["stack","false","framex","framelist","frame","found","debugout"],["=","framex",0],["=","framelist","stack"],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["&&","debugout",["==",[".","frame",0],"interrupt"]],[["||",["==",[".","frame",2],"$steptrap"],["==",[".","frame",2],"$breakpoint"]],["=","found","framex"],["break"]],[["&&",["not",["eq","exception",["`","exception"]]],["==",[".","frame",2],"$exception-hook"]],["=","found",["+","framex",1]],["break"]]],[["&&",["member",[".","frame",0],["`",["function","closure"]]],["member",[".","frame",1],["`",["debugBlock","startException","startEscape","start"]]]],["=","debugout","true"],["=","found","framex"]],[["&&",["==",[".","frame",0],["`","function"]],["==",[".","frame",1],["`","debugger"]]],["=","found","framex"],["break"]]],["preadjust","framex","+",1]],"found"],["function","procframe",["stack","startx","false","frame"],["loop","false",["=","frame",["deref","stack","startx"]],[[["not","frame"],["return","false"]]],[["procedure","frame"]],["preadjust","startx","+",1]],"startx"],["function","intrap",["false","framelist","frame"],["=","framelist",["stacktrace"]],["loop","false",[["atom","framelist"]],["=","frame",["pop","framelist"]],[[["==",[".","frame",0],"interrupt"],[["||",["==",[".","frame",2],"$steptrap"],["==",[".","frame",2],"$breakpoint"]],["return",[".","frame",2]]]]]],"false"],["function","steppedover",["dict","false","stack","curframe","origframe","procdex"],["=","curframe",["stepframe",["=","stack",["stacktrace"]]]],["=","origframe",["-",["length","stack"],[".","debug","nextOffset"]]],["=","procdex",["procframe","stack","curframe"]],["set.","debug",["`","nextOffset"],"false"],[[["||",["not","procdex"],[">","procdex","origframe"]],["return","false"]]],[[["==","procdex",["procframe","stack",["+","origframe",1]]],["return","false"]]],[[["stacktrap",["+","procdex",1],0,"debugBlock"],["return"]]],"false"],["function","brokeover",["dict","false","resume"],["=","resume",[".",[".","debug","breakHitDict"],"resume"]],["set.",[".","debug","breakHitDict"],["`","resume"],"undefined"],["set.",[".","debug","breakHitDict"],["`","enable"],"true"],["set.","debug",["`","breakHitDict"],"false"],"resume"],["function","checkReady","false",["!=",[".",[".",[".","js","t"],"termlist"],"length"],0]],["set.","debug",["`","depth"],["function","depth","false","debugDepth"]],["set.","debug",["`","procname"],["function","procname",["name","false","parent"],["=","parent",["deref",["@","name"],["`","\\.parent"]]],["=","name",["tostring","name"]],[["identity","parent"],[".",["procname","parent"],"concat",["$.","name"]]],"name"]],["set.","debug",["`","insideProc"],["function","insideProc",["false","frames","frame"],["=","frames",["new",[".","debug","frames"]]],["loop","false",[["==",[".","frames","length"],0]],["=","frame",[".","frames","shift","false"]],[[["procedure","frame"],["return",[".","frame",3]]]]],"false"]],["set.","debug",["`","frameProcTask"],["function","frameProcTask",["frame","false","frames","ftrav","procdef","bodydef"],[[["not",["array",[".","debug","frames"]]],["return","false"]]],["=","frames",["new",[".","debug","frames"]]],["loop","false",[["==",[".","frames","length"],0]],["=","ftrav",[".","frames","shift","false"]],[[["eq","ftrav","frame"],["=","frame","false"]]],[[["procedure","ftrav"],[[["not","frame"],["=","procdef",[".","ftrav",3]],[[["not","bodydef"],["=","bodydef","procdef"]]],["break"]]],["=","bodydef","false"]],[["||",["==",[".","ftrav",0],["`","body"]],["==",[".","ftrav",0],["`","loop"]]],[["not","bodydef"],["=","bodydef",[".","ftrav",2]]]]]],[["identity","procdef"],["list","procdef","bodydef"]]]],["set.","debug",["`","debugBlock"],["closure","debugBlock",["arg1","arg2","arg3","false","saveob","savech","savecmd","entry"],[[[">=","debugDepth",1],["set.","debug",["`","entrystack"],"false"],["storeframes","true"]],["storeframes"]],["=","saveob",["dsave"]],["=","savech",["textstreams"]],["nsactive",["insertns",[".","saveob","curns"]]],["=","savecmd",{dictionary:{}}],[".",[".","debug","commander"],"entering",["savecmd"]],["catch",[[[["string","arg1"],["=","entry","arg1"]],["=","entry",["intrap"]],[["==","entry","$steptrap"],[[[".","debug","breakHitDict"],[["brokeover","arg1"],["return"]]]],[[".","debug","nextOffset"],[["steppedover","arg1"],["return"]]],[[".","debug","startPause"],["set.","debug",["`","startPause"],"false"],["=","entry","$startpause"]]],[["==","entry","$breakpoint"],[[["not",[".","debug","bpenable"]],["return"]]],["set.","debug",["`","breakHitDict"],"arg1"]],[["not","entry"],["=","entry","$"]]],["set.","debug",["`","nextOffset"],"false"],["loop","false",[[".",[".","debug","commander"],"pauser",["entry","arg1","arg2","arg3"]]]]],"false",[[".",[".","debug","commander"],"leaving",["savecmd"]],["textstreams","savech"],["drestore","saveob"],[[[".","debug","bpenable"],["breakpoint","true"]]],["clearframes"]]]]],["function","skipbreak","false",["set.",[".","debug","breakHitDict"],["`","enable"],"false"]],["set.","debug",["`","resume"],["function","resume","false",[[".",[".","debug","breakHitDict"],"enable"],["set.",[".","debug","breakHitDict"],["`","resume"],"true"],["skipbreak"],["stacktrap",["stepframe",["stacktrace"]],1,"debugBlock"]]]],["set.","debug",["`","step"],["function","step",["nstep","false","stack","stackdex","task"],["=","stackdex",["stepframe",["=","stack",["stacktrace"]]]],["=","task",[".",[".",["deref","stack","stackdex"],3],2]],[[["&&",["symbol",[".","task",0]],["member",[".",[".",[".",[".","task",0],"proc"],1],"namespace"],[".","debug","nshidden"]]],["return",["stepover"]]]],["set.","debug",["`","nextOffset"],"false"],["skipbreak"],["stacktrap",["stepframe",["stacktrace"]],"nstep","debugBlock"]]],["set.","debug",["`","stepup"],["function","stepup",["false","stack","stackdex","found"],["set.","debug",["`","nextOffset"],"false"],["skipbreak"],["=","stackdex",["stepframe",["=","stack",["stacktrace"]]]],["loop","false",[[[">=","stackdex",["length","stack"]],["return"]]],[[["procedure",["deref","stack","stackdex"]],[[["get","bt",["procname",[".",[".",["deref","stack","stackdex"],3],1]]],["return"]]],[[["identity","found"],["break"]]],["=","found","stackdex"]]],[[["eq",["deref","stack",0],["`","loop"]],["=","found","stackdex"]]],["preadjust","stackdex","+",1]],["stacktrap","found",0,"debugBlock"]]],["set.","debug",["`","stepover"],["function","stepover",["false","stack","curframe"],["skipbreak"],["=","curframe",["stepframe",["=","stack",["stacktrace"]]]],["set.","debug",["`","nextOffset"],["-",["length","stack"],"curframe"]],[[["stacktrap","curframe",1,"debugBlock"],["return","true"]]],["set.","debug",["`","nextOffset"],"false"]]],["set.","debug",["`","quit"],["function","quit","false",["sudo",["=","exception",["`","exception"]]],["throw","debugger"]]],["set.","debug",["`","startEscape"],["function","startEscape","false",[[["not",["checkReady"]],["debuglog","$debug.startEscape: can't enter debugger before terminal is ready"],["return"]]],["storeframes"],["debugBlock","$escape"]]],["set.","debug",["`","startException"],["function","startException",["except"],[[["not",["checkReady"]],[[["ErrorObject","except"],["=","except",["ErrorString","except"]]]],["debuglog","$debug.startException: debugger not ready for","except"],["return"]]],["storeframes"],["set.","debug",["`","startExcept"],"except"],["debugBlock","$exception","except"]]],["set.","debug",["`","start"],["function","start",["pause"],[[["not",["checkReady"]],["debuglog","$debug.start: can't enter debugger before terminal is ready"],["return"]]],["storeframes"],[["identity","pause"],["set.","debug",["`","startPause"],"true"],[[["stacktrap",["stepframe",["stacktrace"]],0,"debugBlock"],["return"]]],["debugBlock","$startfail"]],["debugBlock","$"]]],["set.","debug",["`","setDefCommander"],["function","setDefCommander",["commander"],["=","defCommander","commander"],[["not",[".","debug","commander"]],["set.","debug",["`","commander"],"defCommander"]]]],["set.","debug",["`","setCommander"],["function","setCommander",["commander"],[["not","commander"],["set.","debug",["`","commander"],"defCommander"]],[".",[".","debug","commander"],"endPauser","false"],["set.","debug",["`","commander"],"commander"]]],["set.","debug",["`","breakHit"],["function","breakHit",["where","value","false","keylist","bpid","entry","result"],["=","keylist",["keys",[".","debug","breakpoints"]]],["loop","false",["=","bpid","false"],[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],[["eq",[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"],[".","where","task"]]]],[[["not",["deref",[".","debug","breakpoints"],"bpid"]],["breakpoint",[".","where","task"],"undefined"],[".","debug","resume","false"],["return","false"]]],["=","entry",["deref",[".","debug","breakpoints"],"bpid"]],["preadjust",[".","entry","hitcount"],"+",1],[[[".","entry","conditional"],[[["procedure",[".","entry","conditional"]],["=","result",["call",[".","entry","conditional"],[".","entry","hitcount"],[".","entry","value"]]]],["=","result",["eval",[".","entry","conditional"]]]],[["not","result"],[".","debug","resume","false"],["return","false"]]]],"bpid"]],["function","breakTasks",["procdef","task","false","taskpath","above","below","pardef","procs","tasks"],["=","taskpath",["tuplepath","procdef","task"]],["=","above",["new","array","taskpath"]],["loop","false",["=","pardef",["apply",["`","."],["list","procdef",["totuple","above"]]]],[[["member",[".","pardef",0],["`",["closure","macro"]]],["=","procs",["instances",[".","pardef",1]]],[[["not","procs"],["return","task"]]],["=","tasks",{array:[]}],["while","false",[["not",["tuple","procs"]]],["=","task",["apply",["`","."],["list",[".",["pop","procs"],"proc"],"below"]]],[[["identity","task"],[".","tasks","push",["task"]]]]],["return","tasks"]]],[["==",[".","above","length"],0]],["push",[".","above","pop","false"],"below"]],"task"],["set.","debug",["`","breakAdd"],["function","breakAdd",["procdef","task","expr","false","firstid","keylist","bpid","tasks","bpdict"],["=","firstid",0],["=","keylist",["keys",[".","debug","breakpoints"]]],["loop","false",[["not",["member",["tostring",["preadjust","firstid","+",1]],"keylist"]]]],["loop","false",[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],["=","bpdict",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"]],[[["eq",[".","bpdict","task"],"task"],["set.","bpdict",["`","conditional"],"expr"],["set.","bpdict",["`","hitcount"],0],["return","bpid"]]]],["=","tasks",["breakTasks","procdef","task"]],["=","bpdict",["breakpoint","tasks",[".","debug","debugBlock"]]],["set.","bpdict",["`","task"],"task"],[[["not","bpdict"],["return","false"]]],["set.","bpdict",["`","breakID"],"firstid"],["set[",[".","debug","breakpoints"],"firstid",{dictionary:{$procdef:"procdef",$where:"bpdict",$hitcount:0,$conditional:"expr"}}],"firstid"]],["set.","debug",["`","breakClear"],["function","breakClear",["procdef","task","false","keylist","tasks","bpid"],["=","keylist",["keys",[".","debug","breakpoints"]]],["=","tasks",["breakTasks","procdef","task"]],["loop","false",[["atom","keylist"]],["=","bpid",["toint",["pop","keylist"]]],[[[">=",[".","tasks","indexOf",[[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"]]],0],["breakpoint","tasks","undefined"],["set[",[".","debug","breakpoints"],"bpid","undefined"],["return","true"]]]],"false"]],["set.","debug",["`","breakDelete"],["function","breakDelete",["bpid","false","tasks"],[[["not",["deref",[".","debug","breakpoints"],"bpid"]],["return","false"]]],["=","tasks",["breakTasks",[".",["deref",[".","debug","breakpoints"],"bpid"],"procdef"],[".",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"],"task"]]],["breakpoint","tasks","undefined"],["set[",[".","debug","breakpoints"],"bpid","undefined"],"true"]],["set.","debug",["`","breakAble"],["function","breakAble",["bpid","enabled","false","bpdict"],["=","bpdict",[".",["deref",[".","debug","breakpoints"],"bpid"],"where"]],[["identity","enable"],["set.","bpdict",["`","enable"],"true"]],["set.","bpdict",["`","enable"],"false"]]],["set.","debug",["`","breakGlobalAble"],["function","breakGlobalAble",["enable"],[[["identity","enable"],["set.","debug",["`","bpenable"],"true"]],["set.","debug",["`","bpenable"],"false"]],["breakpoint",[".","debug","bpenable"]]]],"debug"]),e._SetBindingList("debugger",["function","debugger",["pause"],[".",["DebugController"],"start",["pause"]]]),e._SetBindingList("debugescape",["function","debugescape","false",[".",["DebugController"],"startEscape","false"]]),e._SetBindingList("debugexception",["function","debugexception","false",[[["and",["==",["tostring",["first","exception"]],"$internal"],["==",["tostring",["second","exception"]],"$end-of-file"]],["return"]]],[[["==",["tostring","exception"],"$driver"],["return"]]],[[["==",["tostring","exception"],"$debugger"],["return"]]],[[["==",["tostring","exception"],"$DebuggerREPL"],["return"]]],[".",["DebugController"],"startException",["exception"]]]),e._SetBindingList("DebugController",["function","DebugController","false",[[["eq","ndbController",["`","ndbController"]],["=","ndbController",["debugCon"]]]],"ndbController"]),e._AddPropertyList("DebugInit",[["$.lingoInit","true"]]),e._SetBindingList("DebugInit",["function","DebugInit",["false","manifest"],["=","manifest",["`",["bt","debugCon","debugger","debugescape","debugexception","DebugController","DebugInit"]]],[".",[".","Naan","module"],"build",["$Util","$Debug",["function","lambda",["modobj","compobj"],["=","ndbController",["`","ndbController"]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","DebugController"],"DebugController"],["set.",[".","modobj","exports"],["`","debugger"],"debugger"],[["symbol","NideBuild"],["sudo",["moveproc","debugescape",["`","escape"]]],["sudo",["moveproc","debugexception",["`","exception"]]],["sudo",["set.",[".","Naan","debug"],["`","debugger"],"debugger"]]]]]]]),e._Execute(["DebugInit"]),e._SetBindingList("NaanError",["closure","NaanError",["false","nerr"],["=","nerr",["new","object","this"]],["set.","nerr",["`","errorID"],"$Naan Error"],["set.","nerr",["`","debug"],"false"],["function","procname",["name","defns","false","parent","strname"],["=","parent",["deref",["@","name"],["`","\\.parent"]]],[[["lambda","name"],["=","strname","$()"]],["=","strname",[".","name","tostring","false"]]],[["identity","parent"],[".",["procname","parent","defns"],"concat",["$.","strname"]]],[["!=",[".","name","namespace"],"defns"],[".",[".",[".","name","namespace"],"tostring"],"concat",["$::","strname"]]],"strname"],["function","trace",["exclude","defns","false","stack","frame","output"],["=","stack",["stacktrace"]],["=","output",{array:[]}],["loop","false",[["atom","stack"]],["=","frame",["pop","stack"]],[[["procedure","frame"],[["<=",["postadjust","exclude","-",1],0],[".","output","push",[["procname",[".",[".","frame",3],1],"defns"]]]]],[["==",[".","frame",0],["`","interrupt"]],[".","output","push",["$[interrupt]"]],["break"]]]],[".",[".","output","reverse","false"],"join",["$ / "]]],["set.","nerr",["`","createError"],["function","createError",["parts","ns","false","nanerr","part","lastparts","badarray"],["function","addToHistory",["item","false","hist","keylist","key","history"],[[["||",["not",[".","nanerr","history"]],["not",["array",[".","nanerr","history"]]]],["set.","nanerr",["`","history"],{array:[]}]]],["=","hist",{dictionary:{}}],["=","keylist",["keys","item"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["==","key","$history"],["=","history",[".","item","history"]]],[["!=","key","$error"],["set[","hist","key",["deref","item","key"]]]]],[".",[".","nanerr","history"],"push",["hist"]],[".","history","forEach",[["function","lambda",["old"],["addToHistory","old"]]]]],["function","addErrorList",["errs","false","err","etrim","keylist","key"],["loop","false",[["atom","errs"]],["=","err",["pop","errs"]],[[["==",[".","err","error"],[".","nerr","errorID"]],["=","etrim",{dictionary:{}}],["=","keylist",["keys","err"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["&&",["!=","key","$error"],["||",["!=","key","$stack"],["!=",["deref","err","key"],[".","nanerr","stack"]]],["||",["!=","key","$module"],["!=",["deref","err","key"],[".","nanerr","module"]]]],["set[","etrim","key",["deref","err","key"]]]]],[[["||",["not",[".","nanerr","errors"]],["not",["array",[".","nanerr","errors"]]]],["set.","nanerr",["`","errors"],{array:[]}]]],[".",[".","nanerr","errors"],"push",["etrim"]]],["=","badarray","true"]]]],["function","addKeys",["dict","keylist","false","key","dkey"],["while","false",[["not",["tuple","keylist"]]],["=","dkey",["=","key",["pop","keylist"]]],["while","false",[["not",["deref","nanerr","dkey"]]],["=","dkey",[".","dkey","concat",["$_"]]]],[[["deref","item","key"],["set[","nanerr","dkey",["deref","dict","key"]]]]]],["function","addJSerror",["item","false","keylist"],["=","keylist",["keys","item"]],[[["not","keylist"],["=","keylist",["`",["$name","$message"]]]]],["addKeys","item","keylist"]],["=","nanerr",{dictionary:{$error:[".","nerr","errorID"],$occurred:[".","Date","now","false"]}}],["loop","false",[["atom","parts"]],["=","part",["pop","parts"]],[[["xobject","part"],["addJSerror","part"]],[["dictionary","part"],[["==",[".","part","error"],[".","nerr","errorID"]],["addToHistory","part"]],["addKeys","part",["keys","part"]]],[["array","part"],["push","part","lastparts"]],[[".","nanerr","memo"],["set.","nanerr",["`","memo"],[".",[".","nanerr","memo"],"concat",["$ ",["tostring","part"]]]]],["set.","nanerr",["`","memo"],["tostring","part"]]]],["set.","nanerr",["`","stack"],["trace",3,"ns"]],["set.","nanerr",["`","module"],[".",["car",["exists","$module","ns"]],"id"]],["loop","false",[["atom","lastparts"]],["addErrorList",["pop","lastparts"]]],[[["not",[".","nanerr","memo"]],["debuglog","$NaanError.createError: no error memo at",[".","nanerr","stack"]]]],[[["identity","badarray"],["debuglog","$NaanError.createError: ignoring array argument"]]],[[[".","nerr","debug"],["call",["function","ErrorDebuglog","args",[".","nerr","debugError",["args"]]],"$new","nanerr"]]],"nanerr"]],["set.","nerr",["`","toString"],["function","toString",["nanerr","options","false","output","keylist","key","history"],["=","output","$"],["=","keylist",["keys","nanerr"]],["loop","false",[["atom","keylist"]],["=","key",["pop","keylist"]],[[["==","key","$error"]],[["==","key","$occurred"]],[["==","key","$memo"]],[["==","key","$stack"]],[["==","key","$module"]],[["==","key","$history"],["=","history",[".","nanerr","history"]]],[[["!=","output","$"],["=","output",[".","output","concat",["$, "]]]]],["=","output",[".","output","concat",["key","$=",["tostring",["deref","nanerr","key"]]]]]]],[[["identity","history"],[[["!=","output","$"],["=","output",[".","output","concat",["$, "]]]]],["=","output",[".","output","concat",["$«"]]],[".",[".","nanerr","history"],"forEach",[["function","lambda",["item","index"],[[["!=","index",0],["=","output",[".","output","concat",["$ | "]]]]],["=","output",[".","output","concat",[["toString","item",{dictionary:{$memo:"true"}}]]]]]]],["=","output",[".","output","concat",["$»"]]]]],[["&&",[".","options","memo"],[".","nanerr","memo"]],[".",[".","nanerr","memo"],"concat",["$ ","output"]]],"output"]],["set.","nerr",["`","toDescription"],["function","toDescription",["nanerr"],[["!=",[".","nanerr","error"],[".","nerr","errorID"]],["tostring","nanerr"]],[[".","nanerr","memo"],["toString","nanerr",{dictionary:{$memo:"true"}}]],[".","$Error ","concat",[["toString","nanerr"]]]]],["set.","nerr",["`","debugError"],["function","debugError",["args","false","arg","text","nanerr","nanerrs"],["loop","false",[["atom","args"]],["=","arg",["pop","args"]],[[["&&",["dictionary","arg"],["==",[".","arg","error"],[".","nerr","errorID"]]],["=","nanerr","arg"]],[["array","arg"],["=","nanerrs","arg"]],["push","arg","text"]]],["=","text",["reverse","text"]],[[["identity","nanerr"],[[["identity","text"],["=","text",["append","text","$=>"]]],["=","text","$"]],["=","text",["append","text",[".","nerr","toDescription",["nanerr"]]]]],[["&&",["not","text"],"nanerrs"],["=","text",[".",[".",[".","nanerrs","length"],"tostring"],"concat",["$ errors:"]]]]],["apply","debuglog","text"],["loop","false",[["||",["not","nanerrs"],["==",[".","nanerrs","length"],0]]],["=","nanerr",[".","nanerrs","shift","false"]],["=","text",["append","$    ",[".","nerr","toDescription",["nanerr"]]]],["apply","debuglog","text"]]]],"nerr"]),e._SetBindingList("Error",["function","Error","parts",[".","naneErrorManager","createError",["parts",["nscaller"]]]]),e._SetBindingList("ErrorObject",["function","ErrorObject",["err"],["&&",["dictionary","err"],["==",[".","err","error"],"$Naan Error"]]]),e._SetBindingList("ErrorString",["function","ErrorString",["nanerr"],[["string","nanerr"],"nanerr"],[".","naneErrorManager","toString",["nanerr","true"]]]),e._SetBindingList("ErrorDebuglog",["function","ErrorDebuglog","args",[".","naneErrorManager","debugError",["args"]]]),e._AddPropertyList("ErrorInit",[["$.lingoInit","true"]]),e._SetBindingList("ErrorInit",["function","ErrorInit",["false","manifest"],["=","manifest",["`",["NaanError","Error","ErrorObject","ErrorString","ErrorDebuglog","ErrorInit"]]],[".",[".","Naan","module"],"build",["$Util","$Error",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","Error"],"Error"],["set.",[".","modobj","exports"],["`","ErrorObject"],"ErrorObject"],["set.",[".","modobj","exports"],["`","ErrorString"],"ErrorString"],["set.",[".","modobj","exports"],["`","ErrorDebuglog"],"ErrorDebuglog"],["set.",[".","Naan","module"],["`","Error"],"Error"],["set.",[".","Naan","module"],["`","ErrorObject"],"ErrorObject"],["set.",[".","Naan","module"],["`","ErrorString"],"ErrorString"],["set.",[".","Naan","module"],["`","ErrorDebuglog"],"ErrorDebuglog"]]]],["=","naneErrorManager",["NaanError"]]]),e._Execute(["ErrorInit"]),e._SetBindingList("makeSourceString",["function","makeSourceString",["item","false","text","result"],["=","text",["explode","item"]],["=","result",'$"'],[[["string","item"],["=","result",[".","result","concat",["$$"]]]],[["==",["tostring","item"],"$."]],[["or",["eq",["car","text"],"$$"],["eq",["car","text"],"$."],["eq",["car","text"],"$\\"]],["=","result",[".","result","concat",["$\\\\"]]]]],["loop","false",[["empty","text"]],[[["eq",["car","text"],'$"'],["=","result",[".","result","concat",['$\\"']]]],[["eq",["car","text"],"$\\"],["=","result",[".","result","concat",["$\\\\"]]]],[["eq",["car","text"],"$\t"],["=","result",[".","result","concat",["$\\t"]]]],[["eq",["car","text"],"$\n"],["=","result",[".","result","concat",["$\\n"]]]],[["eq",["car","text"],"$\r"],["=","result",[".","result","concat",["$\\r"]]]],[["eq",["car","text"],"$\b"],["=","result",[".","result","concat",["$\\b"]]]],[["eq",["car","text"],"$\f"],["=","result",[".","result","concat",["$\\f"]]]],[["eq",["car","text"],"$\v"],["=","result",[".","result","concat",["$\\u000b"]]]],[["eq",["car","text"],"$\0"],["=","result",[".","result","concat",["$\\u0000"]]]],["=","result",[".","result","concat",[["car","text"]]]]],["=","text",["cdr","text"]]],[".","result","concat",['$"']]]),e._SetBindingList("pkgSave",["function","pkgSave",["pkgname","roots","options"],["function","defObjEncoder",["obj","false","ident"],["=","ident",{dictionary:{$name:["||",["get","obj","\\.closure"],"undefined"]}}]],["function","dialectName",["ns"],[".",[".",[".",[".",[".",[".",[".","module","owner"],"list"],"Lib"],"exports"],"Registry"],"findNamespace",["ns"]],"name"]],["=","options",["merge",{dictionary:{$objectEncoder:"defObjEncoder",$dialectName:"dialectName"}},"options"]],["packageEncode","pkgname","roots","options"]]),e._SetBindingList("pkgDecode",["function","pkgDecode",["pkg","options"],["function","defObjDecoder",["ident","false","obj"],[[".","ident","name"],["putproc",[".","ident","name"],"false"],["=","obj",["call",["closure","lambda",["nn"],["call",["enclose",["list",["`","closure"],"nn",["`",["local","x"]],["quote",["=","x",["new","object","nn"]]],["quote",["put","x","\\.tostring",["function","lambda","false",["strcat","${blank-proxy ","nn","$}"]]]],["quote",["put","x","\\.undefined",["function","undef","args",["debuglog",["strcat","$call to {blank-proxy ","nn","$}.",[".","args",0],["||",[".","args",-1],"$()"],"$ ignored"]]]]],"x"]]]],[".","ident","name"]]]],["=","obj",["new","object"]]],["function","dialectSym",["name","sym"],["deref",[".",[".",[".","Naan","runtimelib"],"dialect",["name"]],"operators"],"sym"]],["=","options",["merge",{dictionary:{$objectDecoder:"defObjDecoder",$dialectSym:"dialectSym"}},"options"]],["packageDecode","pkg","options"]]),e._SetBindingList("pkgExamine",["function","pkgExamine",["pkg","false","exlist","header","state"],["function","printProps",["dict","false","keylist","key"],["=","keylist",["keys","dict"]],["loop","false",[["empty","keylist"]],["=","key",["pop","keylist"]],[[["member","key",["`",["$.sourcemap","$.children","$.parent"]]],["printline","$            ","key"]],["printline","$            ","key","$, ",["xget","dict","key"]]]]],["=","exlist",["pkgDecode","pkg"]],[[["atom","exlist"],["printline",[".","$pkgExamine error:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["newline"],["printline","$=================================================="],["printline","$     package: ",[".","header",0]],["printline","$     version: ",[".","header",1]],["printline","$     prereqs: ",[".","header",2]],["printline","$root symbols: ",[".","header",3]],["printline","$      states: ",["length","exlist"]],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["printline","$invalid symbol: ","state"]],["printline","$=================================================="],["printline","$   name: ",[".","state",0]],["printline","$--------------------------------------------------"],["printline","$         val: ",[".","state",1]],[[["dictionary",[".","state",2]],["printline","$        prop:"],["printProps",[".","state",2]]],["printline","$        prop: ",[".","state",2]]],["printline","$       sites: ",[".","state",4]],[["atom",[".","state",3]],["printline","$        proc: ",[".","state",3]]],["printline","$        proc: "],["printline",[".",[".",[".",[".",[".",[".","Naan","module"],"modlist","false"],"Lingo"],"exports"],"Base"],"print",[[".","state",3]]]]]],["printline","$=================================================="],[".","header",0]]),e._SetBindingList("pkgLoad",["function","pkgLoad",["pkg","options","false","exlist","header","roots","state","sym","sitelist","site","proc","executions"],["=","options",["merge",{dictionary:{$localroots:"true",$intern:"true",$execute:"true"}},"options"]],["=","exlist",["pkgDecode","pkg","options"]],[[["atom","exlist"],["debuglog",[".","$pkgLoad error:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["=","executions",{array:[]}],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["debuglog","$invalid symbol: ","state"]],[[[".","options","intern"],["=","sym",["compress",[".","state",0]]],[["not",["eq",[".","sym","namespace"],[".",["nsactive"],0]]],[[".","options","localroots"],["=","sym",["car",["letlocal","sym"]]]],["debuglog","$cannot overwrite symbol ","sym","$ in ",[".","sym","namespace"]],["continue"]]],["=","sym",["unintern",[".","state",0]]]],["push","sym","roots"],["assign","sym",[".","state",1]],["=","proc",[".","state",3]],["putproc","sym","proc"],["replacer","sym",[".","state",2]],[[[".","proc",1],["copyann",[".","proc",1],"sym"]]],["=","sitelist",[".","state",4]],["loop","false",[["empty","sitelist"]],["=","site",["pop","sitelist"]],["put",[".","site",0],[".","site",1],[".","site",2]]],[["&&",[".","options","execute"],[".","state",3],["get","sym","$.lingoInit"]],[".","executions","push",["sym"]]]]],["while","false",[["not",[">",[".","executions","length"],0]]],["call",[".","executions","shift","false"]]],["reverse","roots"]]),e._SetBindingList("pkgToJsSource",["function","pkgToJsSource",["pkg","false","output","indent","atnl"],["=","output","$"],["=","indent",0],["=","atnl","true"],["function","indent",["adj"],["preadjust","indent","+","adj"]],["function","newline","false",["=","atnl","true"],["=","output",[".","output","concat",["cr"]]]],["function","write","strings",["call",["function","lambda",["false","cnt","str"],["while","false",[["not",["not",["empty","strings"]]]],[[["identity","atnl"],["=","atnl","false"],["=","cnt","indent"],["while","false",[["not",[">",["postadjust","cnt","-",1],0]]],["=","output",[".","output","concat",["$    "]]]]]],["=","str",["pop","strings"]],[[[">=",[".","str","indexOf",["$\n"]],0],["=","atnl","true"]]],["=","output",[".","output","concat",["str"]]]]]],"output"],["function","writeline","strings",["apply","write","strings"],["newline"]],["function","atomString",["expr","false","vertical"],[["||",["symbol","expr"],["string","expr"]],["makeSourceString","expr"]],[["float","expr"],[".",'$".',"concat",["expr",'$"']]],[["integer","expr"],"expr"],[["array","expr"],["arrayString","expr","vertical"]],[["dictionary","expr"],["dictionaryString","expr","vertical"]],["debuglog","$pkgToJsSource: unsupported atom: ","expr"],"$false"],["function","arrayString",["arr","false","adex","expr","separator","result"],["=","result","${array:["],["=","adex",0],["loop","false",[[">=","adex",[".","arr","length"]]],["=","expr",["deref","arr",["postadjust","adex","+",1]]],[[["not","separator"],[[["identity","vertical"],["=","separator","$,\n"]],["=","separator","$, "]],["=","vertical","true"],["=","result",[".","result","concat",[["exprString","expr"]]]]],["=","result",[".","result","concat",["separator",["exprString","expr"]]]]]],[".","result","concat",["$]}"]]],["function","dictionaryString",["obj","false","keylist","key","separator","result"],[[["cdr","obj"],["=","result",[".","${tag:","concat",[["atomString",["cdr","obj"]],"$,dictionary:{"]]]],["=","result","${dictionary:{"]],["=","keylist",["keys","obj"]],["loop","false",[["empty","keylist"]],["=","key",["pop","keylist"]],[[["not","separator"],[[["identity","vertical"],["=","separator","$,\n"]],["=","separator","$, "]],["=","vertical","true"],["=","result",[".","result","concat",[["atomString","key"],"$: ",["exprString",["deref","obj","key"]]]]]],["=","result",[".","result","concat",["separator",["atomString","key"],"$: ",["exprString",["deref","obj","key"]]]]]]],[".","result","concat",["$}}"]]],["function","openListString",["exlist","false","expr","comma","result"],[[["atom","exlist"],["return",["atomString","exlist"]]]],["=","comma","$"],["=","result","$"],["loop","false",[["empty","exlist"]],["=","expr",["pop","exlist"]],["=","result",[".","result","concat",["comma",["exprString","expr"]]]],["=","comma","$, "]],"result"],["function","paramListString",["exlist"],[[["atom","exlist"],["return",["atomString","exlist"]]]],["exprString","exlist"]],["function","exprString",["exlist"],[[["atom","exlist"],["return",["atomString","exlist"]]]],[".","$[","concat",[["openListString","exlist"],"$]"]]],["function","procsym",["sym"],["=","sym",["tostring","sym"]],["return",["||",["==","sym","$function"],["==","sym","$function&"],["==","sym","$macro"],["==","sym","$closure"],["==","sym","$let"],["==","sym","$let&"]]]],["function","writeCall",["exlist","more","false","opstr"],[[["atom","exlist"],["write",["atomString","exlist"]],["return"]]],["=","opstr",["tostring",["car","exlist"]]],[[["procsym",["car","exlist"]],["writeline","$[",["atomString",["car","exlist"]],"$, ",["atomString",["second","exlist"]],"$, ",["paramListString",["third","exlist"]],"$,"],["indent",1],["writeBody",["cdddr","exlist"]],["indent",-1],["write","$]"]],[["||",["==","opstr","$loop"],["==",[".",["car","exlist"],"proc"],[".",["`","loop"],"proc"]]],["writeline","$[",["atomString",["car","exlist"]],"$, ",["atomString",["second","exlist"]],"$,"],["indent",1],["writeBody",["cddr","exlist"]],["indent",-1],["write","$]"]],[["==","opstr","$call"],["writeline","$[",["atomString",["car","exlist"]],"$, "],["writeCall",["second","exlist"],"$"],[[["cddr","exlist"],["writeline","$, "],["write",["openListString",["cddr","exlist"]]]]],["write","$]"]],[["==","opstr","$catch"],["writeline","$[",["atomString",["pop","exlist"]],"$,"],["indent",1],[[["car","exlist"],["write","$["],["indent",1],["writeBody",["car","exlist"],"$"],["indent",-1],["write","$],\n"]],["writeline",["atomString","false"],"$,"]],[[["second","exlist"],["write","$["],["writeBody",["second","exlist"],"$"],["write","$],\n"]],["writeline",["atomString","false"],"$,"]],[[["third","exlist"],["write","$["],["indent",1],["writeBody",["third","exlist"],"$"],["indent",-1],["write","$]"]],["write",["atomString","false"]]],["indent",-1],["write","$]"]],[["||",["==","opstr","$quote"],["==","opstr","$`"]],["write",["exprString","exlist"]]],["write",[".","$[","concat",[["openListString","exlist"],"$]"]]]],["write","more"]],["function","writeBody",["exlist","false","expr","more"],["loop","false",[["empty","exlist"]],["=","expr",["pop","exlist"]],[[["empty","exlist"],["=","more","$"]],["=","more","$,\n"]],[[["atom","expr"],["write",["atomString","expr"],"more"]],[["atom",["car","expr"]],["writeCall","expr","more"]],[["atom",["caar","expr"]],[["cdr","expr"],["write","$["],["writeCall",["car","expr"],"$,\n"],["indent",1],["writeBody",["cdr","expr"]],["indent",-1],["write","$]","more"]],["write","$[",["exprString",["car","expr"]],"$]","more"]],["writeline","$["],["indent",1],["writeBody",["list",["car","expr"]]],[[["cdr","expr"],["writeline","$,"],["writeBody",["cdr","expr"]]]],["indent",-1],["write","$]","more"]]]],["function","writeProc",["sym","proc"],["writeline","$ninti._SetBindingList(",["atomString","sym"],"$,"],["indent",1],[[["string","proc"],["writeline","proc"]],["writeline","$[",["atomString",["car","proc"]],"$, ",["atomString",["second","proc"]],"$, ",["paramListString",["third","proc"]],"$,"],["indent",1],["writeBody",["cdddr","proc"]],["indent",-1],["writeline","$]"]],["indent",-1],["writeline","$);"]],["function","writeProps",["sym","props","false","prop","preceded","header"],[[["atom","props"],["return"]]],["=","preceded","$"],["while","false",[["not",["not",["empty","props"]]]],["=","prop",["pop","props"]],[[["==",["tostring",["car","prop"]],"$.sourcemap"],["continue"]]],[[["==",["tostring",["car","prop"]],"$.children"],["continue"]]],[[["not","header"],["=","header","true"],["writeline","$ninti._AddPropertyList(",["atomString","sym"],"$,"],["indent",1],["write","$["]]],["write","preceded","$[",["atomString",["car","prop"]],"$, ",["exprString",["cdr","prop"]],"$]"],["=","preceded","$,\n"]],[[["not","header"],["return"]]],["write","$]"],["indent",-1],["newline"],["writeline","$);"]],["function","writeValue",["sym","value"],["writeline","$ninti._SetValue(",["atomString","sym"],"$, ",["exprString","value"],"$);"]],["call",["function","lambda",["false","exlist","header","state","proc"],["=","exlist",["pkgDecode","pkg"]],[[["atom","exlist"],["debuglog",[".","$pkgToJsSource:","concat",["exlist"]]],["return","false"]]],["=","header",["pop","exlist"]],["indent",1],["writeline","$/*"],["writeline","$ * ",[".",[".","pkg",0],3]],["writeline","$ *"],["writeline","$ */"],["newline"],["loop","false",[["empty","exlist"]],["=","state",["pop","exlist"]],[[["or",["atom","state"],["not",["name",[".","state",0]]]],["debuglog","$invalid symbol: ","state"]],[[["!=",[".","state",1],[".","state",0]],["writeValue",[".","state",0],[".","state",1]]]],[[[".","state",2],["writeProps",[".","state",0],["totuple",[".","state",2]]]]],["=","proc",[".","state",3]],[[["tuple","proc"],["writeProc",[".","state",0],"proc"]]],[["||",[".","state",2],["tuple","proc"]],["newline"]]]],["indent",-1],"output"]]]),e._AddPropertyList("PackagerInit",[["$.lingoInit","true"]]),e._SetBindingList("PackagerInit",["function","PackagerInit",["false","manifest"],["=","manifest",["`",["makeSourceString","pkgSave","pkgDecode","pkgExamine","pkgLoad","pkgToJsSource","PackagerInit"]]],[".",[".","Naan","module"],"build",["$Util","$Packager",["function","lambda",["modobj","compobj"],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","pkgSave"],"pkgSave"],["set.",[".","modobj","exports"],["`","pkgExamine"],"pkgExamine"],["set.",[".","modobj","exports"],["`","pkgLoad"],"pkgLoad"],["set.",[".","modobj","exports"],["`","pkgToJsSource"],"pkgToJsSource"]]]]]),e._Execute(["PackagerInit"]),e._SetValue("jsScripts",{dictionary:{}}),e._SetBindingList("JsLoadScript",["closure","JsLoadScript",["libpath","globalID","false","locin","savens","hostpath","error","console","pending","scriptTag"],["global","module","jsScripts","Naan","JSpath","js"],["=","locin",[".","libpath","split",["$:"]]],[[["&&",["==",[".","locin","length"],2],[">",[".",[".","locin",0],"length"],1]],["=","libpath",[".","locin",1]],["=","locin",[".","locin",0]]],["=","locin","false"]],[[["deref","jsScripts","libpath"],["return"]]],["=","savens",["makeReturner"]],["=","hostpath",[".",[".",[".",[".","js","w"],"location"],"origin"],"concat",[[".","JSpath","join",[[".","JSpath","dirname",[[".",[".",[".","js","w"],"location"],"pathname"]]],"libpath"]]]]],[[["&&",[".",[".","js","s"],"importScripts"],["==",["tostring",[".",[".","js","s"],"importScripts"]],"$[Function importScripts]"]],["catch",[[".",[".","js","s"],"importScripts",["hostpath"]],["set[","jsScripts","libpath",["deref",[".","js","s"],"globalID"]]],[[["identity","true"],["=","error",["Error",["strcat","$JsLoadScript(","libpath","$) failed"],"exception"]],["=","console",[".","js","s"]]]],"false"]],[[".","js","w"],["=","pending",["new","nonce"]],["=","scriptTag",[".",[".",[".","js","w"],"document"],"createElement",["$script"]]],["set.","scriptTag",["`","src"],[".","hostpath","concat",[[".",[".","Naan","module"],"requireQuery","false"]]]],["set.","scriptTag",["`","onload"],["function","lambda",["event"],["set[","jsScripts","libpath",["deref",[".","js","w"],"globalID"]],[".","pending","signal",[["deref",[".","js","w"],"globalID"]]],"true"]],["set.","scriptTag",["`","onerror"],["function","lambda",["event"],["=","error",["Error",["strcat","$JsLoadScript(","libpath","$) not found"]]],["=","console",[".","js","w"]],[".","pending","signal",["false"]],"true"]],[".",[".",[".",[".","js","w"],"document"],"body"],"appendChild",["scriptTag"]],[".","pending","wait","false"]],[[".","js","g"],[[["identity","locin"],["=","locin",["deref",[".",[".","module","owner"],"locations"],"locin"]],[["identity","locin"],["=","libpath",[".","JSpath","resolve",["locin","libpath"]]]],["=","error",["Error",["strcat","$JsLoadScript(","locin","$:","libpath","$) is an undefined location"]]],["=","console",[".","js","g"]]]],[["not","error"],["set[","jsScripts","libpath",[".","js","r",["libpath"]]]]]],["savens"],[[["identity","error"],["ErrorDebuglog","error"],[".","console","log",[["ErrorString","error"]]],["throw","error"]]],["deref","jsScripts","libpath"]]),e._SetBindingList("JSONparse",["function","JSONparse",["str"],[".",[".",["||",[".","js","w"],[".","js","g"]],"JSON"],"parse",["str"]]]),e._SetBindingList("JSONstringify",["function","JSONstringify",["obj"],[".",[".",["||",[".","js","w"],[".","js","g"]],"JSON"],"stringify",["obj"]]]),e._SetBindingList("JsonParse",["function","JsonParse",["data"],["global","exception"],["catch",[["=","data",["JSONparse","data"]],["list","false","data"]],[[["identity","true"],["list","exception"]]],"false"]]),e._SetBindingList("JsonStringify",["function","JsonStringify",["data"],["global","exception"],["catch",[["=","data",["JSONstringify","data"]],["list","false","data"]],[[["identity","true"],["list","exception"]]],"false"]]),e._SetBindingList("EncodeBase64",["function","EncodeBase64",["data","false","blob","reader","pending","result"],[["not","data"],"$"],[[".","js","g"],[".",[".",[".",[".","js","g"],"Buffer"],"from",["data","$binary"]],"toString",["$base64"]]],[["xobject","data"],["=","blob",["xnew",[".",[".","js","w"],"Blob"],{array:["data"]}]],["=","reader",["xnew",[".",[".","js","w"],"FileReader"]]],["=","pending",["new","nonce"]],["set.","reader",["`","onload"],["function","lambda",["event"],[".","pending","signal",[[".",[".","event","target"],"result"]]]]],[".","reader","readAsDataURL",["blob"]],["=","result",[".","pending","wait","false"]],[".","result","slice",[37]]],[".",[".","js","w"],"btoa",["data"]]]),e._SetBindingList("DecodeBase64",["function","DecodeBase64",["data","false","error","resp","blob"],[["not","data"],["xnew"]],[[".","js","g"],[".",[".",[".","js","g"],"Buffer"],"from",["data","$base64"]]],["=",["error","resp"],["await",[".",[".","js","w"],"fetch",[["strcat","$data:application/octet-stream;base64,","data"]]]]],[[["not","error"],["=",["error","blob"],["await",[".","resp","blob","false"]]]]],[[["not","error"],["=",["error","blob"],["await",[".","blob","arrayBuffer","false"]]]]],[[["not","error"],["=","blob",["xnew",[".",[".","js","w"],"Uint8Array"],"blob"]]]],[["identity","error"],["debuglog","$DecodeBase64 failed","error"],["xnew"]],"blob"]),e._SetBindingList("IsBinary",["function","IsBinary",["obj","false","jio"],["=","jio",[".",[".",[".","Naan","runtimelib"],"jsInstanceOf"],"proc"]],[[".","js","g"],["||",["jio","obj",[".",[".","js","g"],"Buffer"]],["jio","obj",[".",[".","js","g"],"ArrayBuffer"]],["jio","obj",[".",[".","js","g"],"DataView"]]]],["||",["jio","obj",[".",[".","js","w"],"Uint8Array"]],["jio","obj",[".",[".","js","w"],"ArrayBuffer"]],["jio","obj",[".",[".","js","w"],"Blob"]]]]),e._SetBindingList("HashMD5",["function","HashMD5",["data"],["global","crypto","js"],[[".","js","g"],[[["not",["xobject","crypto"]],["=","crypto",[".","js","r",["$crypto"]]]]],[["identity","crypto"],["catch",[[".",[".",[".","crypto","createHash",["$MD5"]],"update",["data"]],"digest",["$hex"]]],[[["identity","true"],["debuglog","$HashMD5 failed:","exception"],"false"]],"false"]]],["JsLoadScript","$frameworks/browser/spark-md5/spark-md5.min.js","$SparkMD5"],[["not",[".",[".","js","w"],"SparkMD5"]],["debuglog","$HashMD5 unavailable"],"false"],[["xobject","data"],[".",[".",[".",[".","js","w"],"SparkMD5"],"ArrayBuffer"],"hash",["data"]]],[".",[".",[".","js","w"],"SparkMD5"],"hash",["data"]]]),e._SetBindingList("await",["closure","await",["promise","timeout","false","pending"],[[["not","promise"],["throw",["list","internal","$await on false promise"]]]],["=","pending",["new","nonce"]],[".","promise","then",[["function","success",["value"],[".","pending","signal",[["list","false","value"]]]],["function","failure",["error"],[".","pending","signal",[["list","error"]]]]]],[["identity","timeout"],[".","pending","wait",["timeout",["list",["Error",["strcat","$await timeout after ","timeout","$ msec"]]]]]],[".","pending","wait","false"]]),e._AddPropertyList("UtilInit",[["$.lingoInit","true"]]),e._SetBindingList("UtilInit",["function","UtilInit",["false","manifest"],["=","manifest",["`",["jsScripts","JsLoadScript","JSONparse","JSONstringify","JsonParse","JsonStringify","EncodeBase64","DecodeBase64","IsBinary","HashMD5","await","UtilInit"]]],[".",[".","Naan","module"],"build",["$Util","$Util",["function","lambda",["modobj","compobj"],["=","JSpath",[".","js","r",["$path"]]],["set.","compobj",["`","manifest"],"manifest"],["set.",[".","modobj","exports"],["`","JSpath"],"JSpath"],["set.",[".","modobj","exports"],["`","JsLoadScript"],"JsLoadScript"],["set.",[".","modobj","exports"],["`","JSONstringify"],"JSONstringify"],["set.",[".","modobj","exports"],["`","JSONparse"],"JSONparse"],["set.",[".","modobj","exports"],["`","JsonStringify"],"JsonStringify"],["set.",[".","modobj","exports"],["`","JsonParse"],"JsonParse"],["set.",[".","modobj","exports"],["`","EncodeBase64"],"EncodeBase64"],["set.",[".","modobj","exports"],["`","DecodeBase64"],"DecodeBase64"],["set.",[".","modobj","exports"],["`","IsBinary"],"IsBinary"],["set.",[".","modobj","exports"],["`","HashMD5"],"HashMD5"]]]]]),e._Execute(["UtilInit"]),e._SetNamespace(t,!0)}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);
 
 /* Copyright (c) 2017-2026 by Zulch Laboratories, Inc. */
 !function(t){t.BootRoot=function(t){"use strict";t._SetBindingList("append",["function","append","lists",["function","append1",["items","result"],[["atom","items"],"result"],["cons",["car","items"],["append1",["cdr","items"],"result"]]],["function","append2",["lists","result"],[["atom","lists"],"result"],[["atom",["car","lists"]],["cons",["car","lists"],["append2",["cdr","lists"],"result"]]],["append1",["car","lists"],["append2",["cdr","lists"],"result"]]],["append2","lists"]]),t._Export("tuple","append"),t._SetBindingList("body",["macro","body","expr",["eval",["list","cond",["cons",["identity","true"],"false","expr"]]]]),t._Export("exec","body"),t._SetBindingList("sudo",["macro","sudo",["expr"],["eval","expr"]]),t._Export("local","sudo"),t._SetBindingList("evalactive",["function","evalactive",["expr"],["cond",[["nsrights",["first",["nsactive"]]],["eval","expr"]]]]),t._Export("local","evalactive"),t._SetBindingList("identity",["function","identity",["expr"],"expr"]),t._SetBindingList("mu",["function","mu",!1,["`","mu"]]),t._Export("local","mu")},t.BootStart=function(t){t._SetNamespace("Start");var e=t._InheritNamespace("Lang_Lingo");t._SetBindingList("StartInit",["function","StartInit",["false","manifest","export"],["=","manifest",["`",["StartInit"]]],[".",[".","Naan","module"],"build",["$Start","$Start",["function","lambda",["modobj","compobj"],["xset","compobj",["`","manifest"],"manifest"]]]]]),t._Execute(["StartInit"]),t._SetNamespace(e)}}("undefined"==typeof exports?this.Naanlang||(this.Naanlang={}):exports);