mini-program-cljs
Version:
14 lines • 5.64 kB
JavaScript
var window=global;var $CLJS=require("./cljs_env");require("./goog.base.js");require("./cljs.core.js");require("./clojure.string.js");
var kt,lt,mt,nt,jt,rt,tt,qt;
kt=function(a,b){var c=jt;return function(){function d(m,n,p){return c.pa?c.pa(a,b,m,n,p):c.call(null,a,b,m,n,p)}function f(m,n){return c.Y?c.Y(a,b,m,n):c.call(null,a,b,m,n)}function g(m){return c.g?c.g(a,b,m):c.call(null,a,b,m)}function h(){return c.b?c.b(a,b):c.call(null,a,b)}var k=null,l=function(){function m(p,q,r,x){var A=null;if(3<arguments.length){A=0;for(var B=Array(arguments.length-3);A<B.length;)B[A]=arguments[A+3],++A;A=new $CLJS.D(B,0,null)}return n.call(this,p,q,r,A)}function n(p,q,r,
x){return $CLJS.Yf(c,a,b,p,q,$CLJS.nb([r,x]))}m.S=3;m.R=function(p){var q=$CLJS.H(p);p=$CLJS.K(p);var r=$CLJS.H(p);p=$CLJS.K(p);var x=$CLJS.H(p);p=$CLJS.Ya(p);return n(q,r,x,p)};m.C=n;return m}();k=function(m,n,p,q){switch(arguments.length){case 0:return h.call(this);case 1:return g.call(this,m);case 2:return f.call(this,m,n);case 3:return d.call(this,m,n,p);default:var r=null;if(3<arguments.length){r=0;for(var x=Array(arguments.length-3);r<x.length;)x[r]=arguments[r+3],++r;r=new $CLJS.D(x,0,null)}return l.C(m,
n,p,r)}throw Error("Invalid arity: "+arguments.length);};k.S=3;k.R=l.R;k.w=h;k.a=g;k.b=f;k.g=d;k.C=l.C;return k}()};lt=function(a){return $CLJS.Z.g(function(b){return b},a,$CLJS.Hf(2,a))};mt=function(a,b,c){var d=$CLJS.u(b.ignoreCase)?"gi":"g";d=$CLJS.u(b.multiline)?[d,"m"].join(""):d;return a.replace(new RegExp(b.source,$CLJS.u(b.bf)?[d,"u"].join(""):d),c)};
nt=function(a){return function(){function b(d){var f=null;if(0<arguments.length){f=0;for(var g=Array(arguments.length-0);f<g.length;)g[f]=arguments[f+0],++f;f=new $CLJS.D(g,0,null)}return c.call(this,f)}function c(d){d=lt(d);if($CLJS.P.b($CLJS.N(d),1))return d=$CLJS.H(d),a.a?a.a(d):a.call(null,d);d=$CLJS.Yg(d);return a.a?a.a(d):a.call(null,d)}b.S=0;b.R=function(d){d=$CLJS.E(d);return c(d)};b.C=c;return b}()};
$CLJS.ot=function(a,b,c){if("string"===typeof b)return a.replace(new RegExp(String(b).replace(/([-()\[\]{}+?*.$\^|,:#<!\\])/g,"\\$1").replace(/\x08/g,"\\x08"),"g"),c);if(b instanceof RegExp)return"string"===typeof c?mt(a,b,c):mt(a,b,nt(c));throw["Invalid match arg: ",$CLJS.y.a(b)].join("");};$CLJS.Kf=function(a,b){var c=new $CLJS.ea;for(b=$CLJS.E(b);;)if(null!=b)c.append($CLJS.y.a($CLJS.H(b))),b=$CLJS.K(b),null!=b&&c.append(a);else return c.toString()};
jt=function(a,b,c){$CLJS.Re(b)?(b=c.a?c.a($CLJS.Eh):c.call(null,$CLJS.Eh),a=a.a?a.a(b):a.call(null,b)):a=!1;return $CLJS.u(a)?["(",$CLJS.y.a($CLJS.pt?$CLJS.pt(c,!1):qt.call(null,c,!1)),")"].join(""):$CLJS.pt?$CLJS.pt(c,!1):qt.call(null,c,!1)};rt=function(a){switch(a){case "\n":return"\\n";case "\b":return"\\b";case "\f":return"\\f";case "\r":return"\\r";case "\t":return"\\t";default:return a}};$CLJS.st=function(a){return $CLJS.ot(['#"',$CLJS.jj.b(a.source,1),'"'].join(""),/[\s]/,rt)};
tt=function(a){return 4095>=a?["0000",$CLJS.y.a(a.toString(16))].join("").substr(-4):a.toString(16)};$CLJS.ut=function(a){var b=null!=a&&(a.f&64||$CLJS.C===a.ab)?$CLJS.ic($CLJS.Me,a):a;a=$CLJS.Nc.b(b,$CLJS.yh);b=$CLJS.Nc.b(b,$CLJS.zi);return $CLJS.P.b(a,b)?["%x",$CLJS.y.a(tt(a))].join(""):["%x",$CLJS.y.a(tt(a)),"-",$CLJS.y.a(tt(b))].join("")};
qt=function(a){switch(arguments.length){case 1:return $CLJS.pt(arguments[0],!1);case 2:return $CLJS.pt(arguments[0],arguments[1]);default:throw Error(["Invalid arity: ",$CLJS.y.a(arguments.length)].join(""));}};
$CLJS.pt=function(a,b){a=null!=a&&(a.f&64||$CLJS.C===a.ab)?$CLJS.ic($CLJS.Me,a):a;var c=$CLJS.Nc.b(a,$CLJS.ei),d=$CLJS.Nc.b(a,$CLJS.Hh),f=$CLJS.Nc.b(a,$CLJS.Gh),g=$CLJS.Nc.b(a,$CLJS.Ah),h=$CLJS.Nc.b(a,$CLJS.Eh);if($CLJS.u($CLJS.Re(b)?$CLJS.Di.a(a):!1))return["\x3c",$CLJS.y.a($CLJS.pt(a,!0)),"\x3e"].join("");h=h instanceof $CLJS.U?h.qa:null;switch(h){case "epsilon":return"ε";case "opt":return[$CLJS.y.a(vt(b,c)),"?"].join("");case "plus":return[$CLJS.y.a(vt(b,c)),"+"].join("");case "star":return[$CLJS.y.a(vt(b,
c)),"*"].join("");case "rep":return $CLJS.mj.b($CLJS.si.a(a),$CLJS.ki.a(a))?[$CLJS.y.a(vt(b,c)),"{",$CLJS.y.a($CLJS.si.a(a)),",",$CLJS.y.a($CLJS.ki.a(a)),"}"].join(""):[$CLJS.y.a(vt(b,c)),"{",$CLJS.y.a($CLJS.si.a(a)),"}"].join("");case "alt":return $CLJS.Kf(" | ",$CLJS.Z.b(kt(new $CLJS.nh(null,new $CLJS.Da(null,1,[$CLJS.Ai,null],null),null),b),g));case "ord":return[$CLJS.y.a(jt(new $CLJS.nh(null,new $CLJS.Da(null,1,[$CLJS.ni,null],null),null),b,d))," / ",$CLJS.y.a(jt(new $CLJS.nh(null,new $CLJS.Da(null,
1,[$CLJS.ni,null],null),null),b,f))].join("");case "cat":return $CLJS.Kf(" ",$CLJS.Z.b(kt(new $CLJS.nh(null,new $CLJS.Da(null,2,[$CLJS.Ai,null,$CLJS.ni,null],null),null),b),g));case "string":var k=new $CLJS.ea;b=$CLJS.Ne;c=$CLJS.fa;$CLJS.Ne=!0;$CLJS.fa=function(l){return k.append(l)};try{$CLJS.qh($CLJS.nb([$CLJS.zh.a(a)]),$CLJS.Be())}finally{$CLJS.fa=c,$CLJS.Ne=b}return $CLJS.y.a(k);case "string-ci":k=new $CLJS.ea;b=$CLJS.Ne;c=$CLJS.fa;$CLJS.Ne=!0;$CLJS.fa=function(l){return k.append(l)};try{$CLJS.qh($CLJS.nb([$CLJS.zh.a(a)]),
$CLJS.Be())}finally{$CLJS.fa=c,$CLJS.Ne=b}return $CLJS.y.a(k);case "char":return $CLJS.ut(a);case "regexp":return $CLJS.st($CLJS.Lh.a(a));case "nt":return $CLJS.jj.b($CLJS.y.a($CLJS.Ei.a(a)),1);case "look":return["\x26",$CLJS.y.a(vt(b,c))].join("");case "neg":return["!",$CLJS.y.a(vt(b,c))].join("");default:throw Error(["No matching clause: ",$CLJS.y.a(h)].join(""));}};$CLJS.wt=new $CLJS.U(null,"start-production","start-production",687546537);$CLJS.xt=new $CLJS.U(null,"grammar","grammar",1881328267);var vt=$CLJS.$f(jt,new $CLJS.nh(null,new $CLJS.Da(null,3,[$CLJS.Jh,null,$CLJS.Ai,null,$CLJS.ni,null],null),null));