Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- define(["trove/arrays",
- "trove/error",
- "trove/lists",
- "trove/option",
- "trove/sets"],function($arrays20,$error21,$lists22,$option23,$sets24) {
- return function(R,NAMESPACE) {
- if(R.modules["$tests/pyret/tests/test$tail$call.arr19"]) {
- return R.modules["$tests/pyret/tests/test$tail$call.arr19"];
- } else {
- var G = R.getFieldLoc;
- var U = function(loc,name) {
- R.ffi.throwUninitializedIdMkLoc(loc,name)};
- var M = "tests/pyret/tests/test-tail-call.arr";
- var D = R.undefined;
- var L = [[M,26,2,438,26,8,444],
- [M,27,2,447,27,31,476],
- [M,27,13,458,27,17,462],
- [M,27,24,469,27,30,475],
- [M,27,4,449,27,31,476],
- [M,28,2,479,28,31,508],
- [M,28,13,490,28,17,494],
- [M,28,24,501,28,30,507],
- [M,28,4,481,28,31,508],
- [M,29,2,511,29,33,542],
- [M,29,15,524,29,19,528],
- [M,29,26,535,29,32,541],
- [M,29,4,513,29,33,542],
- [M,25,0,425,30,3,546],
- [M,35,8,668,35,12,672],
- [M,38,8,732,40,11,802],
- [M,39,20,780,39,30,790],
- [M,41,16,819,41,28,831],
- [M,38,13,737,38,34,758],
- [M,38,13,737,38,29,753],
- [M,37,8,709,37,22,723],
- [M,36,8,688,36,17,697],
- [M,36,6,686,41,29,832],
- [M,44,13,884,44,34,905],
- [M,45,12,919,45,17,924],
- [M,49,16,985,49,28,997],
- [M,44,13,884,44,29,900],
- [M,42,8,841,42,17,850],
- [M,42,6,839,49,29,998],
- [M,51,25,1047,51,46,1068],
- [M,51,48,1070,51,53,1075],
- [M,51,16,1038,51,65,1087],
- [M,51,25,1047,51,41,1063],
- [M,50,8,1007,50,19,1018],
- [M,50,6,1005,51,66,1088],
- [M,34,4,644,52,7,1096],
- [M,33,53,632,33,59,638],
- [M,34,11,651,34,15,655],
- [M,33,29,608,33,33,612],
- [M,33,42,621,33,48,627],
- [M,33,13,592,53,5,1102],
- [M,32,23,571,32,29,577],
- [M,54,2,1105,54,12,1115],
- [M,32,14,562,32,18,566],
- [M,32,0,548,60,3,1349],
- [M,25,0,425,60,3,1349],
- [M,56,2,1125,56,14,1137],
- [M,56,2,1125,56,9,1132],
- [M,56,13,1136,56,14,1137],
- [M,57,2,1140,58,69,1344],
- [M,57,2,1140,57,136,1274],
- [M,57,4,1142,57,135,1273],
- [M,57,8,1146,57,130,1268],
- [M,57,12,1150,57,125,1263],
- [M,57,16,1154,57,120,1258],
- [M,57,20,1158,57,115,1253],
- [M,57,26,1164,57,110,1248],
- [M,57,32,1170,57,106,1244],
- [M,57,36,1174,57,102,1240],
- [M,57,40,1178,57,98,1236],
- [M,57,46,1184,57,94,1232],
- [M,57,50,1188,57,90,1228],
- [M,57,56,1194,57,86,1224],
- [M,57,60,1198,57,82,1220],
- [M,57,64,1202,57,78,1216],
- [M,58,7,1282,58,69,1344],
- [M,58,40,1315,58,68,1343],
- [M,58,8,1283,58,35,1310]];
- var $type$Number1 = NAMESPACE.get("$type$Number");
- var num$modulo2 = NAMESPACE.get("num-modulo");
- var equal$always3 = NAMESPACE.get("equal-always");
- var _minus4 = NAMESPACE.get("_minus");
- var _plus5 = NAMESPACE.get("_plus");
- var nothing6 = NAMESPACE.get("nothing");
- var builtins7 = NAMESPACE.get("builtins");
- return R.loadModulesNew(NAMESPACE,[$arrays20,$error21,$lists22,$option23,$sets24],function($arrays20,$error21,$lists22,$option23,$sets24) {
- var arrays9 = R.getField($arrays20,"values");
- var error10 = R.getField($error21,"values");
- var lists11 = R.getField($lists22,"values");
- var option12 = R.getField($option23,"values");
- var sets13 = R.getField($sets24,"values");
- var arrays14 = R.getField($arrays20,"types");
- var error15 = R.getField($error21,"types");
- var lists16 = R.getField($lists22,"types");
- var option17 = R.getField($option23,"types");
- var sets18 = R.getField($sets24,"types");
- NAMESPACE = R.addModuleToNamespace(NAMESPACE,["array-to-list-now","array-length","array-get-now","array-set-now","array-of","is-array","array-from-list","build-array","array"],["Array"],$arrays20);
- NAMESPACE = R.addModuleToNamespace(NAMESPACE,[],[],$error21);
- NAMESPACE = R.addModuleToNamespace(NAMESPACE,["index","fold4","fold3","fold2","fold","each4_n","each3_n","each2_n","each_n","each4","each3","each2","each","map4_n","map3_n","map2_n","map_n","map4","map3","map2","map","find","any","split-at","partition","filter","repeat","range-by","range","link","empty","is-link","is-empty","is-List","list"],["List"],$lists22);
- NAMESPACE = R.addModuleToNamespace(NAMESPACE,["some","none","is-some","is-none","is-Option","Option"],["Option"],$option23);
- NAMESPACE = R.addModuleToNamespace(NAMESPACE,["list-to-tree-set","list-to-list-set","list-to-set","empty-tree-set","empty-list-set","empty-set","list-set","tree-set","set"],["Set"],$sets24);
- var list8 = NAMESPACE.get("list");
- var $toplevel26 = function($$resumer30) {
- var $step25 = 0;
- var $ans28 = D;
- var $al29 = L[45];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step25 = $$resumer30.step;
- $al29 = $$resumer30.from;
- $ans28 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- provides226 = $$resumer30.vars[0];
- anf_method_obj220 = $$resumer30.vars[1];
- result$after$checks1227 = $$resumer30.vars[2];
- f150 = $$resumer30.vars[3];
- three92 = $$resumer30.vars[4];
- is$three90 = $$resumer30.vars[5];
- two88 = $$resumer30.vars[6];
- is$two86 = $$resumer30.vars[7];
- one84 = $$resumer30.vars[8];
- is$one82 = $$resumer30.vars[9];
- zero80 = $$resumer30.vars[10];
- is$zero78 = $$resumer30.vars[11];
- is$Test76 = $$resumer30.vars[12];
- Test74 = $$resumer30.vars[13];
- Test47 = $$resumer30.vars[14];
- }
- while(true) {
- switch($step25) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- var TestT31 = R.namedBrander("Test");
- var Test47 = R.makeBranderAnn(TestT31,"Test");
- var Test72 = {"$var":D};
- var Test74 = {"$var":D};
- var is$Test76 = {"$var":D};
- var is$zero78 = {"$var":D};
- var zero80 = {"$var":D};
- var is$one82 = {"$var":D};
- var one84 = {"$var":D};
- var is$two86 = {"$var":D};
- var two88 = {"$var":D};
- var is$three90 = {"$var":D};
- var three92 = {"$var":D};
- var f150 = {"$var":D};
- var $zero_getfields37 = function(f) {
- return f();
- };
- var $zero_getfieldsref35 = function(f) {
- return f();
- };
- var $zero_mutablemask36 = [];
- var $zero$base32 = {"_match":R.makeMatch("zero",0)};
- var $zero$brands34 = {"$brand$zero":true};
- $zero$brands34[TestT31._brand] = true;
- var $one_getfields44 = function(f) {
- return f(this.dict["e"],this.dict["n"]);
- };
- var $one_getfieldsref42 = function(f,refmask) {
- return f(R.derefField(this.dict["e"],false,refmask[0]),R.derefField(this.dict["n"],false,refmask[1]));
- };
- var $one_mutablemask43 = [false,false];
- var $one$base39 = {"$fieldNames":["e","n"],
- "_match":R.makeMatch("one",2)};
- var $one$brands41 = {"$brand$one":true};
- $one$brands41[TestT31._brand] = true;
- var one46 = R.makeVariantConstructor(L[4],function() {
- return [Test47,$type$Number1];
- },["e48","n49"],[L[2],L[3]],[false,false],["e48","n49"],$one_mutablemask43,$one$base39,$one$brands41,"one",$one_getfieldsref42,$one_getfields44,$one$base39);
- var $two_getfields55 = function(f) {
- return f(this.dict["e"],this.dict["n"]);
- };
- var $two_getfieldsref53 = function(f,refmask) {
- return f(R.derefField(this.dict["e"],false,refmask[0]),R.derefField(this.dict["n"],false,refmask[1]));
- };
- var $two_mutablemask54 = [false,false];
- var $two$base50 = {"$fieldNames":["e","n"],
- "_match":R.makeMatch("two",2)};
- var $two$brands52 = {"$brand$two":true};
- $two$brands52[TestT31._brand] = true;
- var two57 = R.makeVariantConstructor(L[8],function() {
- return [Test47,$type$Number1];
- },["e58","n59"],[L[6],L[7]],[false,false],["e58","n59"],$two_mutablemask54,$two$base50,$two$brands52,"two",$two_getfieldsref53,$two_getfields55,$two$base50);
- var $three_getfields65 = function(f) {
- return f(this.dict["e"],this.dict["n"]);
- };
- var $three_getfieldsref63 = function(f,refmask) {
- return f(R.derefField(this.dict["e"],false,refmask[0]),R.derefField(this.dict["n"],false,refmask[1]));
- };
- var $three_mutablemask64 = [false,false];
- var $three$base60 = {"$fieldNames":["e","n"],
- "_match":R.makeMatch("three",2)};
- var $three$brands62 = {"$brand$three":true};
- $three$brands62[TestT31._brand] = true;
- var three67 = R.makeVariantConstructor(L[12],function() {
- return [Test47,$type$Number1];
- },["e68","n69"],[L[10],L[11]],[false,false],["e68","n69"],$three_mutablemask64,$three$base60,$three$brands62,"three",$three_getfieldsref63,$three_getfields65,$three$base60);
- var anf_assign71 = R.makeObject({"Test":R.makeFunction(function($val70) {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[13],1,$t);
- }
- return R.makeBoolean(R.hasBrand($val70,TestT31._brand));
- }),
- "is-zero":R.makeFunction(function($val38) {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[0],1,$t);
- }
- return R.makeBoolean(R.hasBrand($val38,"$brand$zero"));
- }),
- "zero":R.makeDataValue($zero$base32,$zero$brands34,"zero",$zero_getfieldsref35,$zero_getfields37,-1,$zero_mutablemask36,$zero$base32),
- "is-one":R.makeFunction(function($val45) {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[1],1,$t);
- }
- return R.makeBoolean(R.hasBrand($val45,"$brand$one"));
- }),
- "one":one46,
- "is-two":R.makeFunction(function($val56) {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[5],1,$t);
- }
- return R.makeBoolean(R.hasBrand($val56,"$brand$two"));
- }),
- "two":two57,
- "is-three":R.makeFunction(function($val66) {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[9],1,$t);
- }
- return R.makeBoolean(R.hasBrand($val66,"$brand$three"));
- }),
- "three":three67});
- Test72.$var = anf_assign71;
- var anf_assign73 = G(Test72.$var,"Test",L[13]);
- Test74.$var = anf_assign73;
- var anf_assign75 = G(Test72.$var,"Test",L[13]);
- is$Test76.$var = anf_assign75;
- var anf_assign77 = G(Test72.$var,"is-zero",L[0]);
- is$zero78.$var = anf_assign77;
- var anf_assign79 = G(Test72.$var,"zero",L[0]);
- zero80.$var = anf_assign79;
- var anf_assign81 = G(Test72.$var,"is-one",L[1]);
- is$one82.$var = anf_assign81;
- var anf_assign83 = G(Test72.$var,"one",L[1]);
- one84.$var = anf_assign83;
- var anf_assign85 = G(Test72.$var,"is-two",L[5]);
- is$two86.$var = anf_assign85;
- var anf_assign87 = G(Test72.$var,"two",L[5]);
- two88.$var = anf_assign87;
- var anf_assign89 = G(Test72.$var,"is-three",L[9]);
- is$three90.$var = anf_assign89;
- var anf_assign91 = G(Test72.$var,"three",L[9]);
- three92.$var = anf_assign91;
- var $temp_lam94 = function($t95) {
- var $step93 = 0;
- var $ans96 = D;
- var $al97 = L[44];
- try {
- if(R.isActivationRecord($t95)) {
- $step93 = $t95.step;
- $al97 = $t95.from;
- $ans96 = $t95.ans;
- t95 = $t95.args[0];
- ann_check_temp147 = $t95.vars[0];
- } else {
- var $l = arguments.length;
- if($l !== 1) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[44],1,$t);
- }
- var t95 = $t95;
- }
- while(true) {
- switch($step93) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step93 = 1;
- $al97 = L[43];
- R._checkAnn(L[43],Test47,t95);
- break;
- case 1: var help110 = {"$var":D};
- var $temp_lam99 = function($t100,$acc101) {
- var $step98 = 0;
- var $ans102 = D;
- var $al103 = L[40];
- try {
- if(R.isActivationRecord($t100)) {
- $step98 = $t100.step;
- $al103 = $t100.from;
- $ans102 = $t100.ans;
- t100 = $t100.args[0];
- acc101 = $t100.args[1];
- ann_check_temp144 = $t100.vars[0];
- cases104 = $t100.vars[1];
- } else {
- var $l = arguments.length;
- if($l !== 2) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[40],2,$t);
- }
- var t100 = $t100;
- var acc101 = $acc101;
- }
- while(true) {
- switch($step98) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step98 = 1;
- $al103 = L[38];
- R._checkAnn(L[38],Test47,t100);
- break;
- case 1: $step98 = 2;
- $al103 = L[39];
- R._checkAnn(L[39],$type$Number1,acc101);
- break;
- case 2: var cases104 = t100;
- $step98 = 3;
- $al103 = L[37];
- R._checkAnn(L[37],Test47,cases104);
- break;
- case 3: var $cases_dispatch143 = {"zero":4,
- "one":5,
- "two":6,
- "three":7};
- $al103 = L[35];
- $step98 = $cases_dispatch143[cases104.$name] || 8;
- break;
- case 4: if(cases104.$arity !== -1) {
- R.ffi.throwCasesSingletonErrorC(L[14],false);
- }
- $step98 = 9;
- $ans102 = acc101;
- break;
- case 5: if(cases104.$arity >= 0) {
- if(2 !== cases104.$arity) {
- R.ffi.throwCasesArityErrorC(L[21],2,cases104.$arity);
- }
- } else {
- R.ffi.throwCasesSingletonErrorC(L[21],true);
- }
- $step98 = 9;
- $al103 = L[22];
- var $temp_branch114 = function($e111,$n105) {
- var $step115 = 0;
- var $ans116 = D;
- var $al117 = L[20];
- try {
- if(R.isActivationRecord($e111)) {
- $step115 = $e111.step;
- $al117 = $e111.from;
- $ans116 = $e111.ans;
- e111 = $e111.args[0];
- n105 = $e111.args[1];
- to$add108 = $e111.vars[0];
- } else {
- var e111 = $e111;
- var n105 = $n105;
- }
- while(true) {
- switch($step115) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- var to$add108 = {"$var":n105};
- $step115 = 1;
- $al117 = L[19];
- if(!(R.isFunction(num$modulo2))) {
- R.ffi.throwNonFunApp($al117,num$modulo2);
- }
- $ans116 = num$modulo2.app(n105,(2));
- break;
- case 1: var anf_arg106 = $ans116;
- $step115 = 2;
- $al117 = L[18];
- if(!(R.isFunction(equal$always3))) {
- R.ffi.throwNonFunApp($al117,equal$always3);
- }
- $ans116 = equal$always3.app(anf_arg106,(0));
- break;
- case 2: var anf_arg107 = $ans116;
- $al117 = L[15];
- var anf_if113 = R.checkWrapBoolean(anf_arg107);
- if(R.isPyretTrue(anf_if113)) {
- $step115 = 3;
- } else {
- $step115 = 5;
- }
- break;
- case 3: $step115 = 4;
- $al117 = L[16];
- if(!(R.isFunction(_minus4))) {
- R.ffi.throwNonFunApp($al117,_minus4);
- }
- $ans116 = _minus4.app((0),to$add108.$var);
- break;
- case 4: var anf_assign109 = $ans116;
- to$add108.$var = anf_assign109;
- $step115 = 6;
- $ans116 = nothing6;
- break;
- case 5: $step115 = 6;
- $ans116 = nothing6;
- break;
- case 6: $step115 = 7;
- $al117 = L[17];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al117,_plus5);
- }
- $ans116 = _plus5.app(acc101,to$add108.$var);
- break;
- case 7: var anf_arg112 = $ans116;
- $step115 = 0;
- e111 = e111;
- n105 = anf_arg112;
- continue;
- case 8: ++R.GAS;
- return $ans116;
- default: throw "No case numbered " + $step115 + " in $temp_branch114";
- }
- }
- } catch($e118) {
- if(R.isCont($e118) && ($step115 !== 8)) {
- $e118.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al117,$temp_branch114,$step115,[e111,n105],[to$add108]);
- }
- if(R.isPyretException($e118)) {
- $e118.pyretStack.push($al117);
- }
- throw $e118;
- }
- };
- $ans102 = cases104.$app_fields($temp_branch114,[false,false]);
- break;
- case 6: if(cases104.$arity >= 0) {
- if(2 !== cases104.$arity) {
- R.ffi.throwCasesArityErrorC(L[27],2,cases104.$arity);
- }
- } else {
- R.ffi.throwCasesSingletonErrorC(L[27],true);
- }
- $step98 = 9;
- $al103 = L[28];
- var $temp_branch126 = function($e123,$n119) {
- var $step127 = 0;
- var $ans128 = D;
- var $al129 = L[26];
- try {
- if(R.isActivationRecord($e123)) {
- $step127 = $e123.step;
- $al129 = $e123.from;
- $ans128 = $e123.ans;
- e123 = $e123.args[0];
- n119 = $e123.args[1];
- } else {
- var e123 = $e123;
- var n119 = $n119;
- }
- while(true) {
- switch($step127) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step127 = 1;
- $al129 = L[26];
- if(!(R.isFunction(num$modulo2))) {
- R.ffi.throwNonFunApp($al129,num$modulo2);
- }
- $ans128 = num$modulo2.app(n119,(2));
- break;
- case 1: var anf_arg120 = $ans128;
- $step127 = 2;
- $al129 = L[23];
- if(!(R.isFunction(equal$always3))) {
- R.ffi.throwNonFunApp($al129,equal$always3);
- }
- $ans128 = equal$always3.app(anf_arg120,(0));
- break;
- case 2: var anf_arg121 = $ans128;
- $al129 = L[23];
- var anf_if125 = R.checkWrapBoolean(anf_arg121);
- if(R.isPyretTrue(anf_if125)) {
- $step127 = 3;
- } else {
- $step127 = 4;
- }
- break;
- case 3: $step127 = 5;
- $al129 = L[24];
- if(!(R.isFunction(_minus4))) {
- R.ffi.throwNonFunApp($al129,_minus4);
- }
- $ans128 = _minus4.app((0),n119);
- break;
- case 4: $step127 = 5;
- $ans128 = n119;
- break;
- case 5: var to$add122 = $ans128;
- $step127 = 6;
- $al129 = L[25];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al129,_plus5);
- }
- $ans128 = _plus5.app(acc101,to$add122);
- break;
- case 6: var anf_arg124 = $ans128;
- $step127 = 0;
- e123 = e123;
- n119 = anf_arg124;
- continue;
- case 7: ++R.GAS;
- return $ans128;
- default: throw "No case numbered " + $step127 + " in $temp_branch126";
- }
- }
- } catch($e130) {
- if(R.isCont($e130) && ($step127 !== 7)) {
- $e130.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al129,$temp_branch126,$step127,[e123,n119],[]);
- }
- if(R.isPyretException($e130)) {
- $e130.pyretStack.push($al129);
- }
- throw $e130;
- }
- };
- $ans102 = cases104.$app_fields($temp_branch126,[false,false]);
- break;
- case 7: if(cases104.$arity >= 0) {
- if(2 !== cases104.$arity) {
- R.ffi.throwCasesArityErrorC(L[33],2,cases104.$arity);
- }
- } else {
- R.ffi.throwCasesSingletonErrorC(L[33],true);
- }
- $step98 = 9;
- $al103 = L[34];
- var $temp_branch138 = function($e135,$n131) {
- var $step139 = 0;
- var $ans140 = D;
- var $al141 = L[32];
- try {
- if(R.isActivationRecord($e135)) {
- $step139 = $e135.step;
- $al141 = $e135.from;
- $ans140 = $e135.ans;
- e135 = $e135.args[0];
- n131 = $e135.args[1];
- } else {
- var e135 = $e135;
- var n131 = $n131;
- }
- while(true) {
- switch($step139) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step139 = 1;
- $al141 = L[32];
- if(!(R.isFunction(num$modulo2))) {
- R.ffi.throwNonFunApp($al141,num$modulo2);
- }
- $ans140 = num$modulo2.app(n131,(2));
- break;
- case 1: var anf_arg132 = $ans140;
- $step139 = 2;
- $al141 = L[29];
- if(!(R.isFunction(equal$always3))) {
- R.ffi.throwNonFunApp($al141,equal$always3);
- }
- $ans140 = equal$always3.app(anf_arg132,(0));
- break;
- case 2: var anf_arg133 = $ans140;
- $al141 = L[29];
- var anf_if137 = R.checkWrapBoolean(anf_arg133);
- if(R.isPyretTrue(anf_if137)) {
- $step139 = 3;
- } else {
- $step139 = 4;
- }
- break;
- case 3: $step139 = 5;
- $al141 = L[30];
- if(!(R.isFunction(_minus4))) {
- R.ffi.throwNonFunApp($al141,_minus4);
- }
- $ans140 = _minus4.app((0),n131);
- break;
- case 4: $step139 = 5;
- $ans140 = n131;
- break;
- case 5: var anf_arg134 = $ans140;
- $step139 = 6;
- $al141 = L[31];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al141,_plus5);
- }
- $ans140 = _plus5.app(acc101,anf_arg134);
- break;
- case 6: var anf_arg136 = $ans140;
- $step139 = 0;
- e135 = e135;
- n131 = anf_arg136;
- continue;
- case 7: ++R.GAS;
- return $ans140;
- default: throw "No case numbered " + $step139 + " in $temp_branch138";
- }
- }
- } catch($e142) {
- if(R.isCont($e142) && ($step139 !== 7)) {
- $e142.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al141,$temp_branch138,$step139,[e135,n131],[]);
- }
- if(R.isPyretException($e142)) {
- $e142.pyretStack.push($al141);
- }
- throw $e142;
- }
- };
- $ans102 = cases104.$app_fields($temp_branch138,[false,false]);
- break;
- case 8: $step98 = 9;
- $al103 = L[35];
- $ans102 = R.throwNoCasesMatched(L[35],cases104);
- break;
- case 9: var ann_check_temp144 = $ans102;
- $step98 = 10;
- $al103 = L[36];
- R._checkAnn(L[36],$type$Number1,ann_check_temp144);
- break;
- case 10: $step98 = 11;
- $ans102 = ann_check_temp144;
- break;
- case 11: ++R.GAS;
- return $ans102;
- default: throw "No case numbered " + $step98 + " in $temp_lam99";
- }
- }
- } catch($e145) {
- if(R.isCont($e145) && ($step98 !== 11)) {
- $e145.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al103,$temp_lam99,$step98,[t100,acc101],[ann_check_temp144,cases104]);
- }
- if(R.isPyretException($e145)) {
- $e145.pyretStack.push($al103);
- }
- throw $e145;
- }
- };
- var anf_assign146 = R.makeFunction($temp_lam99);
- help110.$var = anf_assign146;
- $step93 = 2;
- $al97 = L[42];
- if(!(R.isFunction(help110.$var))) {
- R.ffi.throwNonFunApp($al97,help110.$var);
- }
- $ans96 = help110.$var.app(t95,(0));
- break;
- case 2: var ann_check_temp147 = $ans96;
- $step93 = 3;
- $al97 = L[41];
- R._checkAnn(L[41],$type$Number1,ann_check_temp147);
- break;
- case 3: $step93 = 4;
- $ans96 = ann_check_temp147;
- break;
- case 4: ++R.GAS;
- return $ans96;
- default: throw "No case numbered " + $step93 + " in $temp_lam94";
- }
- }
- } catch($e148) {
- if(R.isCont($e148) && ($step93 !== 4)) {
- $e148.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al97,$temp_lam94,$step93,[t95],[ann_check_temp147]);
- }
- if(R.isPyretException($e148)) {
- $e148.pyretStack.push($al97);
- }
- throw $e148;
- }
- };
- var anf_assign149 = R.makeFunction($temp_lam94);
- f150.$var = anf_assign149;
- var result$after$checks1227 = nothing6;
- $step25 = 1;
- $al29 = L[45];
- $field151 = R.getColonFieldLoc(builtins7,"current-checker",L[45]);
- if(R.isMethod($field151)) {
- $ans28 = $field151.full_meth(builtins7);
- } else {
- if(!(R.isFunction($field151))) {
- R.ffi.throwNonFunApp(L[45],$field151);
- }
- $ans28 = $field151.app();
- }
- break;
- case 1: var anf_method_obj220 = $ans28;
- var $temp_lam153 = function($$resumer30) {
- var $step152 = 0;
- var $ans154 = D;
- var $al155 = L[44];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step152 = $$resumer30.step;
- $al155 = $$resumer30.from;
- $ans154 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- } else {
- var $l = arguments.length;
- if($l !== 0) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[44],0,$t);
- }
- }
- while(true) {
- switch($step152) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step152 = 1;
- $al155 = L[46];
- $field156 = R.getColonFieldLoc(builtins7,"current-checker",L[46]);
- if(R.isMethod($field156)) {
- $ans154 = $field156.full_meth(builtins7);
- } else {
- if(!(R.isFunction($field156))) {
- R.ffi.throwNonFunApp(L[46],$field156);
- }
- $ans154 = $field156.app();
- }
- break;
- case 1: var anf_method_obj167 = $ans154;
- var $temp_lam158 = function($$resumer30) {
- var $step157 = 0;
- var $ans159 = D;
- var $al160 = L[47];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step157 = $$resumer30.step;
- $al160 = $$resumer30.from;
- $ans159 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- } else {
- var $l = arguments.length;
- if($l !== 0) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[47],0,$t);
- }
- }
- while(true) {
- switch($step157) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step157 = 1;
- $al160 = L[47];
- if(!(R.isFunction(f150.$var))) {
- R.ffi.throwNonFunApp($al160,f150.$var);
- }
- $ans159 = f150.$var.app(zero80.$var);
- break;
- case 1: ++R.GAS;
- return $ans159;
- default: throw "No case numbered " + $step157 + " in $temp_lam158";
- }
- }
- } catch($e161) {
- if(R.isCont($e161) && ($step157 !== 1)) {
- $e161.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al160,$temp_lam158,$step157,[],[]);
- }
- if(R.isPyretException($e161)) {
- $e161.pyretStack.push($al160);
- }
- throw $e161;
- }
- };
- var anf_arg168 = R.makeFunction($temp_lam158);
- var $temp_lam163 = function($$resumer30) {
- var $step162 = 0;
- var $ans164 = D;
- var $al165 = L[48];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step162 = $$resumer30.step;
- $al165 = $$resumer30.from;
- $ans164 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- } else {
- var $l = arguments.length;
- if($l !== 0) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[48],0,$t);
- }
- }
- while(true) {
- switch($step162) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step162 = 1;
- $ans164 = (0);
- break;
- case 1: ++R.GAS;
- return $ans164;
- default: throw "No case numbered " + $step162 + " in $temp_lam163";
- }
- }
- } catch($e166) {
- if(R.isCont($e166) && ($step162 !== 1)) {
- $e166.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al165,$temp_lam163,$step162,[],[]);
- }
- if(R.isPyretException($e166)) {
- $e166.pyretStack.push($al165);
- }
- throw $e166;
- }
- };
- var anf_arg169 = R.makeFunction($temp_lam163);
- $al155 = L[46];
- var anf_arg170 = R.makeSrcloc(L[46]);
- $step152 = 2;
- $al155 = L[46];
- $field171 = R.getColonFieldLoc(anf_method_obj167,"check-is",L[46]);
- if(R.isMethod($field171)) {
- $ans154 = $field171.full_meth(anf_method_obj167,("f(zero) is 0"),anf_arg168,anf_arg169,anf_arg170);
- } else {
- if(!(R.isFunction($field171))) {
- R.ffi.throwNonFunApp(L[46],$field171);
- }
- $ans154 = $field171.app(("f(zero) is 0"),anf_arg168,anf_arg169,anf_arg170);
- }
- break;
- case 2: $step152 = 3;
- $al155 = L[49];
- $field172 = R.getColonFieldLoc(builtins7,"current-checker",L[49]);
- if(R.isMethod($field172)) {
- $ans154 = $field172.full_meth(builtins7);
- } else {
- if(!(R.isFunction($field172))) {
- R.ffi.throwNonFunApp(L[49],$field172);
- }
- $ans154 = $field172.app();
- }
- break;
- case 3: var anf_method_obj209 = $ans154;
- var $temp_lam174 = function($$resumer30) {
- var $step173 = 0;
- var $ans175 = D;
- var $al176 = L[50];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step173 = $$resumer30.step;
- $al176 = $$resumer30.from;
- $ans175 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- } else {
- var $l = arguments.length;
- if($l !== 0) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[50],0,$t);
- }
- }
- while(true) {
- switch($step173) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step173 = 1;
- $al176 = L[64];
- if(!(R.isFunction(three92.$var))) {
- R.ffi.throwNonFunApp($al176,three92.$var);
- }
- $ans175 = three92.$var.app(zero80.$var,(1));
- break;
- case 1: var anf_arg177 = $ans175;
- $step173 = 2;
- $al176 = L[63];
- if(!(R.isFunction(two88.$var))) {
- R.ffi.throwNonFunApp($al176,two88.$var);
- }
- $ans175 = two88.$var.app(anf_arg177,(2));
- break;
- case 2: var anf_arg178 = $ans175;
- $step173 = 3;
- $al176 = L[62];
- if(!(R.isFunction(one84.$var))) {
- R.ffi.throwNonFunApp($al176,one84.$var);
- }
- $ans175 = one84.$var.app(anf_arg178,(3));
- break;
- case 3: var anf_arg179 = $ans175;
- $step173 = 4;
- $al176 = L[61];
- if(!(R.isFunction(three92.$var))) {
- R.ffi.throwNonFunApp($al176,three92.$var);
- }
- $ans175 = three92.$var.app(anf_arg179,(4));
- break;
- case 4: var anf_arg180 = $ans175;
- $step173 = 5;
- $al176 = L[60];
- if(!(R.isFunction(one84.$var))) {
- R.ffi.throwNonFunApp($al176,one84.$var);
- }
- $ans175 = one84.$var.app(anf_arg180,(5));
- break;
- case 5: var anf_arg181 = $ans175;
- $step173 = 6;
- $al176 = L[59];
- if(!(R.isFunction(three92.$var))) {
- R.ffi.throwNonFunApp($al176,three92.$var);
- }
- $ans175 = three92.$var.app(anf_arg181,(6));
- break;
- case 6: var anf_arg182 = $ans175;
- $step173 = 7;
- $al176 = L[58];
- if(!(R.isFunction(two88.$var))) {
- R.ffi.throwNonFunApp($al176,two88.$var);
- }
- $ans175 = two88.$var.app(anf_arg182,(7));
- break;
- case 7: var anf_arg183 = $ans175;
- $step173 = 8;
- $al176 = L[57];
- if(!(R.isFunction(one84.$var))) {
- R.ffi.throwNonFunApp($al176,one84.$var);
- }
- $ans175 = one84.$var.app(anf_arg183,(8));
- break;
- case 8: var anf_arg184 = $ans175;
- $step173 = 9;
- $al176 = L[56];
- if(!(R.isFunction(three92.$var))) {
- R.ffi.throwNonFunApp($al176,three92.$var);
- }
- $ans175 = three92.$var.app(anf_arg184,(9));
- break;
- case 9: var anf_arg185 = $ans175;
- $step173 = 10;
- $al176 = L[55];
- if(!(R.isFunction(three92.$var))) {
- R.ffi.throwNonFunApp($al176,three92.$var);
- }
- $ans175 = three92.$var.app(anf_arg185,(10));
- break;
- case 10: var anf_arg186 = $ans175;
- $step173 = 11;
- $al176 = L[54];
- if(!(R.isFunction(two88.$var))) {
- R.ffi.throwNonFunApp($al176,two88.$var);
- }
- $ans175 = two88.$var.app(anf_arg186,(11));
- break;
- case 11: var anf_arg187 = $ans175;
- $step173 = 12;
- $al176 = L[53];
- if(!(R.isFunction(one84.$var))) {
- R.ffi.throwNonFunApp($al176,one84.$var);
- }
- $ans175 = one84.$var.app(anf_arg187,(12));
- break;
- case 12: var anf_arg188 = $ans175;
- $step173 = 13;
- $al176 = L[52];
- if(!(R.isFunction(two88.$var))) {
- R.ffi.throwNonFunApp($al176,two88.$var);
- }
- $ans175 = two88.$var.app(anf_arg188,(13));
- break;
- case 13: var anf_arg189 = $ans175;
- $step173 = 14;
- $al176 = L[51];
- if(!(R.isFunction(one84.$var))) {
- R.ffi.throwNonFunApp($al176,one84.$var);
- }
- $ans175 = one84.$var.app(anf_arg189,(14));
- break;
- case 14: var anf_arg190 = $ans175;
- $step173 = 15;
- $al176 = L[50];
- if(!(R.isFunction(f150.$var))) {
- R.ffi.throwNonFunApp($al176,f150.$var);
- }
- $ans175 = f150.$var.app(anf_arg190);
- break;
- case 15: ++R.GAS;
- return $ans175;
- default: throw "No case numbered " + $step173 + " in $temp_lam174";
- }
- }
- } catch($e191) {
- if(R.isCont($e191) && ($step173 !== 15)) {
- $e191.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al176,$temp_lam174,$step173,[],[]);
- }
- if(R.isPyretException($e191)) {
- $e191.pyretStack.push($al176);
- }
- throw $e191;
- }
- };
- var anf_arg210 = R.makeFunction($temp_lam174);
- var $temp_lam193 = function($$resumer30) {
- var $step192 = 0;
- var $ans194 = D;
- var $al195 = L[65];
- try {
- if(R.isActivationRecord($$resumer30)) {
- $step192 = $$resumer30.step;
- $al195 = $$resumer30.from;
- $ans194 = $$resumer30.ans;
- $resumer30 = $$resumer30.args[0];
- anf_arg206 = $$resumer30.vars[0];
- } else {
- var $l = arguments.length;
- if($l !== 0) {
- var $t = new Array($l);
- for(var $i = 0;$i < $l;++$i) {
- $t[$i] = arguments[$i];
- }
- R.checkArityC(L[65],0,$t);
- }
- }
- while(true) {
- switch($step192) {
- case 0: if(--R.GAS <= 0) {
- R.EXN_STACKHEIGHT = 0;
- throw R.makeCont();
- }
- $step192 = 1;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app((1),(3));
- break;
- case 1: var anf_arg196 = $ans194;
- $step192 = 2;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg196,(5));
- break;
- case 2: var anf_arg197 = $ans194;
- $step192 = 3;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg197,(7));
- break;
- case 3: var anf_arg198 = $ans194;
- $step192 = 4;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg198,(9));
- break;
- case 4: var anf_arg199 = $ans194;
- $step192 = 5;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg199,(11));
- break;
- case 5: var anf_arg200 = $ans194;
- $step192 = 6;
- $al195 = L[67];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg200,(13));
- break;
- case 6: var anf_arg206 = $ans194;
- $step192 = 7;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app((2),(4));
- break;
- case 7: var anf_arg201 = $ans194;
- $step192 = 8;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg201,(6));
- break;
- case 8: var anf_arg202 = $ans194;
- $step192 = 9;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg202,(8));
- break;
- case 9: var anf_arg203 = $ans194;
- $step192 = 10;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg203,(10));
- break;
- case 10: var anf_arg204 = $ans194;
- $step192 = 11;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg204,(12));
- break;
- case 11: var anf_arg205 = $ans194;
- $step192 = 12;
- $al195 = L[66];
- if(!(R.isFunction(_plus5))) {
- R.ffi.throwNonFunApp($al195,_plus5);
- }
- $ans194 = _plus5.app(anf_arg205,(14));
- break;
- case 12: var anf_arg207 = $ans194;
- $step192 = 13;
- $al195 = L[65];
- if(!(R.isFunction(_minus4))) {
- R.ffi.throwNonFunApp($al195,_minus4);
- }
- $ans194 = _minus4.app(anf_arg206,anf_arg207);
- break;
- case 13: ++R.GAS;
- return $ans194;
- default: throw "No case numbered " + $step192 + " in $temp_lam193";
- }
- }
- } catch($e208) {
- if(R.isCont($e208) && ($step192 !== 13)) {
- $e208.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al195,$temp_lam193,$step192,[],[anf_arg206]);
- }
- if(R.isPyretException($e208)) {
- $e208.pyretStack.push($al195);
- }
- throw $e208;
- }
- };
- var anf_arg211 = R.makeFunction($temp_lam193);
- $al155 = L[49];
- var anf_arg212 = R.makeSrcloc(L[49]);
- $step152 = 4;
- $al155 = L[49];
- $field213 = R.getColonFieldLoc(anf_method_obj209,"check-is",L[49]);
- if(R.isMethod($field213)) {
- $ans154 = $field213.full_meth(anf_method_obj209,("f(one(two(one(two(three(three(one(two(three(one(three(one(two(three(zero, 1), 2),\n 3),\n 4),\n 5),\n 6),\n 7),\n 8),\n 9),\n 10),\n 11),\n 12),\n 13),\n 14)) is\n (1 + 3 + 5 + 7 + 9 + 11 + 13) - (2 + 4 + 6 + 8 + 10 + 12 + 14)"),anf_arg210,anf_arg211,anf_arg212);
- } else {
- if(!(R.isFunction($field213))) {
- R.ffi.throwNonFunApp(L[49],$field213);
- }
- $ans154 = $field213.app(("f(one(two(one(two(three(three(one(two(three(one(three(one(two(three(zero, 1), 2),\n 3),\n 4),\n 5),\n 6),\n 7),\n 8),\n 9),\n 10),\n 11),\n 12),\n 13),\n 14)) is\n (1 + 3 + 5 + 7 + 9 + 11 + 13) - (2 + 4 + 6 + 8 + 10 + 12 + 14)"),anf_arg210,anf_arg211,anf_arg212);
- }
- break;
- case 4: ++R.GAS;
- return $ans154;
- default: throw "No case numbered " + $step152 + " in $temp_lam153";
- }
- }
- } catch($e214) {
- if(R.isCont($e214) && ($step152 !== 4)) {
- $e214.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al155,$temp_lam153,$step152,[],[]);
- }
- if(R.isPyretException($e214)) {
- $e214.pyretStack.push($al155);
- }
- throw $e214;
- }
- };
- var anf_obj215 = R.makeFunction($temp_lam153);
- $al29 = L[44];
- var anf_obj216 = R.makeSrcloc(L[44]);
- var anf_array_val217 = R.makeObject({"name":("f"),
- "run":anf_obj215,
- "location":anf_obj216});
- var anf_arg218 = [anf_array_val217];
- $step25 = 2;
- $al29 = L[45];
- $field219 = R.getColonFieldLoc(list8,"make",L[45]);
- if(R.isMethod($field219)) {
- $ans28 = $field219.full_meth(list8,anf_arg218);
- } else {
- if(!(R.isFunction($field219))) {
- R.ffi.throwNonFunApp(L[45],$field219);
- }
- $ans28 = $field219.app(anf_arg218);
- }
- break;
- case 2: var anf_arg221 = $ans28;
- $step25 = 3;
- $al29 = L[45];
- $field222 = R.getColonFieldLoc(anf_method_obj220,"run-checks",L[45]);
- if(R.isMethod($field222)) {
- $ans28 = $field222.full_meth(anf_method_obj220,("tests/pyret/tests/test-tail-call.arr"),anf_arg221);
- } else {
- if(!(R.isFunction($field222))) {
- R.ffi.throwNonFunApp(L[45],$field222);
- }
- $ans28 = $field222.app(("tests/pyret/tests/test-tail-call.arr"),anf_arg221);
- }
- break;
- case 3: var provides226 = R.makeObject({});
- $step25 = 4;
- $al29 = L[13];
- $field223 = R.getColonFieldLoc(builtins7,"current-checker",L[13]);
- if(R.isMethod($field223)) {
- $ans28 = $field223.full_meth(builtins7);
- } else {
- if(!(R.isFunction($field223))) {
- R.ffi.throwNonFunApp(L[13],$field223);
- }
- $ans28 = $field223.app();
- }
- break;
- case 4: var anf_method_obj224 = $ans28;
- $step25 = 5;
- $al29 = L[13];
- $field225 = R.getColonFieldLoc(anf_method_obj224,"results",L[13]);
- if(R.isMethod($field225)) {
- $ans28 = $field225.full_meth(anf_method_obj224);
- } else {
- if(!(R.isFunction($field225))) {
- R.ffi.throwNonFunApp(L[13],$field225);
- }
- $ans28 = $field225.app();
- }
- break;
- case 5: var checks228 = $ans28;
- $step25 = 6;
- $ans28 = R.makeObject({"answer":result$after$checks1227,
- "namespace":NAMESPACE,
- "defined-values":{"result-after-checks1":result$after$checks1227,
- "f":f150.$var,
- "zero":zero80.$var,
- "one":one84.$var,
- "two":two88.$var,
- "three":three92.$var,
- "is-three":is$three90.$var,
- "is-two":is$two86.$var,
- "is-one":is$one82.$var,
- "is-zero":is$zero78.$var,
- "is-Test":is$Test76.$var,
- "Test":Test74.$var,
- "sets":sets13,
- "error":error10,
- "option":option12,
- "lists":lists11,
- "arrays":arrays9},
- "defined-types":{"Test":Test47,
- "sets":sets18,
- "error":error15,
- "option":option17,
- "lists":lists16,
- "arrays":arrays14},
- "provide-plus-types":R.makeObject({"values":provides226,
- "types":{}}),
- "checks":checks228});
- break;
- case 6: ++R.GAS;
- return $ans28;
- default: throw "No case numbered " + $step25 + " in $toplevel26";
- }
- }
- } catch($e229) {
- if(R.isCont($e229) && ($step25 !== 6)) {
- $e229.stack[R.EXN_STACKHEIGHT++] = R.makeActivationRecord($al29,$toplevel26,$step25,[],[provides226,anf_method_obj220,result$after$checks1227,f150,three92,is$three90,two88,is$two86,one84,is$one82,zero80,is$zero78,is$Test76,Test74,Test47]);
- }
- if(R.isPyretException($e229)) {
- $e229.pyretStack.push($al29);
- }
- throw $e229;
- }
- };
- return R.safeCall($toplevel26,function(moduleVal) {
- R.modules["$tests/pyret/tests/test$tail$call.arr19"] = moduleVal;
- return moduleVal;
- },"Evaluating $toplevel");
- });
- }
- };
- })
Add Comment
Please, Sign In to add comment