earlgrey/lib5/macros/core.js

Programming language compiling to JavaScript, featuring macros, dynamic typing annotations and pattern matching.

'use strict';require('earlgrey-runtime/5');var $targ$1=void 0;var $targ$0=void 0;var $0$0=void 0;var camelCase$0=void 0;var $1$0=void 0;var __lt____lt____colon__$0=void 0;var $2$0=void 0;var expr_mac$0=void 0;var pattern_handlers$0=void 0;var ctx_mac$0=void 0;var named_statement_matcher$0=void 0;var flatmacro$0=void 0;var match_error$0=void 0;var Body$0=void 0;var AssignmentHandler$0=void 0;var $3$0=void 0;var PatternCompiler$0=void 0;var parse_clauses$0=void 0;$0$0=require("../util");camelCase$0=getProperty($0$0,"camelCase","../util");$1$0=require("../location");__lt____lt____colon__$0=getProperty($1$0,"<<:","../location");$2$0=require("./helpers");expr_mac$0=getProperty($2$0,"expr_mac","./helpers");pattern_handlers$0=getProperty($2$0,"pattern_handlers","./helpers");ctx_mac$0=getProperty($2$0,"ctx_mac","./helpers");named_statement_matcher$0=getProperty($2$0,"named_statement_matcher","./helpers");flatmacro$0=getProperty($2$0,"flatmacro","./helpers");match_error$0=getProperty($2$0,"match_error","./helpers");Body$0=getProperty($2$0,"Body","./helpers");AssignmentHandler$0=getProperty($2$0,"AssignmentHandler","./helpers");$3$0=require("../pattern");PatternCompiler$0=getProperty($3$0,"PatternCompiler","../pattern");parse_clauses$0=getProperty($3$0,"parse_clauses","../pattern");if(typeof module==="undefined"){$targ$1=undefined;global["module"]=$targ$1;void 0;}$targ$0=function $targ$0(mac$0){var t0$0=void 0;var t0$1=void 0;var t0$4=void 0;var t0$7=void 0;var t1$4=void 0;var t0$9=void 0;var t0$11=void 0;var t0$14=void 0;var t0$16=void 0;var t0$24=void 0;var t0$29=void 0;var t0$39=void 0;var t0$41=void 0;var t0$44=void 0;var t0$47=void 0;var _catch$0=void 0;var _finally$0=void 0;var t0$55=void 0;var t0$58=void 0;var t0$59=void 0;var t1$33=void 0;var t0$60=void 0;var t0$63=void 0;var t0$64=void 0;var t1$34=void 0;var t0$67=void 0;var t0$69=void 0;var t0$74=void 0;var t0$76=void 0;var $targ$2=void 0;var var_mac$0=void 0;var $targ$3=void 0;var setvar_mac$0=void 0;var $targ$4=void 0;var let_mac$0=void 0;var $targ$5=void 0;var letrec_mac$0=void 0;var $targ$6=void 0;var where_mac$0=void 0;var $targ$7=void 0;var rawsym_mac$0=void 0;var $targ$8=void 0;var dot_mac$0=void 0;var $targ$9=void 0;var as_mac$0=void 0;var $targ$10=void 0;var equal_mac$0=void 0;var $targ$11=void 0;var fat_arrow_mac$0=void 0;var $targ$12=void 0;var _lambda_mac$0=void 0;var $targ$13=void 0;var genarrow_mac$0=void 0;var $targ$14=void 0;var metharrow_mac$0=void 0;var $targ$15=void 0;var arrow_mac$0=void 0;var try_pattern$0=void 0;var $targ$16=void 0;var try_mac$0=void 0;var $targ$17=void 0;var tryop_mac$0=void 0;var $targ$18=void 0;var throw_mac$0=void 0;var $targ$19=void 0;var exprvalue_mac$0=void 0;var $targ$20=void 0;var return_mac$0=void 0;var $targ$21=void 0;var new_mac$0=void 0;var $targ$22=void 0;var delete_mac$0=void 0;var $targ$23=void 0;var splice_mac$0=void 0;var $targ$24=void 0;var hash_mac$0=void 0;var $targ$25=void 0;var placeholder_mac$0=void 0;var exports$0=void 0;exports$0={};$targ$2=function $targ$2(temp$0$0,temp$1$0,form$0,argument$0){var x$0=void 0;if(x$0=temp$0$0,x$0 instanceof Array&&x$0[0]==="pattern"){}else{___match_error(temp$0$0);}return["mode","var",argument$0];};t0$0=getProjector(mac$0("var"))($targ$2);if(t0$0[0]){var_mac$0=t0$0[1];}else{___match_error($targ$2,"mac{\"var\"}! var_mac{#pattern, _, form, argument}");}$targ$3=function $targ$3(temp$2$0,temp$3$0,form$1,argument$1){var x$1=void 0;if(x$1=temp$2$0,x$1 instanceof Array&&x$1[0]==="pattern"){}else{___match_error(temp$2$0);}return["mode","set",argument$1];};t0$1=getProjector(mac$0("set-var"))($targ$3);if(t0$1[0]){setvar_mac$0=t0$1[1];}else{___match_error($targ$3,"mac{\"set-var\"}! setvar_mac{#pattern, _, form, argument}");}$targ$4=function $targ$4(ph$0$0,temp$4$0,form$2,argument$2){var x$2=void 0;var construct$0=void 0;var bindings$0=void 0;var body$0=void 0;var t0$2=void 0;var t1$0=void 0;var t2$0=void 0;var t3$0=void 0;var m$0$0=void 0;var other$0=void 0;if(x$2=ph$0$0,x$2 instanceof Array&&x$2[0]==="pattern"){return["mode","let",argument$2];}else{other$0=ph$0$0;m$0$0=argument$2;if(Array.isArray(m$0$0)&&(t0$2=m$0$0.length,t0$2===3&&m$0$0[0]==="data"&&(t1$0=getProjector(Body$0)(m$0$0[1]),t1$0[0]&&(t2$0=t1$0[1],t3$0=t2$0.length,t3$0>=0)))){bindings$0=Array.prototype.slice.call(t2$0,0);body$0=m$0$0[2];construct$0=function construct(ph$1$0){var bind$0=void 0;var val$0=void 0;var xs$0=void 0;var $$7224$0=void 0;var $$7225$0=void 0;var t0$3=void 0;var t1$1=void 0;var t2$1=void 0;var t3$1=void 0;var t4$0=void 0;var t5$0=void 0;var t6$0=void 0;var t7$0=void 0;t0$3=ph$1$0;t1$1=t0$3.length;if(t1$1===0){return body$0;}else{if(t1$1>=1&&(t2$1=t0$3[0],Array.isArray(t2$1)&&(t3$1=t2$1.length,t3$1===3&&t2$1[0]==="send"&&(t4$0=t2$1[1],Array.isArray(t4$0)&&(t5$0=t4$0.length,t5$0===2&&t4$0[0]==="symbol"&&t4$0[1]==="="&&(t6$0=t2$1[2],Array.isArray(t6$0)&&(t7$0=t6$0.length,t7$0===3&&t6$0[0]==="data"))))))){bind$0=t6$0[1];val$0=t6$0[2];xs$0=Array.prototype.slice.call(t0$3,1);return __amp__(["multi",["send",["symbol","="],["data",["send",["symbol","let"],bind$0],val$0]],construct$0(xs$0)],{"nonrecursive":true});}else{return ___match_error(ph$1$0,"{`^bind = ^val`, *xs}");}}};return construct$0(bindings$0);}else{return ___match_error(m$0$0,"#data{Body! {*bindings}, body}");}}};t0$4=getProjector(mac$0("let"))($targ$4);if(t0$4[0]){let_mac$0=t0$4[1];}else{___match_error($targ$4,"mac{\"let\"}! let_mac{match, _, form, argument}");}$targ$5=function $targ$5(temp$5$0,form$3,temp$6$0){var t0$5=void 0;var t1$2=void 0;var t2$2=void 0;var t3$2=void 0;var t4$1=void 0;var m$1=void 0;var acc$0=void 0;var temp$7=void 0;var let_bindings$0=void 0;var bindings$1=void 0;var body$1=void 0;t0$5=temp$6$0;if(Array.isArray(t0$5)&&(t1$2=t0$5.length,t1$2===3&&t0$5[0]==="data"&&(t2$2=getProjector(Body$0)(t0$5[1]),t2$2[0]&&(t3$2=t2$2[1],t4$1=t3$2.length,t4$1>=0)))){bindings$1=Array.prototype.slice.call(t3$2,0);body$1=t0$5[2];}else{___match_error(temp$6$0);}acc$0=[];temp$7=null;m$1=null;var _iteratorNormalCompletion=true;var _didIteratorError=false;var _iteratorError=undefined;try{$4:for(var _iterator=bindings$1[Symbol.iterator](),_step;!(_iteratorNormalCompletion=(_step=_iterator.next()).done);_iteratorNormalCompletion=true){m$1=_step.value;var b$0=void 0;var v$0=void 0;var t0$6=void 0;var t1$3=void 0;var t2$3=void 0;var t3$3=void 0;var t4$2=void 0;var t5$1=void 0;t0$6=m$1;if(Array.isArray(t0$6)&&(t1$3=t0$6.length,t1$3===3&&t0$6[0]==="send"&&(t2$3=t0$6[1],Array.isArray(t2$3)&&(t3$3=t2$3.length,t3$3===2&&t2$3[0]==="symbol"&&t2$3[1]==="="&&(t4$2=t0$6[2],Array.isArray(t4$2)&&(t5$1=t4$2.length,t5$1===3&&t4$2[0]==="data")))))){b$0=t4$2[1];v$0=t4$2[2];temp$7=["send",["symbol","="],["data",["send",["symbol","let"],b$0],v$0]];acc$0.push(temp$7);}else{___match_error(m$1);}}}catch(err){_didIteratorError=true;_iteratorError=err;}finally{try{if(!_iteratorNormalCompletion&&_iterator.return){_iterator.return();}}finally{if(_didIteratorError){throw _iteratorError;}}}let_bindings$0=acc$0;return["multi"].concat(let_bindings$0).concat([body$1]);};t0$7=getProjector(expr_mac$0)($targ$5);if(t0$7[0]&&(t1$4=getProjector(mac$0("letrec"))(t0$7[1]),t1$4[0])){letrec_mac$0=t1$4[1];}else{___match_error($targ$5,"expr_mac! mac{\"letrec\"}! letrec_mac{_, form, #data{Body! {*bindings}, body}}");}$targ$6=function $targ$6(context$0,temp$8$0,form$4,temp$9$0){var t0$8=void 0;var t1$5=void 0;var body$2=void 0;var bindings$2=void 0;t0$8=temp$9$0;if(Array.isArray(t0$8)&&(t1$5=t0$8.length,t1$5===3&&t0$8[0]==="data")){body$2=t0$8[1];bindings$2=t0$8[2];}else{___match_error(temp$9$0);}return["send",["symbol","letrec"],["data",bindings$2,body$2]];};t0$9=getProjector(mac$0("where"))($targ$6);if(t0$9[0]){where_mac$0=t0$9[1];}else{___match_error($targ$6,"mac{\"where\"}! where_mac{context, _, form, #data{body, bindings}}");}$targ$7=function $targ$7(context$1,info$0,form$5,temp$10$0){var t0$10=void 0;var t1$6=void 0;var t2$4=void 0;var t3$4=void 0;var sym$0=void 0;var name$0=void 0;t0$10=temp$10$0;if(Array.isArray(t0$10)&&(t1$6=t0$10.length,t1$6===2&&t0$10[0]==="data"&&(t2$4=t0$10[1],sym$0=t2$4,Array.isArray(t2$4)&&(t3$4=t2$4.length,t3$4===2&&t2$4[0]==="symbol")))){name$0=t2$4[1];}else{___match_error(temp$10$0);}return sym$0.env.mark(["raw-symbol",name$0]);};t0$11=getProjector(mac$0("raw-symbol"))($targ$7);if(t0$11[0]){rawsym_mac$0=t0$11[1];}else{___match_error($targ$7,"mac{\"raw-symbol\"}! rawsym_mac{context, info, form, #data{sym and #symbol{name}}}");}$targ$8=function $targ$8(context$2,temp$11$0,form$6,temp$12$0){var t0$12=void 0;var t1$7=void 0;var t2$5=void 0;var t3$5=void 0;var f$0=void 0;var expr$0=void 0;t0$12=temp$12$0;if(Array.isArray(t0$12)&&(t1$7=t0$12.length,t1$7===3&&t0$12[0]==="data"&&(t2$5=t0$12[1],Array.isArray(t2$5)&&(t3$5=t2$5.length,t3$5===1&&t2$5[0]==="void")))){expr$0=t0$12[2];}else{___match_error(temp$12$0);}f$0=function f(ph$2$0){var m$2=void 0;var acc$1=void 0;var temp$13=void 0;var other$1=void 0;var args$0=void 0;var x$3=void 0;var $$7494$0=void 0;var $$7495$0=void 0;var t0$13=void 0;var t1$8=void 0;var t2$6=void 0;t0$13=ph$2$0;t1$8=t0$13.length;if(t1$8===2&&t0$13[0]==="symbol"&&(t2$6=getProjector(camelCase$0)(t0$13[1]),t2$6[0])){x$3=t2$6[1];return["value",x$3];}else{if(t1$8>=1&&t0$13[0]==="data"){args$0=Array.prototype.slice.call(t0$13,1);return["data"].concat((acc$1=[],temp$13=null,m$2=null,function(){var _iteratorNormalCompletion2=true;var _didIteratorError2=false;var _iteratorError2=undefined;try{$5:for(var _iterator2=args$0[Symbol.iterator](),_step2;!(_iteratorNormalCompletion2=(_step2=_iterator2.next()).done);_iteratorNormalCompletion2=true){m$2=_step2.value;var arg$0=void 0;arg$0=m$2;temp$13=f$0(arg$0);acc$1.push(temp$13);}}catch(err){_didIteratorError2=true;_iteratorError2=err;}finally{try{if(!_iteratorNormalCompletion2&&_iterator2.return){_iterator2.return();}}finally{if(_didIteratorError2){throw _iteratorError2;}}}}(),acc$1));}else{other$1=ph$2$0;throw ErrorFactory(["syntax","dot"]).create("Argument to '.' must be a symbol or an array",{"argument":other$1});}}};return f$0(expr$0);};t0$14=getProjector(mac$0("."))($targ$8);if(t0$14[0]){dot_mac$0=t0$14[1];}else{___match_error($targ$8,"mac{\".\"}! dot_mac{context, _, form, #data{#void{}, expr}}");}$targ$9=function $targ$9(ctx$0,info$1,form$7,temp$14$0){var t0$15=void 0;var t1$9=void 0;var rhs$0=void 0;var lhs$0=void 0;t0$15=temp$14$0;if(Array.isArray(t0$15)&&(t1$9=t0$15.length,t1$9===3&&t0$15[0]==="data")){rhs$0=t0$15[1];lhs$0=t0$15[2];}else{___match_error(temp$14$0);}return["send",["symbol","="],["data",lhs$0,rhs$0]];};t0$16=getProjector(mac$0("as"))($targ$9);if(t0$16[0]){as_mac$0=t0$16[1];}else{___match_error($targ$9,"mac{\"as\"}! as_mac{ctx, info, form, #data{rhs, lhs}}");}$targ$10=function $targ$10(ph$3$0,info$2,form$8,expr$1){var x$4=void 0;var t0$18=void 0;var t1$11=void 0;var $targ$26=void 0;var lhs$1=void 0;var rhs$1=void 0;var t0$20=void 0;var t1$13=void 0;var t2$8=void 0;var t3$6=void 0;var t4$3=void 0;var t0$21=void 0;var t1$14=void 0;var t2$9=void 0;var t3$7=void 0;var t4$4=void 0;var opt$0=void 0;var rhs2$0=void 0;var lhs$2=void 0;var rhs$3=void 0;var s$1=void 0;var rhs$2=void 0;var x$5=void 0;var s$0=void 0;var $$7625$0=void 0;var $$7626$0=void 0;var $$7627$0=void 0;var $$7628$0=void 0;var t0$19=void 0;var bridge$$7622$0=void 0;var t1$12=void 0;var t2$7=void 0;var m$3$0=void 0;var opt$1=void 0;var rhs2$1=void 0;var vs$0=void 0;var v$1=void 0;var $$7782$0=void 0;var $$7783$0=void 0;var t0$23=void 0;var m$5$0=void 0;var expr$2=void 0;var pc$0=void 0;var assignment$0=void 0;var rval$0=void 0;var lhs$3=void 0;var rhs$4=void 0;var t0$22=void 0;var m$4$0=void 0;var other$2=void 0;var t0$17=void 0;var t1$10=void 0;if(x$4=ph$3$0,x$4 instanceof Array&&x$4[0]==="pattern"){$targ$26=expr$1;t0$18=$targ$26;if(Array.isArray(t0$18)&&(t1$11=t0$18.length,t1$11===3&&t0$18[0]==="data")){lhs$1=t0$18[1];rhs$1=t0$18[2];}else{___match_error($targ$26,"#data{lhs, rhs}");}[lhs$1,rhs$1];return["default",lhs$1,rhs$1];}else{t0$17=ph$3$0;t1$10=t0$17.length;if(t1$10===2&&t0$17[0]==="expr"&&t0$17[1]==="data"){m$3$0=expr$1;if(Array.isArray(m$3$0)&&(t0$19=m$3$0.length,t0$19===1&&m$3$0[0]==="void")){return["assoc"];}else{bridge$$7622$0=m$3$0;if(Array.isArray(bridge$$7622$0)&&(t0$20=bridge$$7622$0.length,t0$20===3&&bridge$$7622$0[0]==="data"&&(t1$13=bridge$$7622$0[1],x$5=t1$13,Array.isArray(t1$13)&&(t2$8=t1$13.length,t2$8===2&&t1$13[0]==="symbol"&&(s$0=t1$13[1],t3$6=bridge$$7622$0[2],Array.isArray(t3$6)&&(t4$3=t3$6.length,t4$3===1&&t3$6[0]==="void")))))||Array.isArray(bridge$$7622$0)&&(t0$21=bridge$$7622$0.length,t0$21===3&&bridge$$7622$0[0]==="data"&&(t1$14=bridge$$7622$0[1],Array.isArray(t1$14)&&(t2$9=t1$14.length,t2$9===1&&t1$14[0]==="void"&&(t3$7=bridge$$7622$0[2],x$5=t3$7,Array.isArray(t3$7)&&(t4$4=t3$7.length,t4$4===2&&t3$7[0]==="symbol"&&(s$0=t3$7[1],true))))))){return["assoc",["value",camelCase$0(s$0)],x$5];}else{if(($$7625$0=Array.isArray(m$3$0))&&(t0$19=m$3$0.length,($$7627$0=t0$19===3)&&($$7628$0=m$3$0[0]==="data")&&(t1$12=m$3$0[1],Array.isArray(t1$12)&&(t2$7=t1$12.length,t2$7===2&&t1$12[0]==="symbol")))){s$1=t1$12[1];rhs$2=m$3$0[2];return["assoc",["value",camelCase$0(s$1)],rhs$2];}else{if($$7628$0){lhs$2=m$3$0[1];rhs$3=m$3$0[2];return["objsplice",["multi",(opt$0=pattern_handlers$0.build_object,rhs2$0=__lt____lt____colon__$0(["use",info$2.scope,rhs$3],rhs$3),PatternCompiler$0(lhs$2,info$2,opt$0).extract_from_rhs(rhs2$0))]];}else{return ___match_error(m$3$0,"#data{lhs, rhs}");}}}}}else{other$2=ph$3$0;m$4$0=expr$1;if(Array.isArray(m$4$0)&&(t0$22=m$4$0.length,t0$22===3&&m$4$0[0]==="data")){lhs$3=m$4$0[1];rhs$4=m$4$0[2];opt$1=pattern_handlers$0.declare_variables;pc$0=PatternCompiler$0(lhs$3,info$2,opt$1);rhs2$1=__lt____lt____colon__$0(["use",info$2.scope,rhs$4],rhs$4);assignment$0=pc$0.extract_from_rhs(rhs2$1);m$5$0=pc$0.vars;if(($$7782$0=Array.isArray(m$5$0))&&(t0$23=m$5$0.length,t0$23===0)){rval$0=["value",undefined];}else{if($$7782$0&&t0$23===1){v$1=m$5$0[0];rval$0=v$1;}else{vs$0=m$5$0;rval$0=["data"].concat(vs$0);}}expr$2=["splice",assignment$0,rval$0];return pc$0.wrapAssignment(expr$2);}else{return ___match_error(m$4$0,"#data{lhs, rhs}");}}}};t0$24=getProjector(mac$0("="))($targ$10);if(t0$24[0]){equal_mac$0=t0$24[1];}else{___match_error($targ$10,"mac{\"=\"}! equal_mac{match, info, form, expr}");}$targ$11=function $targ$11(ph$4$0,temp$15$0,temp$16$0,temp$17$0){var t0$25=void 0;var t0$26=void 0;var t1$15=void 0;var x$6=void 0;var x$7=void 0;var rhs$6=void 0;var t0$27=void 0;var m$6$0=void 0;var x$8=void 0;var t0$28=void 0;var t1$16=void 0;var t2$10=void 0;var $targ$27=void 0;var stmts$0=void 0;var other$3=void 0;var env$0=void 0;var lhs$4=void 0;var rhs$5=void 0;t0$25=temp$15$0;if(___hasprop(t0$25,"env")){env$0=t0$25.env;}else{___match_error(temp$15$0);}t0$26=temp$17$0;if(Array.isArray(t0$26)&&(t1$15=t0$26.length,t1$15===3&&t0$26[0]==="data")){lhs$4=t0$26[1];rhs$5=t0$26[2];}else{___match_error(temp$17$0);}if(x$6=ph$4$0,x$6 instanceof Array&&x$6[0]==="pattern"){m$6$0=[lhs$4,rhs$5];if(Array.isArray(m$6$0)&&(t0$27=m$6$0.length,t0$27===2&&(x$7=m$6$0[0],x$7 instanceof Array&&x$7[0]==="void"))){rhs$6=m$6$0[1];return["assoc",rhs$6];}else{return["assoc",lhs$4,rhs$5];}}else{if(x$8=ph$4$0,x$8 instanceof Array&&x$8[0]==="test"){$targ$27=rhs$5;t0$28=getProjector(Body$0)($targ$27);if(t0$28[0]&&(t1$16=t0$28[1],t2$10=t1$16.length,t2$10>=0)){stmts$0=Array.prototype.slice.call(t1$16,0);}else{___match_error($targ$27,"Body! {*stmts}");}return["blocktest",lhs$4,stmts$0];}else{other$3=ph$4$0;return["assoc",lhs$4,rhs$5];}}};t0$29=getProjector(mac$0("=>"))($targ$11);if(t0$29[0]){fat_arrow_mac$0=t0$29[1];}else{___match_error($targ$11,"mac{\"=>\"}! fat_arrow_mac{match, {=> env}, _, #data{lhs, rhs}}");}$targ$12=function $targ$12(context$3,info$3,form$9,ph$5$0){var t0$31=void 0;var t0$32=void 0;var bridge$$7926$0=void 0;var t0$33=void 0;var bridge$$7925$0=void 0;var accum$0=void 0;var m$8=void 0;var acc$2=void 0;var temp$18=void 0;var decls$0=void 0;var newargs$0=void 0;var _body$0=void 0;var x$9=void 0;var body2$1=void 0;var newp$0=void 0;var body2$2=void 0;var a$0=void 0;var pc2$1=void 0;var body2$3=void 0;var a$1=void 0;var other$5=void 0;var fw$1=void 0;var bw$0=void 0;var defaults$0=void 0;var rest$0=void 0;var objp$1=void 0;var i$0=void 0;var objp$0=void 0;var fw$0=void 0;var t0$34=void 0;var t1$18=void 0;var t2$11=void 0;var t3$8=void 0;var t4$5=void 0;var m$7$0=void 0;var wrap$0=void 0;var pc$1=void 0;var cpattern$0=void 0;var arg$1=void 0;var args$1=void 0;var pre$0=void 0;var body$3=void 0;var post$0=void 0;var generator$0=void 0;var t0$30=void 0;var t1$17=void 0;var bridge$$7924$0=void 0;t0$30=ph$5$0;t1$17=t0$30.length;if(t1$17>=5&&t1$17<=6&&t0$30[0]==="data"&&(bridge$$7924$0=t0$30[1],(bridge$$7925$0=bridge$$7924$0,(bridge$$7926$0=bridge$$7925$0,(arg$1=bridge$$7926$0,Array.isArray(bridge$$7926$0)&&(t0$31=bridge$$7926$0.length,t0$31>=1&&bridge$$7926$0[0]==="data"&&(args$1=Array.prototype.slice.call(bridge$$7926$0,1),true)))||Array.isArray(bridge$$7926$0)&&(t0$32=bridge$$7926$0.length,t0$32>=1&&bridge$$7926$0[0]==="multi"&&(args$1=Array.prototype.slice.call(bridge$$7926$0,1),arg$1=["data"].concat(args$1),true)))||Array.isArray(bridge$$7925$0)&&(t0$33=bridge$$7925$0.length,t0$33===1&&bridge$$7925$0[0]==="void"&&(args$1=[],arg$1=["data"],true)))||(arg$1=["data",arg$1],args$1=[arg$1],true))){pre$0=t0$30[2];body$3=t0$30[3];post$0=t0$30[4];if(5>=t1$17){generator$0=["value",false];}else{generator$0=t0$30[5];}wrap$0=function wrap(body2$0){var body3$0=void 0;if(equal(post$0,["value",null])){body3$0=body2$0;}else{body3$0=["multi",body2$0,post$0];}if(equal(pre$0,["value",null])){return body3$0;}else{return["multi",pre$0,body3$0];}};pc$1=PatternCompiler$0(arg$1,info$3,__amp__(pattern_handlers$0.declare_variables,__amp____colon__({"indexable":true,"allow_nested":true},__amp____colon__((accum$0={},accum$0["fallback"]=function fallback(target$0,pattern$0){return match_error$0(target$0,pattern$0);},accum$0),{"tags":{"declare_mode":"let"},"insert_object_argument":true}))));cpattern$0=pc$1.compile();m$7$0=cpattern$0;if(Array.isArray(m$7$0)&&(t0$34=m$7$0.length,t0$34===5&&m$7$0[0]==="array_pattern"&&(fw$0=m$7$0[1],t1$18=m$7$0[2],Array.isArray(t1$18)&&(t2$11=t1$18.length,t2$11===0&&(t3$8=m$7$0[3],Array.isArray(t3$8)&&(t4$5=t3$8.length,t4$5===0&&m$7$0[4]===void 0)))))){decls$0=[];acc$2=[];temp$18=null;m$8=null;var _iteratorNormalCompletion3=true;var _didIteratorError3=false;var _iteratorError3=undefined;try{$6:for(var _iterator3=zip(fw$0,args$1)[Symbol.iterator](),_step3;!(_iteratorNormalCompletion3=(_step3=_iterator3.next()).done);_iteratorNormalCompletion3=true){m$8=_step3.value;var t0$37=void 0;var t0$38=void 0;var bridge$$8140$0=void 0;var m$9$0=void 0;var newv$0=void 0;var pc2$0=void 0;var other$4=void 0;var expr$3=void 0;var v$2=void 0;var t0$36=void 0;var t1$20=void 0;var t2$12=void 0;var bridge$$8065$0=void 0;var ph$6$0=void 0;var arg$2=void 0;var t0$35=void 0;var t1$19=void 0;t0$35=m$8;if(Array.isArray(t0$35)&&(t1$19=t0$35.length,t1$19===2)){ph$6$0=t0$35[0];arg$2=t0$35[1];t0$36=ph$6$0;if(Array.isArray(t0$36)&&(t1$20=t0$36.length,t1$20===2&&t0$36[0]==="assign"&&(t2$12=t0$36[1],expr$3=t2$12,bridge$$8065$0=t2$12,(Array.isArray(bridge$$8065$0)&&(t0$37=bridge$$8065$0.length,t0$37===2&&bridge$$8065$0[0]==="symbol"&&(v$2=bridge$$8065$0[1],true))||Array.isArray(bridge$$8065$0)&&(t0$38=bridge$$8065$0.length,t0$38===2&&bridge$$8065$0[0]==="variable"&&(v$2=bridge$$8065$0[1],true)))&&nequal(expr$3.declare_mode,"set")))){m$9$0=expr$3.declare_mode;if(m$9$0==="let"){temp$18=__amp____colon__(expr$3,{"mutable":false});}else{if(m$9$0==="var"){temp$18=__amp____colon__(expr$3,{"mutable":true});}else{bridge$$8140$0=m$9$0;if(bridge$$8140$0==="unqualified"||bridge$$8140$0===void 0){temp$18=__amp____colon__(expr$3,{"mutable":false});}else{temp$18=___match_error(m$9$0,".unqualified or undefined? ");}}}}else{other$4=ph$6$0;newv$0=__amp__(["symbol",info$3.gensym("temp")],{"env":info$3.mkenv(),"location":arg$2.location});pc2$0=pc$1.fork(other$4);decls$0.push(pc2$0.extract_from_rhs(newv$0));temp$18=newv$0;}acc$2.push(temp$18);}else{___match_error(m$8);}}}catch(err){_didIteratorError3=true;_iteratorError3=err;}finally{try{if(!_iteratorNormalCompletion3&&_iterator3.return){_iterator3.return();}}finally{if(_didIteratorError3){throw _iteratorError3;}}}newargs$0=acc$2;_body$0=pc$1.wrapBody(body$3);return["lambda",newargs$0,wrap$0(["multi"].concat(decls$0).concat([_body$0])),generator$0];}else{objp$0=m$7$0;if(x$9=m$7$0,x$9 instanceof Array&&x$9[0]==="object_pattern"){body2$1=["send",["symbol","match"],["data",["send",["symbol","arguments"],["value",0]],["send",["symbol","->"],["data",arg$1,body$3]]]];return["lambda",[],wrap$0(body2$1),generator$0];}else{if(Array.isArray(m$7$0)&&(t0$34=m$7$0.length,t0$34===3&&m$7$0[0]==="all"&&(t1$18=m$7$0[1],Array.isArray(t1$18)&&(t2$11=t1$18.length,t2$11===5&&t1$18[0]==="array_pattern"&&(fw$1=t1$18[1],bw$0=t1$18[2],defaults$0=t1$18[3],rest$0=t1$18[4],objp$1=m$7$0[2],___hasprop(m$7$0,"insertion_index")))))){i$0=m$7$0.insertion_index;a$0=__lt____lt____colon__$0(["symbol","arguments"],arg$1);fw$1.splice(i$0,0,objp$1);newp$0=["array_pattern",fw$1,bw$0,defaults$0,rest$0];pc2$1=pc$1.fork(newp$0);body2$2=["multi",pc2$1.extract_from_rhs(a$0),pc$1.wrapBody(body$3)];return["lambda",[],wrap$0(body2$2),generator$0];}else{other$5=m$7$0;a$1=__lt____lt____colon__$0(["symbol","arguments"],arg$1);body2$3=["send",["send",["symbol","match"],["send",["symbol","."],["data",["void"],["symbol","indexable"]]]],["data",a$1,["send",["symbol","->"],["data",arg$1,body$3]]]];return["lambda",[],wrap$0(body2$3),generator$0];}}}}else{return ___match_error(ph$5$0,"#data{[arg and #data{*args}\n          \\ or #multi{*args} and arg is #data{*args}\n          \\ or #void{} and args is {} and arg is #data{}\n          \\ or arg is #data{arg} and args is {arg}]\n         pre, body, post, generator = #value{false}}");}};t0$39=getProjector(mac$0("_lambda"))($targ$12);if(t0$39[0]){_lambda_mac$0=t0$39[1];}else{___match_error($targ$12,"mac{\"_lambda\"}! _lambda_mac{context, info, form, match}");}$targ$13=function $targ$13(ctx$1,temp$19$0,form$10,ph$7$0){var other$6=void 0;var args$2=void 0;var body$4=void 0;var t0$40=void 0;var t1$21=void 0;t0$40=ph$7$0;t1$21=t0$40.length;if(t1$21===3&&t0$40[0]==="data"){args$2=t0$40[1];body$4=t0$40[2];return["send",["symbol","_lambda"],["data",args$2,["value",null],body$4,["value",null],["value",true]]];}else{other$6=ph$7$0;throw ErrorFactory(["syntax","lambda"]).create("Bad lambda syntax",{"node":other$6});}};t0$41=getProjector(mac$0("*->"))($targ$13);if(t0$41[0]){genarrow_mac$0=t0$41[1];}else{___match_error($targ$13,"mac{\"*->\"}! genarrow_mac{ctx, _, form, match}");}$targ$14=function $targ$14(ctx$2,info$4,form$11,temp$20$0){var t0$42=void 0;var t1$22=void 0;var t0$43=void 0;var t1$23=void 0;var $targ$28=void 0;var at$0=void 0;var self$0=void 0;var args$3=void 0;var body$5=void 0;t0$42=temp$20$0;if(Array.isArray(t0$42)&&(t1$22=t0$42.length,t1$22===3&&t0$42[0]==="data")){args$3=t0$42[1];body$5=t0$42[2];}else{___match_error(temp$20$0);}$targ$28=info$4.mark(["symbol","@"],["symbol","self"]);t0$43=$targ$28;if(Array.isArray(t0$43)&&(t1$23=t0$43.length,t1$23===2)){at$0=t0$43[0];self$0=t0$43[1];}else{___match_error($targ$28,"{at, self}");}[at$0,self$0];return["send",["symbol","_lambda"],["data",args$3,["send",["symbol","="],["data",["send",["symbol","let"],["send",["symbol","and"],["data",at$0,self$0]]],["symbol","this"]]],body$5,["value",null]]];};t0$44=getProjector(mac$0("@->"))($targ$14);if(t0$44[0]){metharrow_mac$0=t0$44[1];}else{___match_error($targ$14,"mac{\"@->\"}! metharrow_mac{ctx, info, form, #data{args, body}}");}$targ$15=function $targ$15(ph$8$0,temp$21$0,form$12,expr$4){var x$10=void 0;var t0$45=void 0;var t1$24=void 0;var $targ$29=void 0;var lhs$5=void 0;var rhs$7=void 0;var other$8=void 0;var args$4=void 0;var body$6=void 0;var t0$46=void 0;var m$10$0=void 0;var other$7=void 0;if(x$10=ph$8$0,x$10 instanceof Array&&x$10[0]==="clause"){$targ$29=expr$4;t0$45=$targ$29;if(Array.isArray(t0$45)&&(t1$24=t0$45.length,t1$24===3&&t0$45[0]==="data")){lhs$5=t0$45[1];rhs$7=t0$45[2];}else{___match_error($targ$29,"#data{lhs, rhs}");}[lhs$5,rhs$7];return["clause",lhs$5,rhs$7];}else{other$7=ph$8$0;m$10$0=expr$4;if(Array.isArray(m$10$0)&&(t0$46=m$10$0.length,t0$46===3&&m$10$0[0]==="data")){args$4=m$10$0[1];body$6=m$10$0[2];return["send",["symbol","_lambda"],["data",args$4,["value",null],body$6,["value",null]]];}else{other$8=m$10$0;throw ErrorFactory(["syntax","lambda"]).create("Bad lambda syntax",{"node":other$8});}}};t0$47=getProjector(mac$0("->"))($targ$15);if(t0$47[0]){arrow_mac$0=t0$47[1];}else{___match_error($targ$15,"mac{\"->\"}! arrow_mac{match, _, form, expr}");}_catch$0=named_statement_matcher$0("catch");_finally$0=named_statement_matcher$0("finally");try_pattern$0=["seq",["multiple",_catch$0],["multiple",_finally$0,0,1]];$targ$16=function $targ$16(temp$22$0,info$5,form$13,temp$23$0){var t0$48=void 0;var t1$25=void 0;var t0$49=void 0;var t1$26=void 0;var body$7=void 0;t0$48=temp$22$0;if(Array.isArray(t0$48)&&(t1$25=t0$48.length,t1$25===2&&t0$48[0]==="expr"&&t0$48[1]==="multi")){}else{___match_error(temp$22$0);}t0$49=temp$23$0;if(Array.isArray(t0$49)&&(t1$26=t0$49.length,t1$26===2&&t0$49[0]==="data")){body$7=t0$49[1];}else{___match_error(temp$23$0);}return flatmacro$0(try_pattern$0,function(temp$24$0){var t0$50=void 0;var t1$27=void 0;var t2$13=void 0;var t3$9=void 0;var t4$6=void 0;var t5$2=void 0;var m$11=void 0;var m$12=void 0;var t0$54=void 0;var $targ$30=void 0;var m$13=void 0;var env$1=void 0;var clauses$0=void 0;var finally$1=void 0;var make_ebody$0=void 0;var catches$0=void 0;var finallies$0=void 0;t0$50=temp$24$0;if(Array.isArray(t0$50)&&(t1$27=t0$50.length,t1$27===3&&t0$50[0]==="seq"&&(t2$13=t0$50[1],Array.isArray(t2$13)&&(t3$9=t2$13.length,t3$9>=1&&t2$13[0]==="multiple"&&(catches$0=Array.prototype.slice.call(t2$13,1),t4$6=t0$50[2],Array.isArray(t4$6)&&(t5$2=t4$6.length,t5$2>=1&&t4$6[0]==="multiple")))))){finallies$0=Array.prototype.slice.call(t4$6,1);}else{___match_error(temp$24$0);}env$1=info$5.mkenv();clauses$0=[];finally$1=["void"];m$11=null;var _iteratorNormalCompletion4=true;var _didIteratorError4=false;var _iteratorError4=undefined;try{$7:for(var _iterator4=catches$0[Symbol.iterator](),_step4;!(_iteratorNormalCompletion4=(_step4=_iterator4.next()).done);_iteratorNormalCompletion4=true){m$11=_step4.value;var p$0=void 0;var body$8=void 0;var t0$51=void 0;var t1$28=void 0;var t2$14=void 0;var t3$10=void 0;var t4$7=void 0;var t5$3=void 0;t0$51=m$11;if(Array.isArray(t0$51)&&(t1$28=t0$51.length,t1$28===3&&t0$51[0]==="send"&&(t2$14=t0$51[1],Array.isArray(t2$14)&&(t3$10=t2$14.length,t3$10===2&&t2$14[0]==="symbol"&&t2$14[1]==="catch"&&(t4$7=t0$51[2],Array.isArray(t4$7)&&(t5$3=t4$7.length,t5$3===3&&t4$7[0]==="data")))))){p$0=t4$7[1];body$8=t4$7[2];clauses$0.push(env$1.mark(["send",["symbol","->"],["data",p$0,body$8]]));}else{___match_error(m$11);}}}catch(err){_didIteratorError4=true;_iteratorError4=err;}finally{try{if(!_iteratorNormalCompletion4&&_iterator4.return){_iterator4.return();}}finally{if(_didIteratorError4){throw _iteratorError4;}}}m$12=null;var _iteratorNormalCompletion5=true;var _didIteratorError5=false;var _iteratorError5=undefined;try{$8:for(var _iterator5=finallies$0[Symbol.iterator](),_step5;!(_iteratorNormalCompletion5=(_step5=_iterator5.next()).done);_iteratorNormalCompletion5=true){m$12=_step5.value;var body$9=void 0;var t0$52=void 0;var t1$29=void 0;var t2$15=void 0;var t3$11=void 0;var t4$8=void 0;var t5$4=void 0;t0$52=m$12;if(Array.isArray(t0$52)&&(t1$29=t0$52.length,t1$29===3&&t0$52[0]==="send"&&(t2$15=t0$52[1],Array.isArray(t2$15)&&(t3$11=t2$15.length,t3$11===2&&t2$15[0]==="symbol"&&t2$15[1]==="finally"&&(t4$8=t0$52[2],Array.isArray(t4$8)&&(t5$4=t4$8.length,t5$4===2&&t4$8[0]==="data")))))){body$9=t4$8[1];finally$1=body$9;finally$1;}else{___match_error(m$12);}}}catch(err){_didIteratorError5=true;_iteratorError5=err;}finally{try{if(!_iteratorNormalCompletion5&&_iterator5.return){_iterator5.return();}}finally{if(_didIteratorError5){throw _iteratorError5;}}}clauses$0.push(env$1.mark(["send",["symbol","->"],["data",["symbol","e"],["send",["symbol","throw"],["symbol","e"]]]]));make_ebody$0=function make_ebody(wrap$1){return parse_clauses$0(info$5,["symbol","excv"],clauses$0,{"wrap":wrap$1});};$targ$30=function $targ$30(ph$9$0,e$0){var trystmt$0=void 0;var $$8582$0=void 0;var $$8583$0=void 0;var $$8584$0=void 0;var $$8585$0=void 0;var t0$53=void 0;var t1$30=void 0;t0$53=ph$9$0;t1$30=t0$53.length;if(($$8584$0=t1$30===2)&&($$8585$0=t0$53[0]==="expr")&&t0$53[1]==="multi"){return["nostep",this.form];}else{if($$8585$0&&t0$53[1]==="ignore"){return["js_try",body$7,["send",["symbol","->"],["data",["data",["symbol","excv"]],make_ebody$0(function(x$11){return x$11;})]],finally$1];}else{if($$8585$0&&t0$53[1]==="expr"){trystmt$0=["js_try",["send",["symbol","="],["data",["send",["symbol","set-var"],["symbol","rval"]],body$7]],["send",["symbol","->"],["data",["data",["symbol","excv"]],make_ebody$0(function(x$12){return["send",["symbol","="],["data",["send",["symbol","set-var"],["symbol","rval"]],x$12]];})]],finally$1];return["multi",["send",["symbol","="],["data",["send",["symbol","var"],["symbol","rval"]],["symbol","false"]]],trystmt$0,["symbol","rval"]];}else{return ___match_error(ph$9$0,"#expr{.expr}");}}}};t0$54=getProjector(ctx_mac$0)($targ$30);if(t0$54[0]){m$13=t0$54[1];}else{___match_error($targ$30);}return["macro",m$13];});};t0$55=getProjector(mac$0("try"))($targ$16);if(t0$55[0]){try_mac$0=t0$55[1];}else{___match_error($targ$16,"mac{\"try\"}! try_mac{#expr{.multi}, info, form, #data{body}}");}$targ$17=function $targ$17(ph$10$0,info$6,form$14,temp$25$0){var t0$56=void 0;var t1$31=void 0;var t2$16=void 0;var t3$12=void 0;var t4$9=void 0;var parsed_clauses$0=void 0;var parsed_clauses$1=void 0;var trystmt$1=void 0;var other$9=void 0;var $$8640$0=void 0;var $$8641$0=void 0;var $$8642$0=void 0;var $$8643$0=void 0;var t0$57=void 0;var t1$32=void 0;var expr$5=void 0;var clauses$1=void 0;t0$56=temp$25$0;if(Array.isArray(t0$56)&&(t1$31=t0$56.length,t1$31===3&&t0$56[0]==="data"&&(expr$5=t0$56[1],t2$16=getProjector(Body$0)(t0$56[2]),t2$16[0]&&(t3$12=t2$16[1],t4$9=t3$12.length,t4$9>=0)))){clauses$1=Array.prototype.slice.call(t3$12,0);}else{___match_error(temp$25$0);}t0$57=ph$10$0;t1$32=t0$57.length;if(($$8642$0=t1$32===2)&&($$8643$0=t0$57[0]==="expr")&&t0$57[1]==="multi"){return["nostep",form$14];}else{if($$8643$0&&t0$57[1]==="ignore"){clauses$1.push(info$6.mkenv().mark(["send",["symbol","->"],["data",["symbol","e"],["send",["symbol","throw"],["symbol","e"]]]]));parsed_clauses$0=parse_clauses$0(info$6,["symbol","excv"],clauses$1,{"wrap":function wrap(x$13){return x$13;}});return["js_try",expr$5,["send",["symbol","->"],["data",["data",["symbol","excv"]],parsed_clauses$0]],["void"]];}else{other$9=ph$10$0;clauses$1.push(info$6.mkenv().mark(["send",["symbol","->"],["data",["symbol","e"],["send",["symbol","throw"],["symbol","e"]]]]));parsed_clauses$1=parse_clauses$0(info$6,["symbol","excv"],clauses$1,{"wrap":function wrap(x$14){return["send",["symbol","="],["data",["send",["symbol","set-var"],["symbol","rval"]],x$14]];}});trystmt$1=["js_try",["send",["symbol","="],["data",["send",["symbol","set-var"],["symbol","rval"]],expr$5]],["send",["symbol","->"],["data",["data",["symbol","excv"]],parsed_clauses$1]],["void"]];return["send",["symbol","let"],["data",["send",["symbol","="],["data",["send",["symbol","var"],["symbol","rval"]],["symbol","false"]]],["multi",trystmt$1,["symbol","rval"]]]];}}};t0$58=getProjector(mac$0("!!"))($targ$17);if(t0$58[0]){tryop_mac$0=t0$58[1];}else{___match_error($targ$17,"mac{\"!!\"}! tryop_mac{match, info, form, #data{expr, Body! {*clauses}}}");}$targ$18=function $targ$18(temp$26$0,form$15,arg$3){return["js_throw",arg$3];};t0$59=getProjector(expr_mac$0)($targ$18);if(t0$59[0]&&(t1$33=getProjector(mac$0("throw"))(t0$59[1]),t1$33[0])){throw_mac$0=t1$33[1];}else{___match_error($targ$18,"expr_mac! mac{\"throw\"}! throw_mac{_, form, arg}");}$targ$19=function $targ$19(ph$11$0,temp$27$0,form$16,arg$4){var x$15=void 0;var subp$0=void 0;var w$0=void 0;if(x$15=ph$11$0,x$15 instanceof Array&&x$15[0]==="pattern"){if(equal(arg$4,["void"])){subp$0=null;}else{subp$0=arg$4;}w$0=function w(ph$12){return ph$12;};return["special",AssignmentHandler$0(subp$0,w$0)];}else{return ___match_error(ph$11$0,"#pattern");}};t0$60=getProjector(mac$0("expr-value"))($targ$19);if(t0$60[0]){exprvalue_mac$0=t0$60[1];}else{___match_error($targ$19,"mac{\"expr-value\"}! exprvalue_mac{match, _, form, arg}");}$targ$20=function $targ$20(ph$13$0,temp$28$0,form$17,arg$5){var x$16=void 0;var subp$1=void 0;var w$1=void 0;var t0$61=void 0;var t0$62=void 0;var otherwise$0=void 0;var bridge$$8782$0=void 0;if(x$16=ph$13$0,x$16 instanceof Array&&x$16[0]==="pattern"){if(equal(arg$5,["void"])){subp$1=null;}else{subp$1=arg$5;}w$1=function w(ph$14){return["send",["symbol","return"],ph$14];};return["special",AssignmentHandler$0(subp$1,w$1)];}else{bridge$$8782$0=ph$13$0;if(Array.isArray(bridge$$8782$0)&&(t0$61=bridge$$8782$0.length,t0$61===2&&bridge$$8782$0[0]==="expr"&&bridge$$8782$0[1]==="expr")||Array.isArray(bridge$$8782$0)&&(t0$62=bridge$$8782$0.length,t0$62===2&&bridge$$8782$0[0]==="expr"&&bridge$$8782$0[1]==="head")){return["js_return",arg$5];}else{otherwise$0=ph$13$0;return["nostep",form$17];}}};t0$63=getProjector(mac$0("return"))($targ$20);if(t0$63[0]){return_mac$0=t0$63[1];}else{___match_error($targ$20,"mac{\"return\"}! return_mac{match, _, form, arg}");}$targ$21=function $targ$21(temp$29$0,form$18,arg$6){return["js_new",arg$6];};t0$64=getProjector(expr_mac$0)($targ$21);if(t0$64[0]&&(t1$34=getProjector(mac$0("new"))(t0$64[1]),t1$34[0])){new_mac$0=t1$34[1];}else{___match_error($targ$21,"expr_mac! mac{\"new\"}! new_mac{_, form, arg}");}$targ$22=function $targ$22(context$4,temp$30$0,form$19,temp$31$0){var t0$65=void 0;var other$10=void 0;var s$2=void 0;var t0$66=void 0;var t1$35=void 0;var arg$7=void 0;var ph$15$0=void 0;t0$65=temp$31$0;arg$7=t0$65;ph$15$0=t0$65;t0$66=ph$15$0;t1$35=t0$66.length;if(t1$35===2&&t0$66[0]==="symbol"){s$2=t0$66[1];return["undeclare",arg$7];}else{other$10=ph$15$0;return["js_delete",other$10];}};t0$67=getProjector(mac$0("delete"))($targ$22);if(t0$67[0]){delete_mac$0=t0$67[1];}else{___match_error($targ$22,"mac{\"delete\"}! delete_mac{context, _, form, match arg}");}$targ$23=function $targ$23(context$5,temp$32$0,form$20,temp$33$0){var t0$68=void 0;var t1$36=void 0;var t2$17=void 0;var t3$13=void 0;var t4$10=void 0;var stmts$1=void 0;t0$68=temp$33$0;if(Array.isArray(t0$68)&&(t1$36=t0$68.length,t1$36===2&&t0$68[0]==="data"&&(t2$17=getProjector(Body$0)(t0$68[1]),t2$17[0]&&(t3$13=t2$17[1],t4$10=t3$13.length,t4$10>=0)))){stmts$1=Array.prototype.slice.call(t3$13,0);}else{___match_error(temp$33$0);}return["splice"].concat(stmts$1);};t0$69=getProjector(mac$0("splice"))($targ$23);if(t0$69[0]){splice_mac$0=t0$69[1];}else{___match_error($targ$23,"mac{\"splice\"}! splice_mac{context, _, form, #data{Body! {*stmts}}}");}$targ$24=function $targ$24(context$6,temp$34$0,form$21,temp$35$0){var t0$70=void 0;var t1$37=void 0;var t2$18=void 0;var t3$14=void 0;var t4$11=void 0;var t5$5=void 0;var f$1=void 0;var tag$0=void 0;t0$70=temp$35$0;if(Array.isArray(t0$70)&&(t1$37=t0$70.length,t1$37===3&&t0$70[0]==="data"&&(t2$18=t0$70[1],Array.isArray(t2$18)&&(t3$14=t2$18.length,t3$14===1&&t2$18[0]==="void"&&(t4$11=t0$70[2],Array.isArray(t4$11)&&(t5$5=t4$11.length,t5$5===2&&t4$11[0]==="symbol")))))){tag$0=t4$11[1];}else{___match_error(temp$35$0);}tag$0=["value",tag$0];f$1=function f(ph$16$0,temp$36$0,form$22,expr$6){var x$17=void 0;var other$11=void 0;var subp$2=void 0;var $$9012$0=void 0;var $$9013$0=void 0;var t0$72=void 0;var m$14$0=void 0;var checker_mac$0=void 0;var x$18=void 0;var x$19=void 0;var other$12=void 0;var args$5=void 0;var $$9077$0=void 0;var $$9078$0=void 0;var t0$73=void 0;var m$15$0=void 0;if(x$17=ph$16$0,x$17 instanceof Array&&x$17[0]==="pattern"){checker_mac$0=["macro",function(context$7,temp$37$0,form$23,temp$38$0){var t0$71=void 0;var t1$38=void 0;var expr$7=void 0;t0$71=temp$38$0;if(Array.isArray(t0$71)&&(t1$38=t0$71.length,t1$38===2&&t0$71[0]==="data")){expr$7=t0$71[1];}else{___match_error(temp$38$0);}return["send",["symbol","let"],["data",["send",["symbol","="],["data",["symbol","x"],expr$7]],["send",["symbol","and"],["data",["send",["symbol","instanceof"],["data",["symbol","x"],["symbol","Array"]]],["send",["symbol","==="],["data",["send",["symbol","x"],["value",0]],tag$0]]]]]];}];m$14$0=expr$6;if(($$9012$0=Array.isArray(m$14$0))&&(t0$72=m$14$0.length,t0$72>=1&&m$14$0[0]==="data")){subp$2=Array.prototype.slice.call(m$14$0,1);return["data",tag$0].concat(subp$2);}else{if($$9012$0&&t0$72===1&&m$14$0[0]==="void"){return["check",checker_mac$0,["ignore"]];}else{other$11=m$14$0;return["check",checker_mac$0,expr$6];}}}else{if(x$18=ph$16$0,x$18 instanceof Array&&x$18[0]==="check"){return["send",["symbol","getChecker"],["data",["data",tag$0]]];}else{if(x$19=ph$16$0,x$19 instanceof Array&&x$19[0]==="project"){return["send",["symbol","getProjector"],["data",["data",tag$0]]];}else{m$15$0=expr$6;if(($$9077$0=Array.isArray(m$15$0))&&(t0$73=m$15$0.length,t0$73===1&&m$15$0[0]==="void")){return["data",tag$0];}else{if($$9077$0&&t0$73>=1&&m$15$0[0]==="data"){args$5=Array.prototype.slice.call(m$15$0,1);return["data",tag$0].concat(args$5);}else{other$12=m$15$0;return["send",["data",tag$0],other$12];}}}}}};return["macro",f$1];};t0$74=getProjector(mac$0("#"))($targ$24);if(t0$74[0]){hash_mac$0=t0$74[1];}else{___match_error($targ$24,"mac{\"#\"}! hash_mac{context, _, form, #data{#void{}, #symbol{var tag}}}");}$targ$25=function $targ$25(temp$39$0,temp$40$0,form$24,temp$41$0){var x$20=void 0;var t0$75=void 0;var t1$39=void 0;if(x$20=temp$39$0,x$20 instanceof Array&&x$20[0]==="pattern"){}else{___match_error(temp$39$0);}t0$75=temp$41$0;if(Array.isArray(t0$75)&&(t1$39=t0$75.length,t1$39===1&&t0$75[0]==="void")){}else{___match_error(temp$41$0);}return["ignore"];};t0$76=getProjector(mac$0("_"))($targ$25);if(t0$76[0]){placeholder_mac$0=t0$76[1];}else{___match_error($targ$25,"mac{\"_\"}! placeholder_mac{#pattern, _, form, #void{}}");}return exports$0;};module["exports"]=$targ$0;void 0;
//# sourceMappingURL=core.js.map