minigrace
Version:
A compiler for the Grace programming language
872 lines • 70.2 kB
JavaScript
let gracecode_minispecBundle_sourceFile = "/Users/black/Development/mg/gracelang/minigrace/modules/minispecBundle.grace";
let gracecode_minispecBundle_sha256 = "837f304b57ddb085ca59ed2543188507134f82054b338add239ef596aa3a32d3";
let gracecode_minispecBundle_minigraceRevision = "b57591d29fc5ee5270d114920bf671367b8c3ecb";
let gracecode_minispecBundle_minigraceGeneration = "5171";
if (typeof gctCache !== "undefined")
gctCache["minispecBundle"] = "dialect:\n standard\nfreshScopes:\n $102 trait\n $103 trait\nmethodTypes:$102:\n describe(name:String)with(block:Procedure0) \u2192 Unknown\n expect(b:Procedure0)notToRaise(undesired:ExceptionKind) \u2192 Unknown\n expect(b:Procedure0)toRaise(desired:Unknown) \u2192 Unknown\n expect(b:Procedure0)toRaise(desired:Unknown)matchedBy(regexStr:Unknown) \u2192 Unknown\n expect(b:Procedure0)toRaise(desired:Unknown)mentioning(err1:Unknown)and(err2:Unknown) \u2192 Unknown\n expect(b:Procedure0)toRaise(desired:Unknown)mentioning(error:Unknown) \u2192 Unknown\n expect(cond:Boolean)orSay(complaint:String) \u2192 Unknown\n expect(n1:Number)toBe(n2:Number)within(epsilon:Number) \u2192 Unknown\n expect(s1:Object)notToBe(s2:Object) \u2192 Unknown\n expect(s1:Object)notToBe(s2:Object)orSay(complaint:Unknown) \u2192 Unknown\n expect(s1:Object)toBe(s2:Object) \u2192 Unknown\n expect(s1:Object)toBe(s2:Object)orSay(complaint:Unknown) \u2192 Unknown\n expect(s:Unknown)notToHaveType(undesired:Type) \u2192 Unknown\n expect(s:Unknown)toHaveType(desired:Type) \u2192 Unknown\n expectType(T:Type)toDescribe(anObject:Unknown) \u2192 Unknown\n expectType(T:Type)toExactlyDescribe(anObject:Unknown) \u2192 Unknown\n numberOfErrorsToRerun \u2192 Number\n numberOfErrorsToRerun:=(n:Number) \u2192 Unknown\n specify(name:String)by(block:Procedure0) \u2192 Unknown\nmodules:\n gUnit\n standard\npath:\n /Users/black/Development/mg/gracelang/minigrace/modules/minispecBundle.grace\nscope:$101:\n asDebugString String (go) $scope_string\n asString String (go) $scope_string\n basicAsString String (go) $scope_string\n isMe(1) Boolean (go) $scope_boolean\n myIdentityHash Number (go) $scope_number\n open Unknown (mth) $102\nscope:$102:\n AssertionFailure Unknown (mth) $scope_done\n MinispecError Unknown (mth) $scope_done\n asDebugString String (go) $scope_string\n asString String (go) $scope_string\n assert(1) Unknown (mth) $scope_done\n assert(1)description(1) Unknown (mth) $scope_done\n assert(1)hasType(1) Unknown (mth) $scope_done\n assert(1)shouldBe(1) Unknown (mth) $scope_done\n assert(1)shouldEqual(1)within(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)matchedBy(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)mentioning(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)mentioning(1)and(1) Unknown (mth) $scope_done\n assert(1)shouldntBe(1) Unknown (mth) $scope_done\n assert(1)shouldntRaise(1) Unknown (mth) $scope_done\n assertType(1)describes(1) Unknown (mth) $scope_done\n assertType(1)exactlyDescribes(1) Unknown (mth) $scope_done\n basicAsString String (go) $scope_string\n countOneAssertion Unknown (mth) $scope_done\n deny(1) Unknown (mth) $scope_done\n deny(1)description(1) Unknown (mth) $scope_done\n deny(1)hasType(1) Unknown (mth) $scope_done\n deny(1)shouldBe(1) Unknown (mth) $scope_done\n describe(1)with(1) Unknown (mth) $scope_done\n doNotRerunErrors Unknown (mth) $scope_done\n doRerunErrors Unknown (mth) $scope_done\n exit Unknown (mth) $scope_done\n expect(1)notToBe(1) Unknown (mth) $scope_done\n expect(1)notToBe(1)orSay(1) Unknown (mth) $scope_done\n expect(1)notToHaveType(1) Unknown (mth) $scope_done\n expect(1)notToRaise(1) Unknown (mth) $scope_done\n expect(1)orSay(1) Unknown (mth) $scope_done\n expect(1)toBe(1) Unknown (mth) $scope_done\n expect(1)toBe(1)orSay(1) Unknown (mth) $scope_done\n expect(1)toBe(1)within(1) Unknown (mth) $scope_done\n expect(1)toHaveType(1) Unknown (mth) $scope_done\n expect(1)toRaise(1) Unknown (mth) $scope_done\n expect(1)toRaise(1)matchedBy(1) Unknown (mth) $scope_done\n expect(1)toRaise(1)mentioning(1) Unknown (mth) $scope_done\n expect(1)toRaise(1)mentioning(1)and(1) Unknown (mth) $scope_done\n expectType(1)toDescribe(1) Unknown (mth) $scope_done\n expectType(1)toExactlyDescribe(1) Unknown (mth) $scope_done\n failAndSay(1) Unknown (mth) $scope_done\n failBecause(1) Unknown (mth) $scope_done\n isMe(1) Boolean (go) $scope_boolean\n methodsIn(1)missingFrom(1) String (mth) $scope_done\n myIdentityHash Number (go) $scope_number\n numberOfErrorsToRerun Number (mth) $scope_done\n numberOfErrorsToRerun:=(1) Unknown (mth) $scope_done\n protocolOf(1)notCoveredBy(1) String (mth) $scope_done\n specify(1)by(1) Unknown (mth) $scope_done\n testCaseNamed(1)setupIn(1)asTestNumber(1) TestCase (mth) $103 confidential\nscope:$103:\n AssertionFailure Unknown (mth) $scope_done\n asDebugString String (go) $scope_string\n asString String (go) $scope_string\n assert(1) Unknown (mth) $scope_done\n assert(1)description(1) Unknown (mth) $scope_done\n assert(1)hasType(1) Unknown (mth) $scope_done\n assert(1)shouldBe(1) Unknown (mth) $scope_done\n assert(1)shouldEqual(1)within(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)matchedBy(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)mentioning(1) Unknown (mth) $scope_done\n assert(1)shouldRaise(1)mentioning(1)and(1) Unknown (mth) $scope_done\n assert(1)shouldntBe(1) Unknown (mth) $scope_done\n assert(1)shouldntRaise(1) Unknown (mth) $scope_done\n assertType(1)describes(1) Unknown (mth) $scope_done\n assertType(1)exactlyDescribes(1) Unknown (mth) $scope_done\n basicAsString String (go) $scope_string\n countOneAssertion Unknown (mth) $scope_done\n currentResult Unknown (var) $scopeEmpty\n currentResult:=(1) Unknown (mth) $scope_done override\n debug(1) Unknown (mth) $scope_done\n debugAndPrintResults Unknown (mth) $scope_done\n deny(1) Unknown (mth) $scope_done\n deny(1)description(1) Unknown (mth) $scope_done\n deny(1)hasType(1) Unknown (mth) $scope_done\n deny(1)shouldBe(1) Unknown (mth) $scope_done\n failBecause(1) Unknown (mth) $scope_done\n guSetup Unknown (mth) $scope_done\n isMe(1) Boolean (go) $scope_boolean\n methodsIn(1)missingFrom(1) String (mth) $scope_done\n myIdentityHash Number (go) $scope_number\n name Unknown (mth) $scope_done\n printBackTrace(1)limitedTo(1) Unknown (mth) $scope_done\n protocolOf(1)notCoveredBy(1) String (mth) $scope_done\n run(1) Unknown (mth) $scope_done\n runAndPrintResults Unknown (mth) $scope_done\n runTest Unknown (mth) $scope_done override\n setup Unknown (mth) $scope_done\n size Unknown (def) $scope_number\n teardown Unknown (mth) $scope_done\nself:\n $101\ntypes:\n";
if (typeof originalSourceLines !== "undefined") {
originalSourceLines["minispecBundle"] = [
"dialect \"standard\"",
"",
"import \"gUnit\" as gu",
"",
"def nullSuite = singleton \"nullSuite\"",
"def nullBlock = singleton \"nullBlock\"",
"",
"var currentTestSuite := nullSuite",
"var currentSetupBlock := nullBlock",
"var currentTestBlock := 0",
"var testNumberToRun := 0",
"var errorsToBeRerun := true",
"var currentResult := object {",
" method countOneAssertion {",
" print \"countOneAssertion requested on dummy result\"",
" }",
"}",
"",
"trait open {",
" use gu.assertion // makes available all the assert ... methods",
"",
" method countOneAssertion {",
" currentResult.countOneAssertion",
" }",
"",
" once method MinispecError {",
" ProgrammingError.refine \"MinispecError\"",
" }",
"",
" method numberOfErrorsToRerun -> Number { gu.numberOfErrorsToRerun }",
" method numberOfErrorsToRerun:=(n:Number) {",
" gu.numberOfErrorsToRerun := n",
" }",
"",
" method expect (cond:Boolean) orSay (complaint:String) {",
" assert(cond) description (complaint)",
" }",
"",
" method expect (s1:Object) toBe (s2:Object) {",
" assert(s1) shouldBe (s2)",
" }",
"",
" method expect (s1:Object) toBe (s2:Object) orSay (complaint) {",
" assert(s1 == s2)",
" description (complaint)",
" }",
"",
" method expect (s1:Object) notToBe (s2:Object) {",
" assert(s1) shouldntBe (s2)",
" }",
"",
" method expect (s1:Object) notToBe (s2:Object) orSay (complaint) {",
" assert(s1 ≠ s2)",
" description (complaint)",
" }",
"",
" method expect (n1:Number) toBe (n2:Number) within (epsilon:Number) {",
" assert(n1) shouldEqual (n2) within (epsilon)",
" }",
"",
" method expect (b:Procedure0) toRaise (desired) {",
" assert(b) shouldRaise (desired)",
" }",
"",
" method expect (b:Procedure0) toRaise (desired) mentioning (error) {",
" assert(b) shouldRaise (desired) mentioning (error)",
" }",
"",
" method expect (b:Procedure0) toRaise (desired) mentioning (err1) and (err2) {",
" assert(b) shouldRaise (desired) mentioning (err1) and (err2)",
" }",
"",
" method expect (b:Procedure0) toRaise (desired) matchedBy (regexStr) {",
" assert(b) shouldRaise (desired) matchedBy (regexStr)",
" }",
"",
" method expect (b:Procedure0) notToRaise (undesired:ExceptionKind) {",
" assert(b) shouldntRaise (undesired)",
" }",
"",
" method expect (s:Unknown) toHaveType (desired:Type) {",
" assert(s) hasType (desired)",
" }",
"",
" method expect (s:Unknown) notToHaveType (undesired:Type) {",
" deny(s) hasType (undesired)",
" }",
"",
" method expectType (T:Type) toDescribe (anObject) {",
" assertType(T) describes (anObject)",
" }",
"",
" method expectType (T:Type) toExactlyDescribe (anObject) {",
" assertType(T) exactlyDescribes (anObject)",
" }",
"",
" method failAndSay (reason) {",
" assert(false) description (reason)",
" }",
"",
" method describe (name:String) with (block:Procedure0) {",
" if (nullSuite ≠ currentTestSuite) then {",
" MinispecError.raise \"`describe` cannot be used inside `describe`\"",
" }",
" currentTestSuite := gu.testSuite.empty",
" currentTestSuite.name := name",
" currentSetupBlock := block",
" testNumberToRun := 0",
" block.apply",
" currentSetupBlock := nullBlock",
" currentTestSuite.runAndPrintResults",
" currentTestSuite := nullSuite",
" currentTestBlock := 0",
" }",
"",
" method doNotRerunErrors { errorsToBeRerun := false }",
" method doRerunErrors { errorsToBeRerun := true }",
"",
" method exit { gu.exit }",
"",
" method specify (name:String) by (block:Procedure0) {",
" if (nullSuite == currentTestSuite) then {",
" MinispecError.raise \"a `specify` can be created only within a `describe`\"",
" }",
" testNumberToRun := testNumberToRun + 1",
" if (nullBlock ≠ currentSetupBlock) then {",
" currentTestSuite.add(testCaseNamed(name)",
" setupIn(currentSetupBlock)",
" asTestNumber(testNumberToRun))",
" } elseif { testNumberToRun == currentTestBlock } then {",
" block.apply",
" }",
" }",
"",
" class testCaseNamed(name') setupIn(setupBlock) asTestNumber(number) -> gu.TestCase",
" is confidential {",
" inherit gu.testCaseNamed(name') alias guSetup = setup",
"",
" method setup {",
" guSetup",
" currentTestBlock := number",
" testNumberToRun := 0",
" setupBlock.apply",
" }",
"",
" method teardown {",
" currentTestBlock := 0",
" }",
"",
" method currentResult:= (r) is override {",
" outer.outer.currentResult := r",
" }",
"",
" method runTest is override {",
" // for minispec, the test is run in setup",
" }",
" }",
"}" ];
}
function gracecode_minispecBundle() {
importedModules["minispecBundle"] = this;
const var_$module = this;
this.definitionModule = "minispecBundle";
this.definitionLine = 1;
setLineNumber(1); // compilenode dialect
// Dialect "standard"
const var_$dialect = do_import("standard", gracecode_standard);
this.outer = var_$dialect;
setLineNumber(3); // compilenode import
// Import of "gUnit" as gu
if (typeof gracecode_gUnit == "undefined")
throw new GraceExceptionPacket(EnvironmentExceptionObject,
new GraceString("could not find module gUnit"));
var var_gu = do_import("gUnit", gracecode_gUnit);
var func0 = function(argcv) { // accessor method gu, line 3
const numArgs = arguments.length - 1;
if (numArgs > 0) raiseTypeArgError("gu", 0, numArgs - 0);
return var_gu;
}; // end of method gu
this.methods["gu"] = func0;
func0.methodName = "gu";
func0.paramCounts = [0];
func0.paramNames = [];
func0.definitionLine = 3;
func0.definitionModule = "minispecBundle";
func0.debug = "import";
func0.confidential = true;
this.closureKeys = this.closureKeys || [];
this.closureKeys.push("outer_minispecBundle_1");
this.outer_minispecBundle_1 = var_$dialect;
var func1 = function(argcv) { // method open, line 19
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("open", 0, numArgs - 0);
}
var ouc = emptyGraceObject("open", "minispecBundle", 19);
var ouc_init = this.methods["open$build(3)"].call(this, null, ouc, [], []);
ouc_init.call(ouc);
return ouc;
}; // end of method open
this.methods["open"] = func1;
func1.methodName = "open";
func1.paramCounts = [0];
func1.paramNames = [];
func1.definitionLine = 19;
func1.definitionModule = "minispecBundle";
var func2 = function(argcv, inheritingObject, aliases, exclusions) { // method open$build(_,_,_), line 19
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 4;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("open", 0, numArgs - 0);
}
var obj3_build = function(ignore, outerObj, aliases, exclusions) {
this.closureKeys = this.closureKeys || [];
this.closureKeys.push("outer_minispecBundle_19");
this.outer_minispecBundle_19 = outerObj;
const inheritedExclusions = { };
for (var eix = 0, eLen = exclusions.length; eix < eLen; eix ++) {
const exMeth = exclusions[eix];
inheritedExclusions[exMeth] = this.methods[exMeth]; };
setLineNumber(20); // reuse call
var initFun4 = request(var_gu, "assertion$build(3)", [null], this, [], []); // compileReuseCall
var func5 = function(argcv) { // method countOneAssertion, line 22
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("countOneAssertion", 0, numArgs - 0);
}
setLineNumber(23); // compilenode member
// call case 4: other requests
if (var_currentResult === undefined) raiseUninitializedVariable("currentResult");
var call6 = request(var_currentResult, "countOneAssertion", [0]);
return call6;
}; // end of method countOneAssertion
this.methods["countOneAssertion"] = func5;
func5.methodName = "countOneAssertion";
func5.paramCounts = [0];
func5.paramNames = [];
func5.definitionLine = 22;
func5.definitionModule = "minispecBundle";
var func7 = function(argcv) { // method MinispecError, line 26
var returnTarget = invocationCount;
invocationCount++;
setLineNumber(27); // compilenode string
var string9 = new GraceString("MinispecError");
// call case 4: other requests
var call10 = selfRequest(var_$dialect, "ProgrammingError", [0]);
var call8 = request(call10, "refine(1)", [1], string9);
return call8;
}; // end of method MinispecError
function memofunc7(argcv) {
if (! this.data["memo$MinispecError"]) // parameterless memo function
this.data["memo$MinispecError"] = func7.call(this, argcv);
return this.data["memo$MinispecError"];
};
this.methods["MinispecError"] = memofunc7;
memofunc7.methodName = "MinispecError";
memofunc7.paramCounts = [0];
memofunc7.paramNames = [];
memofunc7.definitionLine = 26;
memofunc7.definitionModule = "minispecBundle";
func7.methodName = "MinispecError";
func7.paramCounts = [0];
func7.paramNames = [];
func7.definitionLine = 26;
func7.definitionModule = "minispecBundle";
var func11 = function(argcv) { // method numberOfErrorsToRerun, line 30
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("numberOfErrorsToRerun", 0, numArgs - 0);
}
setLineNumber(30); // compilenode member
// call case 4: other requests
var call12 = request(var_gu, "numberOfErrorsToRerun", [0]);
var call13 = selfRequest(var_$dialect, "Number", [0]);
assertTypeOrMsg(call12, call13, "result of method numberOfErrorsToRerun", "Number");
return call12;
}; // end of method numberOfErrorsToRerun
var call14 = selfRequest(var_$dialect, "Number", [0]);
func11.returnType = call14;
this.methods["numberOfErrorsToRerun"] = func11;
func11.methodName = "numberOfErrorsToRerun";
func11.paramCounts = [0];
func11.paramNames = [];
func11.definitionLine = 30;
func11.definitionModule = "minispecBundle";
var func15 = function(argcv, var_n) { // method numberOfErrorsToRerun:=(_), line 31
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 1) && (numArgs !== 1)) {
raiseTypeArgError("numberOfErrorsToRerun:=(_)", 0, numArgs - 1);
}
setLineNumber(31); // compilenode member
var call16 = selfRequest(var_$dialect, "Number", [0]);
assertTypeOrMsg(var_n, call16, "argument to request of `numberOfErrorsToRerun:=(_)`", "Number");
setLineNumber(32); // compilenode call
// call case 4: other requests
var call17 = request(var_gu, "numberOfErrorsToRerun:=(1)", [1], var_n);
return call17;
}; // end of method numberOfErrorsToRerun:=(_)
setLineNumber(31); // compilenode member
var call18 = selfRequest(var_$dialect, "Number", [0]);
func15.paramTypes = [call18];
this.methods["numberOfErrorsToRerun:=(1)"] = func15;
func15.methodName = "numberOfErrorsToRerun:=(1)";
func15.paramCounts = [1];
func15.paramNames = ["n"];
func15.definitionLine = 31;
func15.definitionModule = "minispecBundle";
var func19 = function(argcv, var_cond, var_complaint) { // method expect(_)orSay(_), line 35
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)orSay(_)", 0, numArgs - 2);
}
setLineNumber(35); // compilenode member
var call20 = selfRequest(var_$dialect, "Boolean", [0]);
assertTypeOrMsg(var_cond, call20, "argument 1 in request of `expect(_)orSay(_)`", "Boolean");
var call21 = selfRequest(var_$dialect, "String", [0]);
assertTypeOrMsg(var_complaint, call21, "argument 2 in request of `expect(_)orSay(_)`", "String");
setLineNumber(36); // compilenode call
var call22 = selfRequest(this, "assert(1)description(1)", [1, 1], var_cond, var_complaint);
return call22;
}; // end of method expect(_)orSay(_)
setLineNumber(35); // compilenode member
var call23 = selfRequest(var_$dialect, "Boolean", [0]);
var call24 = selfRequest(var_$dialect, "String", [0]);
func19.paramTypes = [call23, call24];
this.methods["expect(1)orSay(1)"] = func19;
func19.methodName = "expect(1)orSay(1)";
func19.paramCounts = [1, 1];
func19.paramNames = ["cond", "complaint"];
func19.definitionLine = 35;
func19.definitionModule = "minispecBundle";
var func25 = function(argcv, var_s1, var_s2) { // method expect(_)toBe(_), line 39
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)toBe(_)", 0, numArgs - 2);
}
setLineNumber(39); // compilenode member
var call26 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s1, call26, "argument 1 in request of `expect(_)toBe(_)`", "Object");
var call27 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s2, call27, "argument 2 in request of `expect(_)toBe(_)`", "Object");
setLineNumber(40); // compilenode call
var call28 = selfRequest(this, "assert(1)shouldBe(1)", [1, 1], var_s1, var_s2);
return call28;
}; // end of method expect(_)toBe(_)
setLineNumber(39); // compilenode member
var call29 = selfRequest(var_$dialect, "Object", [0]);
var call30 = selfRequest(var_$dialect, "Object", [0]);
func25.paramTypes = [call29, call30];
this.methods["expect(1)toBe(1)"] = func25;
func25.methodName = "expect(1)toBe(1)";
func25.paramCounts = [1, 1];
func25.paramNames = ["s1", "s2"];
func25.definitionLine = 39;
func25.definitionModule = "minispecBundle";
var func31 = function(argcv, var_s1, var_s2, var_complaint) { // method expect(_)toBe(_)orSay(_), line 43
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 3) && (numArgs !== 3)) {
raiseTypeArgError("expect(_)toBe(_)orSay(_)", 0, numArgs - 3);
}
setLineNumber(43); // compilenode member
var call32 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s1, call32, "argument 1 in request of `expect(_)toBe(_)orSay(_)`", "Object");
var call33 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s2, call33, "argument 2 in request of `expect(_)toBe(_)orSay(_)`", "Object");
setLineNumber(44); // compilenode op
// call case 4: other requests
var term35 = request(var_s1, "==(1)", [1], var_s2);
var call34 = selfRequest(this, "assert(1)description(1)", [1, 1], term35, var_complaint);
return call34;
}; // end of method expect(_)toBe(_)orSay(_)
setLineNumber(43); // compilenode member
var call36 = selfRequest(var_$dialect, "Object", [0]);
var call37 = selfRequest(var_$dialect, "Object", [0]);
func31.paramTypes = [call36, call37, type_Unknown];
this.methods["expect(1)toBe(1)orSay(1)"] = func31;
func31.methodName = "expect(1)toBe(1)orSay(1)";
func31.paramCounts = [1, 1, 1];
func31.paramNames = ["s1", "s2", "complaint"];
func31.definitionLine = 43;
func31.definitionModule = "minispecBundle";
var func38 = function(argcv, var_s1, var_s2) { // method expect(_)notToBe(_), line 48
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)notToBe(_)", 0, numArgs - 2);
}
setLineNumber(48); // compilenode member
var call39 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s1, call39, "argument 1 in request of `expect(_)notToBe(_)`", "Object");
var call40 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s2, call40, "argument 2 in request of `expect(_)notToBe(_)`", "Object");
setLineNumber(49); // compilenode call
var call41 = selfRequest(this, "assert(1)shouldntBe(1)", [1, 1], var_s1, var_s2);
return call41;
}; // end of method expect(_)notToBe(_)
setLineNumber(48); // compilenode member
var call42 = selfRequest(var_$dialect, "Object", [0]);
var call43 = selfRequest(var_$dialect, "Object", [0]);
func38.paramTypes = [call42, call43];
this.methods["expect(1)notToBe(1)"] = func38;
func38.methodName = "expect(1)notToBe(1)";
func38.paramCounts = [1, 1];
func38.paramNames = ["s1", "s2"];
func38.definitionLine = 48;
func38.definitionModule = "minispecBundle";
var func44 = function(argcv, var_s1, var_s2, var_complaint) { // method expect(_)notToBe(_)orSay(_), line 52
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 3) && (numArgs !== 3)) {
raiseTypeArgError("expect(_)notToBe(_)orSay(_)", 0, numArgs - 3);
}
setLineNumber(52); // compilenode member
var call45 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s1, call45, "argument 1 in request of `expect(_)notToBe(_)orSay(_)`", "Object");
var call46 = selfRequest(var_$dialect, "Object", [0]);
assertTypeOrMsg(var_s2, call46, "argument 2 in request of `expect(_)notToBe(_)orSay(_)`", "Object");
setLineNumber(53); // compilenode op
// call case 4: other requests
var term48 = request(var_s1, "\u2260(1)", [1], var_s2);
var call47 = selfRequest(this, "assert(1)description(1)", [1, 1], term48, var_complaint);
return call47;
}; // end of method expect(_)notToBe(_)orSay(_)
setLineNumber(52); // compilenode member
var call49 = selfRequest(var_$dialect, "Object", [0]);
var call50 = selfRequest(var_$dialect, "Object", [0]);
func44.paramTypes = [call49, call50, type_Unknown];
this.methods["expect(1)notToBe(1)orSay(1)"] = func44;
func44.methodName = "expect(1)notToBe(1)orSay(1)";
func44.paramCounts = [1, 1, 1];
func44.paramNames = ["s1", "s2", "complaint"];
func44.definitionLine = 52;
func44.definitionModule = "minispecBundle";
var func51 = function(argcv, var_n1, var_n2, var_epsilon) { // method expect(_)toBe(_)within(_), line 57
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 3) && (numArgs !== 3)) {
raiseTypeArgError("expect(_)toBe(_)within(_)", 0, numArgs - 3);
}
setLineNumber(57); // compilenode member
var call52 = selfRequest(var_$dialect, "Number", [0]);
assertTypeOrMsg(var_n1, call52, "argument 1 in request of `expect(_)toBe(_)within(_)`", "Number");
var call53 = selfRequest(var_$dialect, "Number", [0]);
assertTypeOrMsg(var_n2, call53, "argument 2 in request of `expect(_)toBe(_)within(_)`", "Number");
var call54 = selfRequest(var_$dialect, "Number", [0]);
assertTypeOrMsg(var_epsilon, call54, "argument 3 in request of `expect(_)toBe(_)within(_)`", "Number");
setLineNumber(58); // compilenode call
var call55 = selfRequest(this, "assert(1)shouldEqual(1)within(1)", [1, 1, 1], var_n1, var_n2, var_epsilon);
return call55;
}; // end of method expect(_)toBe(_)within(_)
setLineNumber(57); // compilenode member
var call56 = selfRequest(var_$dialect, "Number", [0]);
var call57 = selfRequest(var_$dialect, "Number", [0]);
var call58 = selfRequest(var_$dialect, "Number", [0]);
func51.paramTypes = [call56, call57, call58];
this.methods["expect(1)toBe(1)within(1)"] = func51;
func51.methodName = "expect(1)toBe(1)within(1)";
func51.paramCounts = [1, 1, 1];
func51.paramNames = ["n1", "n2", "epsilon"];
func51.definitionLine = 57;
func51.definitionModule = "minispecBundle";
var func59 = function(argcv, var_b, var_desired) { // method expect(_)toRaise(_), line 61
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)toRaise(_)", 0, numArgs - 2);
}
setLineNumber(61); // compilenode member
var call60 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_b, call60, "argument 1 in request of `expect(_)toRaise(_)`", "Procedure0");
setLineNumber(62); // compilenode call
var call61 = selfRequest(this, "assert(1)shouldRaise(1)", [1, 1], var_b, var_desired);
return call61;
}; // end of method expect(_)toRaise(_)
setLineNumber(61); // compilenode member
var call62 = selfRequest(var_$dialect, "Procedure0", [0]);
func59.paramTypes = [call62, type_Unknown];
this.methods["expect(1)toRaise(1)"] = func59;
func59.methodName = "expect(1)toRaise(1)";
func59.paramCounts = [1, 1];
func59.paramNames = ["b", "desired"];
func59.definitionLine = 61;
func59.definitionModule = "minispecBundle";
var func63 = function(argcv, var_b, var_desired, var_error) { // method expect(_)toRaise(_)mentioning(_), line 65
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 3) && (numArgs !== 3)) {
raiseTypeArgError("expect(_)toRaise(_)mentioning(_)", 0, numArgs - 3);
}
setLineNumber(65); // compilenode member
var call64 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_b, call64, "argument 1 in request of `expect(_)toRaise(_)mentioning(_)`", "Procedure0");
setLineNumber(66); // compilenode call
var call65 = selfRequest(this, "assert(1)shouldRaise(1)mentioning(1)", [1, 1, 1], var_b, var_desired, var_error);
return call65;
}; // end of method expect(_)toRaise(_)mentioning(_)
setLineNumber(65); // compilenode member
var call66 = selfRequest(var_$dialect, "Procedure0", [0]);
func63.paramTypes = [call66, type_Unknown, type_Unknown];
this.methods["expect(1)toRaise(1)mentioning(1)"] = func63;
func63.methodName = "expect(1)toRaise(1)mentioning(1)";
func63.paramCounts = [1, 1, 1];
func63.paramNames = ["b", "desired", "error"];
func63.definitionLine = 65;
func63.definitionModule = "minispecBundle";
var func67 = function(argcv, var_b, var_desired, var_err1, var_err2) { // method expect(_)toRaise(_)mentioning(_)and(_), line 69
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 4) && (numArgs !== 4)) {
raiseTypeArgError("expect(_)toRaise(_)mentioning(_)and(_)", 0, numArgs - 4);
}
setLineNumber(69); // compilenode member
var call68 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_b, call68, "argument 1 in request of `expect(_)toRaise(_)mentioning(_)and(_)`", "Procedure0");
setLineNumber(70); // compilenode call
var call69 = selfRequest(this, "assert(1)shouldRaise(1)mentioning(1)and(1)", [1, 1, 1, 1], var_b, var_desired, var_err1, var_err2);
return call69;
}; // end of method expect(_)toRaise(_)mentioning(_)and(_)
setLineNumber(69); // compilenode member
var call70 = selfRequest(var_$dialect, "Procedure0", [0]);
func67.paramTypes = [call70, type_Unknown, type_Unknown, type_Unknown];
this.methods["expect(1)toRaise(1)mentioning(1)and(1)"] = func67;
func67.methodName = "expect(1)toRaise(1)mentioning(1)and(1)";
func67.paramCounts = [1, 1, 1, 1];
func67.paramNames = ["b", "desired", "err1", "err2"];
func67.definitionLine = 69;
func67.definitionModule = "minispecBundle";
var func71 = function(argcv, var_b, var_desired, var_regexStr) { // method expect(_)toRaise(_)matchedBy(_), line 73
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 3) && (numArgs !== 3)) {
raiseTypeArgError("expect(_)toRaise(_)matchedBy(_)", 0, numArgs - 3);
}
setLineNumber(73); // compilenode member
var call72 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_b, call72, "argument 1 in request of `expect(_)toRaise(_)matchedBy(_)`", "Procedure0");
setLineNumber(74); // compilenode call
var call73 = selfRequest(this, "assert(1)shouldRaise(1)matchedBy(1)", [1, 1, 1], var_b, var_desired, var_regexStr);
return call73;
}; // end of method expect(_)toRaise(_)matchedBy(_)
setLineNumber(73); // compilenode member
var call74 = selfRequest(var_$dialect, "Procedure0", [0]);
func71.paramTypes = [call74, type_Unknown, type_Unknown];
this.methods["expect(1)toRaise(1)matchedBy(1)"] = func71;
func71.methodName = "expect(1)toRaise(1)matchedBy(1)";
func71.paramCounts = [1, 1, 1];
func71.paramNames = ["b", "desired", "regexStr"];
func71.definitionLine = 73;
func71.definitionModule = "minispecBundle";
var func75 = function(argcv, var_b, var_undesired) { // method expect(_)notToRaise(_), line 77
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)notToRaise(_)", 0, numArgs - 2);
}
setLineNumber(77); // compilenode member
var call76 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_b, call76, "argument 1 in request of `expect(_)notToRaise(_)`", "Procedure0");
var call77 = selfRequest(var_$dialect, "ExceptionKind", [0]);
assertTypeOrMsg(var_undesired, call77, "argument 2 in request of `expect(_)notToRaise(_)`", "ExceptionKind");
setLineNumber(78); // compilenode call
var call78 = selfRequest(this, "assert(1)shouldntRaise(1)", [1, 1], var_b, var_undesired);
return call78;
}; // end of method expect(_)notToRaise(_)
setLineNumber(77); // compilenode member
var call79 = selfRequest(var_$dialect, "Procedure0", [0]);
var call80 = selfRequest(var_$dialect, "ExceptionKind", [0]);
func75.paramTypes = [call79, call80];
this.methods["expect(1)notToRaise(1)"] = func75;
func75.methodName = "expect(1)notToRaise(1)";
func75.paramCounts = [1, 1];
func75.paramNames = ["b", "undesired"];
func75.definitionLine = 77;
func75.definitionModule = "minispecBundle";
var func81 = function(argcv, var_s, var_desired) { // method expect(_)toHaveType(_), line 81
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)toHaveType(_)", 0, numArgs - 2);
}
setLineNumber(81); // compilenode member
var call82 = selfRequest(var_$dialect, "Type", [0]);
assertTypeOrMsg(var_desired, call82, "argument 2 in request of `expect(_)toHaveType(_)`", "Type");
setLineNumber(82); // compilenode call
var call83 = selfRequest(this, "assert(1)hasType(1)", [1, 1], var_s, var_desired);
return call83;
}; // end of method expect(_)toHaveType(_)
setLineNumber(81); // compilenode member
var call84 = selfRequest(var_$dialect, "Type", [0]);
func81.paramTypes = [type_Unknown, call84];
this.methods["expect(1)toHaveType(1)"] = func81;
func81.methodName = "expect(1)toHaveType(1)";
func81.paramCounts = [1, 1];
func81.paramNames = ["s", "desired"];
func81.definitionLine = 81;
func81.definitionModule = "minispecBundle";
var func85 = function(argcv, var_s, var_undesired) { // method expect(_)notToHaveType(_), line 85
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expect(_)notToHaveType(_)", 0, numArgs - 2);
}
setLineNumber(85); // compilenode member
var call86 = selfRequest(var_$dialect, "Type", [0]);
assertTypeOrMsg(var_undesired, call86, "argument 2 in request of `expect(_)notToHaveType(_)`", "Type");
setLineNumber(86); // compilenode call
var call87 = selfRequest(this, "deny(1)hasType(1)", [1, 1], var_s, var_undesired);
return call87;
}; // end of method expect(_)notToHaveType(_)
setLineNumber(85); // compilenode member
var call88 = selfRequest(var_$dialect, "Type", [0]);
func85.paramTypes = [type_Unknown, call88];
this.methods["expect(1)notToHaveType(1)"] = func85;
func85.methodName = "expect(1)notToHaveType(1)";
func85.paramCounts = [1, 1];
func85.paramNames = ["s", "undesired"];
func85.definitionLine = 85;
func85.definitionModule = "minispecBundle";
var func89 = function(argcv, var_T, var_anObject) { // method expectType(_)toDescribe(_), line 89
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expectType(_)toDescribe(_)", 0, numArgs - 2);
}
setLineNumber(89); // compilenode member
var call90 = selfRequest(var_$dialect, "Type", [0]);
assertTypeOrMsg(var_T, call90, "argument 1 in request of `expectType(_)toDescribe(_)`", "Type");
setLineNumber(90); // compilenode call
var call91 = selfRequest(this, "assertType(1)describes(1)", [1, 1], var_T, var_anObject);
return call91;
}; // end of method expectType(_)toDescribe(_)
setLineNumber(89); // compilenode member
var call92 = selfRequest(var_$dialect, "Type", [0]);
func89.paramTypes = [call92, type_Unknown];
this.methods["expectType(1)toDescribe(1)"] = func89;
func89.methodName = "expectType(1)toDescribe(1)";
func89.paramCounts = [1, 1];
func89.paramNames = ["T", "anObject"];
func89.definitionLine = 89;
func89.definitionModule = "minispecBundle";
var func93 = function(argcv, var_T, var_anObject) { // method expectType(_)toExactlyDescribe(_), line 93
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("expectType(_)toExactlyDescribe(_)", 0, numArgs - 2);
}
setLineNumber(93); // compilenode member
var call94 = selfRequest(var_$dialect, "Type", [0]);
assertTypeOrMsg(var_T, call94, "argument 1 in request of `expectType(_)toExactlyDescribe(_)`", "Type");
setLineNumber(94); // compilenode call
var call95 = selfRequest(this, "assertType(1)exactlyDescribes(1)", [1, 1], var_T, var_anObject);
return call95;
}; // end of method expectType(_)toExactlyDescribe(_)
setLineNumber(93); // compilenode member
var call96 = selfRequest(var_$dialect, "Type", [0]);
func93.paramTypes = [call96, type_Unknown];
this.methods["expectType(1)toExactlyDescribe(1)"] = func93;
func93.methodName = "expectType(1)toExactlyDescribe(1)";
func93.paramCounts = [1, 1];
func93.paramNames = ["T", "anObject"];
func93.definitionLine = 93;
func93.definitionModule = "minispecBundle";
var func97 = function(argcv, var_reason) { // method failAndSay(_), line 97
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 1) && (numArgs !== 1)) {
raiseTypeArgError("failAndSay(_)", 0, numArgs - 1);
}
setLineNumber(98); // compilenode member
var call98 = selfRequest(this, "assert(1)description(1)", [1, 1], GraceFalse, var_reason);
return call98;
}; // end of method failAndSay(_)
this.methods["failAndSay(1)"] = func97;
func97.methodName = "failAndSay(1)";
func97.paramCounts = [1];
func97.paramNames = ["reason"];
func97.definitionLine = 97;
func97.definitionModule = "minispecBundle";
var func100 = function(argcv, var_name, var_block) { // method describe(_)with(_), line 101
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("describe(_)with(_)", 0, numArgs - 2);
}
setLineNumber(101); // compilenode member
var call101 = selfRequest(var_$dialect, "String", [0]);
assertTypeOrMsg(var_name, call101, "argument 1 in request of `describe(_)with(_)`", "String");
var call102 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_block, call102, "argument 2 in request of `describe(_)with(_)`", "Procedure0");
var if103 = GraceDone;
setLineNumber(102); // compilenode op
if (var_currentTestSuite === undefined) raiseUninitializedVariable("currentTestSuite");
// call case 4: other requests
if (var_nullSuite === undefined) raiseUninitializedVariable("nullSuite");
var term104 = request(var_nullSuite, "\u2260(1)", [1], var_currentTestSuite);
if (Grace_isTrue(term104)) {
setLineNumber(103); // compilenode string
var string106 = new GraceString("`describe` cannot be used inside `describe`");
// call case 4: other requests
var call107 = selfRequest(this, "MinispecError", [0]);
var call105 = request(call107, "raise(1)", [1], string106);
if103 = call105;
}
setLineNumber(105); // compilenode member
// call case 4: other requests
// call case 4: other requests
var call110 = request(var_gu, "testSuite", [0]);
var call109 = request(call110, "empty", [0]);
var call108 = selfRequest(var_$module, "currentTestSuite:=(1)", [1], call109);
setLineNumber(106); // compilenode call
// call case 4: other requests
var call111 = request(var_currentTestSuite, "name:=(1)", [1], var_name);
setLineNumber(107); // compilenode call
var call112 = selfRequest(var_$module, "currentSetupBlock:=(1)", [1], var_block);
setLineNumber(108); // compilenode num
var call113 = selfRequest(var_$module, "testNumberToRun:=(1)", [1], new GraceNum(0));
setLineNumber(109); // compilenode member
// call case 4: other requests
var call114 = request(var_block, "apply", [0]);
setLineNumber(110); // compilenode call
if (var_nullBlock === undefined) raiseUninitializedVariable("nullBlock");
var call115 = selfRequest(var_$module, "currentSetupBlock:=(1)", [1], var_nullBlock);
setLineNumber(111); // compilenode member
// call case 4: other requests
var call116 = request(var_currentTestSuite, "runAndPrintResults", [0]);
setLineNumber(112); // compilenode call
var call117 = selfRequest(var_$module, "currentTestSuite:=(1)", [1], var_nullSuite);
setLineNumber(113); // compilenode num
var call118 = selfRequest(var_$module, "currentTestBlock:=(1)", [1], new GraceNum(0));
return call118;
}; // end of method describe(_)with(_)
setLineNumber(101); // compilenode member
var call119 = selfRequest(var_$dialect, "String", [0]);
var call120 = selfRequest(var_$dialect, "Procedure0", [0]);
func100.paramTypes = [call119, call120];
this.methods["describe(1)with(1)"] = func100;
func100.methodName = "describe(1)with(1)";
func100.paramCounts = [1, 1];
func100.paramNames = ["name", "block"];
func100.definitionLine = 101;
func100.definitionModule = "minispecBundle";
var func121 = function(argcv) { // method doNotRerunErrors, line 116
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("doNotRerunErrors", 0, numArgs - 0);
}
setLineNumber(116); // compilenode member
var call122 = selfRequest(var_$module, "errorsToBeRerun:=(1)", [1], GraceFalse);
return call122;
}; // end of method doNotRerunErrors
this.methods["doNotRerunErrors"] = func121;
func121.methodName = "doNotRerunErrors";
func121.paramCounts = [0];
func121.paramNames = [];
func121.definitionLine = 116;
func121.definitionModule = "minispecBundle";
var func124 = function(argcv) { // method doRerunErrors, line 117
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("doRerunErrors", 0, numArgs - 0);
}
setLineNumber(117); // compilenode member
var call125 = selfRequest(var_$module, "errorsToBeRerun:=(1)", [1], GraceTrue);
return call125;
}; // end of method doRerunErrors
this.methods["doRerunErrors"] = func124;
func124.methodName = "doRerunErrors";
func124.paramCounts = [0];
func124.paramNames = [];
func124.definitionLine = 117;
func124.definitionModule = "minispecBundle";
var func127 = function(argcv) { // method exit, line 119
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 0) && (numArgs !== 0)) {
raiseTypeArgError("exit", 0, numArgs - 0);
}
setLineNumber(119); // compilenode member
// call case 4: other requests
var call128 = request(var_gu, "exit", [0]);
return call128;
}; // end of method exit
this.methods["exit"] = func127;
func127.methodName = "exit";
func127.paramCounts = [0];
func127.paramNames = [];
func127.definitionLine = 119;
func127.definitionModule = "minispecBundle";
var func129 = function(argcv, var_name, var_block) { // method specify(_)by(_), line 121
var returnTarget = invocationCount;
invocationCount++;
const numArgs = arguments.length - 1;
if ((numArgs > 2) && (numArgs !== 2)) {
raiseTypeArgError("specify(_)by(_)", 0, numArgs - 2);
}
setLineNumber(121); // compilenode member
var call130 = selfRequest(var_$dialect, "String", [0]);
assertTypeOrMsg(var_name, call130, "argument 1 in request of `specify(_)by(_)`", "String");
var call131 = selfRequest(var_$dialect, "Procedure0", [0]);
assertTypeOrMsg(var_block, call131, "argument 2 in request of `specify(_)by(_)`", "Procedure0");
var if132 = GraceDone;
setLineNumber(122); // compilenode op
if (var_currentTestSuite === undefined) raiseUninitializedVariable("currentTestSuite");
// call case 4: other requests
if (var_nullSuite === undefined) raiseUninitializedVariable("nullSuite");
var term133 = request(var_nullSuite, "==(1)", [1], var_currentTestSuite);
if (Grace_isTrue(term133)) {
setLineNumber(123); // compilenode string
var string135 = new GraceString("a `specify` can be created only within a `describe`");
// call case 4: other requests
var call136 = selfRequest(this, "MinispecError", [0]);
var call134 = request(call136, "raise(1)", [1], string135);
if132 = call134;
}
setLineNumber(125); // compilenode num
// call case 4: other requests
if (var_testNumberToRun === undefined) raiseUninitializedVariable("testNumberToRun");
var sum138 = request(var_testNumberToRun, "+(1)", [1], new GraceNum(1));
var call137 = selfRequest(var_$module, "testNumberToRun:=(1)", [1], sum138);
var if139 = GraceDone;
setLineNumber(126); // compilenode op
if (var_currentSetupBlock === undefined) raiseUninitializedVariable("currentSetupBlock");
// call case 4: other requests
if (var_nullBlock === undefined) raiseUninitializedVariable("nullBlock");
var term140 = request(var_nullBlock, "\u2260(1)", [1], var_currentSetupBlock);
if (Grace_isTrue(term140)) {
setLineNumber(127); // compilenode call
if (var_currentSetupBlock === undefined) raiseUninitializedVariable("currentSetupBlock");
if (var_testNumberToRun === undefined) raiseUninitializedVariable("testNumberToRun");
var call142 = selfRequest(this, "testCaseNamed(1)setupIn(1)asTe