|
@@ -18,12 +18,12 @@ $1=self["@result"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "result\x0a\x09^ result",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.ResultAnnouncement);
|
|
|
|
|
@@ -37,12 +37,12 @@ self["@result"]=aTestResult;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestResult"],
|
|
|
source: "result: aTestResult\x0a\x09result := aTestResult",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.ResultAnnouncement);
|
|
|
|
|
@@ -67,12 +67,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"assert:",{aBoolean:aBoolean},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:description:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBoolean"],
|
|
|
source: "assert: aBoolean\x0a\x09self assert: aBoolean description: 'Assertion failed'",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:description:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -93,12 +93,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"assert:description:",{aBoolean:aBoolean,aString:aString},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ifFalse:", "signalFailure:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBoolean", "aString"],
|
|
|
source: "assert: aBoolean description: aString\x0a\x09aBoolean ifFalse: [ self signalFailure: aString ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ifFalse:", "signalFailure:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -132,12 +132,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"assert:equals:",{actual:actual,expected:expected},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:description:", "=", ",", "printString"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["actual", "expected"],
|
|
|
source: "assert: actual equals: expected\x0a\x09^ self assert: (actual = expected) description: 'Expected: ', expected printString, ' but was: ', actual printString",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:description:", "=", ",", "printString"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -171,12 +171,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"async:",{aBlock:aBlock,c:c},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["errorIfNotAsync:", "ifTrue:", "isAsync", "execute:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "async: aBlock\x0a\x09| c |\x0a\x09self errorIfNotAsync: '#async'.\x0a\x09c := context.\x0a\x09^ [ self isAsync ifTrue: [ c execute: aBlock ] ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["errorIfNotAsync:", "ifTrue:", "isAsync", "execute:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -190,12 +190,12 @@ self["@context"]=aRunningTestContext;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aRunningTestContext"],
|
|
|
source: "context: aRunningTestContext\x0a\x09context := aRunningTestContext",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -214,12 +214,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"deny:",{aBoolean:aBoolean},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:", "not"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBoolean"],
|
|
|
source: "deny: aBoolean\x0a\x09self assert: aBoolean not",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:", "not"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -242,12 +242,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"errorIfNotAsync:",{aString:aString},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ifFalse:", "isAsync", "error:", ","],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aString"],
|
|
|
source: "errorIfNotAsync: aString\x0a\x09self isAsync ifFalse: [\x0a\x09\x09self error: aString, ' used without prior #timeout:' ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ifFalse:", "isAsync", "error:", ","]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -267,12 +267,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"finished",{},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["errorIfNotAsync:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "finished\x0a\x09self errorIfNotAsync: '#finished'.\x0a\x09asyncTimeout := nil",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["errorIfNotAsync:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -292,12 +292,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isAsync",{},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["notNil"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "isAsync\x0a\x09^ asyncTimeout notNil",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["notNil"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -317,12 +317,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"performTest",{},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["perform:", "selector"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "performTest\x0a\x09asyncTimeout := nil.\x0a\x09self perform: self selector",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["perform:", "selector"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -342,12 +342,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"runCase",{},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["start", "testCase:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "runCase\x0a\x09\x22Runs a test case in isolated context, leaking all errors.\x22\x0a\x0a\x09(TestContext testCase: self) start",
|
|
|
-referencedClasses: ["TestContext"]
|
|
|
+referencedClasses: ["TestContext"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["start", "testCase:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -362,12 +362,12 @@ $1=self["@testSelector"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "selector\x0a\x09^ testSelector",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -381,12 +381,12 @@ self["@testSelector"]=aSelector;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aSelector"],
|
|
|
source: "setTestSelector: aSelector\x0a\x09testSelector := aSelector",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -399,12 +399,12 @@ var self=this;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "setUp",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -423,12 +423,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"should:",{aBlock:aBlock},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:", "value"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "should: aBlock\x0a\x09self assert: aBlock value",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:", "value"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -459,12 +459,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"should:raise:",{aBlock:aBlock,anExceptionClass:anExceptionClass},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:", "on:do:", "value"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock", "anExceptionClass"],
|
|
|
source: "should: aBlock raise: anExceptionClass\x0a\x09self assert: ([ aBlock value. false ]\x0a\x09\x09on: anExceptionClass\x0a\x09\x09do: [ :ex | true ])",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:", "on:do:", "value"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -495,12 +495,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"shouldnt:raise:",{aBlock:aBlock,anExceptionClass:anExceptionClass},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["assert:", "on:do:", "value"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock", "anExceptionClass"],
|
|
|
source: "shouldnt: aBlock raise: anExceptionClass\x0a\x09self assert: ([ aBlock value. true ]\x0a\x09\x09on: anExceptionClass\x0a\x09\x09do: [ :ex | false ])",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["assert:", "on:do:", "value"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -523,12 +523,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"signalFailure:",{aString:aString},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["messageText:", "new", "signal"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aString"],
|
|
|
source: "signalFailure: aString\x0a\x09TestFailure new\x0a\x09\x09messageText: aString;\x0a\x09\x09signal",
|
|
|
-referencedClasses: ["TestFailure"]
|
|
|
+referencedClasses: ["TestFailure"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["messageText:", "new", "signal"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -541,12 +541,12 @@ var self=this;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "tearDown",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -581,12 +581,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"timeout:",{aNumber:aNumber},globals.TestCase)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ifNotNil:", "clearTimeout", "valueWithTimeout:", "async:", "assert:description:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aNumber"],
|
|
|
source: "timeout: aNumber\x0a\x09\x22Set a grace time timeout in milliseconds to run the test asynchronously\x22\x0a\x09\x0a\x09asyncTimeout ifNotNil: [ asyncTimeout clearTimeout ].\x0a\x09\x0a\x09\x22to allow #async: message send without throwing an error\x22\x0a\x09asyncTimeout := 0.\x0a\x09\x0a\x09asyncTimeout := (self async: [\x0a\x09\x09self assert: false description: 'SUnit grace time exhausted' ])\x0a\x09\x09\x09valueWithTimeout: aNumber",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ifNotNil:", "clearTimeout", "valueWithTimeout:", "async:", "assert:description:"]
|
|
|
}),
|
|
|
globals.TestCase);
|
|
|
|
|
@@ -613,12 +613,12 @@ return $2;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"allTestSelectors",{selectors:selectors},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["testSelectors", "ifTrue:", "shouldInheritSelectors", "addAll:", "allTestSelectors", "superclass"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "allTestSelectors\x0a\x09| selectors |\x0a\x09selectors := self testSelectors.\x0a\x09self shouldInheritSelectors ifTrue: [\x0a\x09\x09selectors addAll: self superclass allTestSelectors ].\x0a\x09^ selectors",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["testSelectors", "ifTrue:", "shouldInheritSelectors", "addAll:", "allTestSelectors", "superclass"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -646,12 +646,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"buildSuite",{},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["collect:", "allTestSelectors", "selector:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "buildSuite\x0a\x09^ self allTestSelectors collect: [ :each | self selector: each ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["collect:", "allTestSelectors", "selector:"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -664,12 +664,12 @@ var self=this;
|
|
|
return "test";
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "heliosClass\x0a\x09^ 'test'",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -689,12 +689,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isAbstract",{},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["=", "name"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "isAbstract\x0a\x09^ self name = 'TestCase'",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["=", "name"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -708,12 +708,12 @@ function $TestCase(){return globals.TestCase||(typeof TestCase=="undefined"?nil:
|
|
|
return $TestCase();
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "lookupHierarchyRoot\x0a\x09^ TestCase",
|
|
|
-referencedClasses: ["TestCase"]
|
|
|
+referencedClasses: ["TestCase"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -736,12 +736,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"selector:",{aSelector:aSelector},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["setTestSelector:", "new", "yourself"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aSelector"],
|
|
|
source: "selector: aSelector\x0a\x09^ self new\x0a\x09\x09setTestSelector: aSelector;\x0a\x09\x09yourself",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["setTestSelector:", "new", "yourself"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -761,12 +761,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"shouldInheritSelectors",{},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["~=", "lookupHierarchyRoot"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "shouldInheritSelectors\x0a\x09^ self ~= self lookupHierarchyRoot",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["~=", "lookupHierarchyRoot"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -794,12 +794,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"testSelectors",{},globals.TestCase.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["select:", "keys", "methodDictionary", "match:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "testSelectors\x0a\x09^ self methodDictionary keys select: [ :each | each match: '^test' ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["select:", "keys", "methodDictionary", "match:"]
|
|
|
}),
|
|
|
globals.TestCase.klass);
|
|
|
|
|
@@ -868,12 +868,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"execute:",{aBlock:aBlock,failed:failed},globals.TestContext)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["context:", "ensure:", "value", "ifTrue:", "and:", "isAsync", "finished", "ifFalse:", "tearDown"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "execute: aBlock\x0a\x09| failed |\x0a\x09\x0a\x09testCase context: self.\x0a\x09[\x0a\x09\x09failed := true.\x0a\x09\x09aBlock value.\x0a\x09\x09failed := false\x0a\x09]\x0a\x09\x09ensure: [\x0a\x09\x09\x09testCase context: nil.\x0a\x09\x09\x09\x0a\x09\x09\x09(failed and: [ testCase isAsync ]) ifTrue: [\x0a\x09\x09\x09\x09testCase finished ].\x0a\x09\x09\x09testCase isAsync ifFalse: [\x0a\x09\x09\x09\x09testCase tearDown ] ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["context:", "ensure:", "value", "ifTrue:", "and:", "isAsync", "finished", "ifFalse:", "tearDown"]
|
|
|
}),
|
|
|
globals.TestContext);
|
|
|
|
|
@@ -901,12 +901,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"start",{},globals.TestContext)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["execute:", "setUp", "performTest"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "start\x0a\x09self execute: [\x0a\x09\x09testCase setUp.\x0a\x09\x09testCase performTest ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["execute:", "setUp", "performTest"]
|
|
|
}),
|
|
|
globals.TestContext);
|
|
|
|
|
@@ -920,12 +920,12 @@ self["@testCase"]=aTestCase;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestCase"],
|
|
|
source: "testCase: aTestCase\x0a\x09testCase := aTestCase",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestContext);
|
|
|
|
|
@@ -949,12 +949,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"testCase:",{aTestCase:aTestCase},globals.TestContext.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["testCase:", "new", "yourself"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestCase"],
|
|
|
source: "testCase: aTestCase\x0a\x09^ self new\x0a\x09\x09testCase: aTestCase;\x0a\x09\x09yourself",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["testCase:", "new", "yourself"]
|
|
|
}),
|
|
|
globals.TestContext.klass);
|
|
|
|
|
@@ -1014,12 +1014,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"execute:",{aBlock:aBlock},globals.ReportingTestContext)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ensure:", "withErrorReporting:", "execute:", "ifFalse:", "isAsync", "increaseRuns", "value"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "execute: aBlock\x0a\x09[\x0a\x09\x09self withErrorReporting: [ super execute: aBlock ]\x0a\x09]\x0a\x09\x09ensure: [\x0a\x09\x09\x09testCase isAsync ifFalse: [\x0a\x09\x09\x09\x09result increaseRuns. finished value ] ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ensure:", "withErrorReporting:", "execute:", "ifFalse:", "isAsync", "increaseRuns", "value"]
|
|
|
}),
|
|
|
globals.ReportingTestContext);
|
|
|
|
|
@@ -1033,12 +1033,12 @@ self["@finished"]=aBlock;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "finished: aBlock\x0a\x09finished := aBlock",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.ReportingTestContext);
|
|
|
|
|
@@ -1052,12 +1052,12 @@ self["@result"]=aTestResult;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestResult"],
|
|
|
source: "result: aTestResult\x0a\x09result := aTestResult",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.ReportingTestContext);
|
|
|
|
|
@@ -1105,12 +1105,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"withErrorReporting:",{aBlock:aBlock},globals.ReportingTestContext)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["on:do:", "addFailure:", "addError:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "withErrorReporting: aBlock\x0a\x09[ aBlock\x0a\x09\x09on: TestFailure\x0a\x09\x09do: [ :ex | result addFailure: testCase ]\x0a\x09]\x0a\x09\x09on: Error\x0a\x09\x09do: [ :ex | result addError: testCase ]",
|
|
|
-referencedClasses: ["TestFailure", "Error"]
|
|
|
+referencedClasses: ["TestFailure", "Error"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["on:do:", "addFailure:", "addError:"]
|
|
|
}),
|
|
|
globals.ReportingTestContext);
|
|
|
|
|
@@ -1142,12 +1142,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"testCase:result:finished:",{aTestCase:aTestCase,aTestResult:aTestResult,aBlock:aBlock},globals.ReportingTestContext.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["result:", "testCase:", "finished:", "yourself"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestCase", "aTestResult", "aBlock"],
|
|
|
source: "testCase: aTestCase result: aTestResult finished: aBlock\x0a\x09^ (super testCase: aTestCase)\x0a\x09\x09result: aTestResult;\x0a\x09\x09finished: aBlock;\x0a\x09\x09yourself",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["result:", "testCase:", "finished:", "yourself"]
|
|
|
}),
|
|
|
globals.ReportingTestContext.klass);
|
|
|
|
|
@@ -1177,12 +1177,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"addError:",{anError:anError},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["add:", "errors"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["anError"],
|
|
|
source: "addError: anError\x0a\x09self errors add: anError",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["add:", "errors"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1201,12 +1201,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"addFailure:",{aFailure:aFailure},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["add:", "failures"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aFailure"],
|
|
|
source: "addFailure: aFailure\x0a\x09self failures add: aFailure",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["add:", "failures"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1221,12 +1221,12 @@ $1=self["@errors"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "errors\x0a\x09^ errors",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1241,12 +1241,12 @@ $1=self["@failures"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "failures\x0a\x09^ failures",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1265,12 +1265,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"increaseRuns",{},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["+"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "increaseRuns\x0a\x09runs := runs + 1",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["+"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1306,12 +1306,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"initialize",{},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["initialize", "now", "new"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "initialize\x0a\x09super initialize.\x0a\x09timestamp := Date now.\x0a\x09runs := 0.\x0a\x09errors := Array new.\x0a\x09failures := Array new.\x0a\x09total := 0",
|
|
|
-referencedClasses: ["Date", "Array"]
|
|
|
+referencedClasses: ["Date", "Array"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["initialize", "now", "new"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1338,12 +1338,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"nextRunDo:",{aBlock:aBlock},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ifFalse:", "==", "runs", "total", "value:", "+"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aBlock"],
|
|
|
source: "nextRunDo: aBlock\x0a\x09\x22Runs aBlock with index of next run or does nothing if no more runs\x22\x0a\x09^ self runs == self total\x0a\x09\x09ifFalse: [ aBlock value: self runs + 1 ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ifFalse:", "==", "runs", "total", "value:", "+"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1400,12 +1400,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"runCase:",{aTestCase:aTestCase},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["on:do:", "increaseRuns", "runCase", "addFailure:", "addError:"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aTestCase"],
|
|
|
source: "runCase: aTestCase\x0a\x09[ [ self increaseRuns.\x0a\x09\x09aTestCase runCase ]\x0a\x09on: TestFailure do: [ :ex | self addFailure: aTestCase ]]\x0a\x09on: Error do: [ :ex | self addError: aTestCase ]",
|
|
|
-referencedClasses: ["TestFailure", "Error"]
|
|
|
+referencedClasses: ["TestFailure", "Error"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["on:do:", "increaseRuns", "runCase", "addFailure:", "addError:"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1420,12 +1420,12 @@ $1=self["@runs"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "runs\x0a\x09^ runs",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1458,12 +1458,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"status",{},globals.TestResult)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["ifTrue:ifFalse:", "isEmpty", "errors", "failures"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "status\x0a\x09^ self errors isEmpty\x0a\x09\x09ifTrue: [\x0a\x09\x09\x09self failures isEmpty\x0a\x09\x09\x09\x09ifTrue: [ 'success' ]\x0a\x09\x09\x09\x09ifFalse: [ 'failure' ]]\x0a\x09\x09ifFalse: [ 'error' ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["ifTrue:ifFalse:", "isEmpty", "errors", "failures"]
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1478,12 +1478,12 @@ $1=self["@timestamp"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "timestamp\x0a\x09^ timestamp",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1498,12 +1498,12 @@ $1=self["@total"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "total\x0a\x09^ total",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1517,12 +1517,12 @@ self["@total"]=aNumber;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aNumber"],
|
|
|
source: "total: aNumber\x0a\x09total := aNumber",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestResult);
|
|
|
|
|
@@ -1543,12 +1543,12 @@ $1=self["@announcer"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "announcer\x0a\x09^ announcer",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1577,12 +1577,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"contextOf:",{anInteger:anInteger},globals.TestSuiteRunner)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["testCase:result:finished:", "at:", "resume"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["anInteger"],
|
|
|
source: "contextOf: anInteger\x0a\x09^ ReportingTestContext testCase: (suite at: anInteger) result: result finished: [ self resume ]",
|
|
|
-referencedClasses: ["ReportingTestContext"]
|
|
|
+referencedClasses: ["ReportingTestContext"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["testCase:result:finished:", "at:", "resume"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1631,12 +1631,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"initialize",{},globals.TestSuiteRunner)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["initialize", "new", "runs", "ifTrue:", "<", "total", "start", "contextOf:", "+"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "initialize\x0a\x09super initialize.\x0a\x09announcer := Announcer new.\x0a\x09result := TestResult new.\x0a\x09runNextTest := [ | runs | runs := result runs. runs < result total ifTrue: [ (self contextOf: runs + 1) start ] ].",
|
|
|
-referencedClasses: ["Announcer", "TestResult"]
|
|
|
+referencedClasses: ["Announcer", "TestResult"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["initialize", "new", "runs", "ifTrue:", "<", "total", "start", "contextOf:", "+"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1651,12 +1651,12 @@ $1=self["@result"];
|
|
|
return $1;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "result\x0a\x09^ result",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1677,12 +1677,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"resume",{},globals.TestSuiteRunner)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["fork", "announce:", "result:", "new"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "resume\x0a\x09runNextTest fork.\x0a\x09announcer announce: (ResultAnnouncement new result: result)",
|
|
|
-referencedClasses: ["ResultAnnouncement"]
|
|
|
+referencedClasses: ["ResultAnnouncement"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["fork", "announce:", "result:", "new"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1702,12 +1702,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"run",{},globals.TestSuiteRunner)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["total:", "size", "resume"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "run\x0a\x09result total: suite size.\x0a\x09self resume",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["total:", "size", "resume"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1721,12 +1721,12 @@ self["@suite"]=aCollection;
|
|
|
return self;
|
|
|
|
|
|
},
|
|
|
-messageSends: [],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aCollection"],
|
|
|
source: "suite: aCollection\x0a\x09suite := aCollection",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: []
|
|
|
}),
|
|
|
globals.TestSuiteRunner);
|
|
|
|
|
@@ -1746,12 +1746,12 @@ return self;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"new",{},globals.TestSuiteRunner.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["shouldNotImplement"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "new\x0a\x09self shouldNotImplement",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["shouldNotImplement"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner.klass);
|
|
|
|
|
@@ -1779,12 +1779,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"on:",{aCollection:aCollection},globals.TestSuiteRunner.klass)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["suite:", "new"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: ["aCollection"],
|
|
|
source: "on: aCollection\x0a\x09^ super new suite: aCollection",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["suite:", "new"]
|
|
|
}),
|
|
|
globals.TestSuiteRunner.klass);
|
|
|
|
|
@@ -1813,12 +1813,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isTestClass",{},globals.Behavior)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["and:", "includesBehavior:", "not", "isAbstract"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "isTestClass\x0a\x09^(self includesBehavior: TestCase) and: [ \x0a\x09\x09\x09self isAbstract not ]",
|
|
|
-referencedClasses: ["TestCase"]
|
|
|
+referencedClasses: ["TestCase"],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["and:", "includesBehavior:", "not", "isAbstract"]
|
|
|
}),
|
|
|
globals.Behavior);
|
|
|
|
|
@@ -1846,12 +1846,12 @@ return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isTestPackage",{},globals.Package)});
|
|
|
//>>excludeEnd("ctx");
|
|
|
},
|
|
|
-messageSends: ["anySatisfy:", "classes", "isTestClass"],
|
|
|
//>>excludeStart("ide", pragmas.excludeIdeData);
|
|
|
args: [],
|
|
|
source: "isTestPackage\x0a\x09^ self classes anySatisfy: [ :each | each isTestClass ]",
|
|
|
-referencedClasses: []
|
|
|
+referencedClasses: [],
|
|
|
//>>excludeEnd("ide");
|
|
|
+messageSends: ["anySatisfy:", "classes", "isTestClass"]
|
|
|
}),
|
|
|
globals.Package);
|
|
|
|