|
@@ -138,7 +138,7 @@ category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
self["@flag"]="bad";
|
|
self["@flag"]="bad";
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]="ok";
|
|
self["@flag"]="ok";
|
|
self["@flag"];
|
|
self["@flag"];
|
|
@@ -146,8 +146,8 @@ return smalltalk.send(self,"_error_",["Intentional"]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeError\x0a\x09flag := 'bad'.\x0a\x09self graceTime: 10.\x0a flag := (self async: [ flag := 'ok'. self error: 'Intentional' ]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "error:"],
|
|
|
|
|
|
+source: "fakeError\x0a\x09flag := 'bad'.\x0a\x09self timeout: 10.\x0a flag := (self async: [ flag := 'ok'. self error: 'Intentional' ]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "error:"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -160,14 +160,14 @@ category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
self["@flag"]="bad";
|
|
self["@flag"]="bad";
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(self,"_error_",["Intentional"]);
|
|
return smalltalk.send(self,"_error_",["Intentional"]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeErrorFailingInTearDown\x0a\x09flag := 'bad'.\x0a\x09self graceTime: 10.\x0a flag := (self async: [ self error: 'Intentional' ]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "error:"],
|
|
|
|
|
|
+source: "fakeErrorFailingInTearDown\x0a\x09flag := 'bad'.\x0a\x09self timeout: 10.\x0a flag := (self async: [ self error: 'Intentional' ]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "error:"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -180,7 +180,7 @@ category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
self["@flag"]="bad";
|
|
self["@flag"]="bad";
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]="ok";
|
|
self["@flag"]="ok";
|
|
self["@flag"];
|
|
self["@flag"];
|
|
@@ -188,71 +188,71 @@ return smalltalk.send(self,"_assert_",[false]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeFailure\x0a\x09flag := 'bad'.\x0a\x09self graceTime: 10.\x0a flag := (self async: [ flag := 'ok'. self assert: false ]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "assert:"],
|
|
|
|
|
|
+source: "fakeFailure\x0a\x09flag := 'bad'.\x0a\x09self timeout: 10.\x0a flag := (self async: [ flag := 'ok'. self assert: false ]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "assert:"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
-"_fakeMultipleGraceTimeFailing",
|
|
|
|
|
|
+"_fakeTimeout",
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
-selector: "fakeMultipleGraceTimeFailing",
|
|
|
|
|
|
+selector: "fakeTimeout",
|
|
category: 'helpers',
|
|
category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
-smalltalk.send(self,"_graceTime_",[(100)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(4)]);
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
-smalltalk.send(self,"_graceTime_",[(5)]);
|
|
|
|
-return smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
-})]),"_valueWithTimeout_",[(10)]);
|
|
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeMultipleGraceTimeFailing\x0a\x09self graceTime: 100.\x0a (self async: [\x0a\x09\x09self graceTime: 5.\x0a (self async: [ self finished ]) valueWithTimeout: 10\x0a\x09]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "finished"],
|
|
|
|
|
|
+source: "fakeTimeout\x0a\x09self timeout: 4.\x0a (self async: [ self finished ]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
-"_fakeMultipleGraceTimePassing",
|
|
|
|
|
|
+"_fakeTimeoutFailing",
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
-selector: "fakeMultipleGraceTimePassing",
|
|
|
|
|
|
+selector: "fakeTimeoutFailing",
|
|
category: 'helpers',
|
|
category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(100)]);
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
-smalltalk.send(self,"_graceTime_",[(20)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(5)]);
|
|
return smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
})]),"_valueWithTimeout_",[(10)]);
|
|
})]),"_valueWithTimeout_",[(10)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeMultipleGraceTimePassing\x0a\x09self graceTime: 10.\x0a (self async: [\x0a\x09\x09self graceTime: 20.\x0a (self async: [ self finished ]) valueWithTimeout: 10\x0a\x09]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "finished"],
|
|
|
|
|
|
+source: "fakeTimeoutFailing\x0a\x09self timeout: 100.\x0a (self async: [\x0a\x09\x09self timeout: 5.\x0a (self async: [ self finished ]) valueWithTimeout: 10\x0a\x09]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
-"_fakeTimeout",
|
|
|
|
|
|
+"_fakeTimeoutPassing",
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
-selector: "fakeTimeout",
|
|
|
|
|
|
+selector: "fakeTimeoutPassing",
|
|
category: 'helpers',
|
|
category: 'helpers',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
-smalltalk.send(self,"_graceTime_",[(4)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
|
|
+smalltalk.send(self,"_timeout_",[(20)]);
|
|
|
|
+return smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
|
|
+})]),"_valueWithTimeout_",[(10)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "fakeTimeout\x0a\x09self graceTime: 4.\x0a (self async: [ self finished ]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "finished"],
|
|
|
|
|
|
+source: "fakeTimeoutPassing\x0a\x09self timeout: 10.\x0a (self async: [\x0a\x09\x09self timeout: 20.\x0a (self async: [ self finished ]) valueWithTimeout: 10\x0a\x09]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -325,7 +325,7 @@ suite=smalltalk.send(["fakeError", "fakeErrorFailingInTearDown", "fakeFailure",
|
|
return smalltalk.send(smalltalk.send(self,"_class",[]),"_selector_",[each]);
|
|
return smalltalk.send(smalltalk.send(self,"_class",[]),"_selector_",[each]);
|
|
})]);
|
|
})]);
|
|
runner=smalltalk.send((smalltalk.TestSuiteRunner || TestSuiteRunner),"_on_",[suite]);
|
|
runner=smalltalk.send((smalltalk.TestSuiteRunner || TestSuiteRunner),"_on_",[suite]);
|
|
-smalltalk.send(self,"_graceTime_",[(200)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(200)]);
|
|
result=smalltalk.send(runner,"_result",[]);
|
|
result=smalltalk.send(runner,"_result",[]);
|
|
assertBlock=smalltalk.send(self,"_async_",[(function(){
|
|
assertBlock=smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(self,"_assert_equals_",[["fakeError"],smalltalk.send(self,"_sortedSelectors_",[smalltalk.send(result,"_errors",[])])]);
|
|
smalltalk.send(self,"_assert_equals_",[["fakeError"],smalltalk.send(self,"_sortedSelectors_",[smalltalk.send(result,"_errors",[])])]);
|
|
@@ -346,16 +346,16 @@ smalltalk.send($1,"_on_do_",[$2,$3]);
|
|
smalltalk.send(runner,"_run",[]);
|
|
smalltalk.send(runner,"_run",[]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testAsyncErrorsAndFailures\x0a\x09| suite runner result assertBlock |\x0a\x09suite := #('fakeError' 'fakeErrorFailingInTearDown' 'fakeFailure' 'testPass') collect: [ :each | self class selector: each ].\x0a runner := TestSuiteRunner on: suite.\x0a self graceTime: 200.\x0a\x09result := runner result.\x0a assertBlock := self async: [\x0a\x09\x09self assert: #('fakeError') equals: (self sortedSelectors: result errors).\x0a\x09\x09self assert: #('fakeErrorFailingInTearDown' 'fakeFailure') equals: (self sortedSelectors: result failures).\x0a\x09\x09self finished\x0a \x09].\x0a runner announcer on: ResultAnnouncement do: [:ann |\x0a \x09ann result == result ifTrue: [ result runs = result total ifTrue: assertBlock ]].\x0a\x09runner run",
|
|
|
|
-messageSends: ["collect:", "selector:", "class", "on:", "graceTime:", "result", "async:", "assert:equals:", "sortedSelectors:", "errors", "failures", "finished", "on:do:", "ifTrue:", "=", "total", "runs", "==", "announcer", "run"],
|
|
|
|
|
|
+source: "testAsyncErrorsAndFailures\x0a\x09| suite runner result assertBlock |\x0a\x09suite := #('fakeError' 'fakeErrorFailingInTearDown' 'fakeFailure' 'testPass') collect: [ :each | self class selector: each ].\x0a runner := TestSuiteRunner on: suite.\x0a self timeout: 200.\x0a\x09result := runner result.\x0a assertBlock := self async: [\x0a\x09\x09self assert: #('fakeError') equals: (self sortedSelectors: result errors).\x0a\x09\x09self assert: #('fakeErrorFailingInTearDown' 'fakeFailure') equals: (self sortedSelectors: result failures).\x0a\x09\x09self finished\x0a \x09].\x0a runner announcer on: ResultAnnouncement do: [:ann |\x0a \x09ann result == result ifTrue: [ result runs = result total ifTrue: assertBlock ]].\x0a\x09runner run",
|
|
|
|
+messageSends: ["collect:", "selector:", "class", "on:", "timeout:", "result", "async:", "assert:equals:", "sortedSelectors:", "errors", "failures", "finished", "on:do:", "ifTrue:", "=", "total", "runs", "==", "announcer", "run"],
|
|
referencedClasses: ["TestSuiteRunner", "ResultAnnouncement"]
|
|
referencedClasses: ["TestSuiteRunner", "ResultAnnouncement"]
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
-"_testAsyncNeedsGraceTime",
|
|
|
|
|
|
+"_testAsyncNeedsTimeout",
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
-selector: "testAsyncNeedsGraceTime",
|
|
|
|
|
|
+selector: "testAsyncNeedsTimeout",
|
|
category: 'tests',
|
|
category: 'tests',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
@@ -363,7 +363,7 @@ smalltalk.send(self,"_should_raise_",[(function(){
|
|
return smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(self,"_async_",[(function(){
|
|
})]);
|
|
})]);
|
|
}),(smalltalk.Error || Error)]);
|
|
}),(smalltalk.Error || Error)]);
|
|
-smalltalk.send(self,"_graceTime_",[(0)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(0)]);
|
|
smalltalk.send(self,"_shouldnt_raise_",[(function(){
|
|
smalltalk.send(self,"_shouldnt_raise_",[(function(){
|
|
return smalltalk.send(self,"_async_",[(function(){
|
|
return smalltalk.send(self,"_async_",[(function(){
|
|
})]);
|
|
})]);
|
|
@@ -371,30 +371,30 @@ return smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(self,"_finished",[]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testAsyncNeedsGraceTime\x0a self should: [ self async: [ ] ] raise: Error.\x0a self graceTime: 0.\x0a self shouldnt: [ self async: [ ] ] raise: Error.\x0a self finished\x0a",
|
|
|
|
-messageSends: ["should:raise:", "async:", "graceTime:", "shouldnt:raise:", "finished"],
|
|
|
|
|
|
+source: "testAsyncNeedsTimeout\x0a self should: [ self async: [ ] ] raise: Error.\x0a self timeout: 0.\x0a self shouldnt: [ self async: [ ] ] raise: Error.\x0a self finished\x0a",
|
|
|
|
+messageSends: ["should:raise:", "async:", "timeout:", "shouldnt:raise:", "finished"],
|
|
referencedClasses: ["Error"]
|
|
referencedClasses: ["Error"]
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
|
|
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
-"_testFinishedNeedsGraceTime",
|
|
|
|
|
|
+"_testFinishedNeedsTimeout",
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
-selector: "testFinishedNeedsGraceTime",
|
|
|
|
|
|
+selector: "testFinishedNeedsTimeout",
|
|
category: 'tests',
|
|
category: 'tests',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
smalltalk.send(self,"_should_raise_",[(function(){
|
|
smalltalk.send(self,"_should_raise_",[(function(){
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
}),(smalltalk.Error || Error)]);
|
|
}),(smalltalk.Error || Error)]);
|
|
-smalltalk.send(self,"_graceTime_",[(0)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(0)]);
|
|
smalltalk.send(self,"_shouldnt_raise_",[(function(){
|
|
smalltalk.send(self,"_shouldnt_raise_",[(function(){
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
}),(smalltalk.Error || Error)]);
|
|
}),(smalltalk.Error || Error)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testFinishedNeedsGraceTime\x0a self should: [ self finished ] raise: Error.\x0a self graceTime: 0.\x0a self shouldnt: [ self finished ] raise: Error.\x0a",
|
|
|
|
-messageSends: ["should:raise:", "finished", "graceTime:", "shouldnt:raise:"],
|
|
|
|
|
|
+source: "testFinishedNeedsTimeout\x0a self should: [ self finished ] raise: Error.\x0a self timeout: 0.\x0a self shouldnt: [ self finished ] raise: Error.\x0a",
|
|
|
|
+messageSends: ["should:raise:", "finished", "timeout:", "shouldnt:raise:"],
|
|
referencedClasses: ["Error"]
|
|
referencedClasses: ["Error"]
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -407,14 +407,14 @@ category: 'tests',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
smalltalk.send(self,"_deny_",[smalltalk.send(self,"_isAsync",[])]);
|
|
smalltalk.send(self,"_deny_",[smalltalk.send(self,"_isAsync",[])]);
|
|
-smalltalk.send(self,"_graceTime_",[(0)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(0)]);
|
|
smalltalk.send(self,"_assert_",[smalltalk.send(self,"_isAsync",[])]);
|
|
smalltalk.send(self,"_assert_",[smalltalk.send(self,"_isAsync",[])]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
smalltalk.send(self,"_deny_",[smalltalk.send(self,"_isAsync",[])]);
|
|
smalltalk.send(self,"_deny_",[smalltalk.send(self,"_isAsync",[])]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testIsAsyncReturnsCorrectValues\x0a self deny: self isAsync.\x0a self graceTime: 0.\x0a self assert: self isAsync.\x0a self finished.\x0a self deny: self isAsync\x0a",
|
|
|
|
-messageSends: ["deny:", "isAsync", "graceTime:", "assert:", "finished"],
|
|
|
|
|
|
+source: "testIsAsyncReturnsCorrectValues\x0a self deny: self isAsync.\x0a self timeout: 0.\x0a self assert: self isAsync.\x0a self finished.\x0a self deny: self isAsync\x0a",
|
|
|
|
+messageSends: ["deny:", "isAsync", "timeout:", "assert:", "finished"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -427,7 +427,7 @@ category: 'tests',
|
|
fn: function (){
|
|
fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
self["@flag"]="bad";
|
|
self["@flag"]="bad";
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(self,"_assert_",[true]);
|
|
smalltalk.send(self,"_assert_",[true]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
@@ -436,8 +436,8 @@ return self["@flag"];
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
})]),"_valueWithTimeout_",[(5)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testPass\x0a\x09flag := 'bad'.\x0a\x09self graceTime: 10.\x0a flag := (self async: [ self assert: true. self finished. flag := 'ok' ]) valueWithTimeout: 5\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "assert:", "finished"],
|
|
|
|
|
|
+source: "testPass\x0a\x09flag := 'bad'.\x0a\x09self timeout: 10.\x0a flag := (self async: [ self assert: true. self finished. flag := 'ok' ]) valueWithTimeout: 5\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "assert:", "finished"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -454,15 +454,15 @@ var suite;
|
|
var runner;
|
|
var runner;
|
|
var result;
|
|
var result;
|
|
var assertBlock;
|
|
var assertBlock;
|
|
-suite=smalltalk.send(["fakeTimeout", "fakeMultipleGraceTimeFailing", "fakeMultipleGraceTimePassing", "testPass"],"_collect_",[(function(each){
|
|
|
|
|
|
+suite=smalltalk.send(["fakeTimeout", "fakeMultipleTimeoutFailing", "fakeMultipleTimeoutPassing", "testPass"],"_collect_",[(function(each){
|
|
return smalltalk.send(smalltalk.send(self,"_class",[]),"_selector_",[each]);
|
|
return smalltalk.send(smalltalk.send(self,"_class",[]),"_selector_",[each]);
|
|
})]);
|
|
})]);
|
|
runner=smalltalk.send((smalltalk.TestSuiteRunner || TestSuiteRunner),"_on_",[suite]);
|
|
runner=smalltalk.send((smalltalk.TestSuiteRunner || TestSuiteRunner),"_on_",[suite]);
|
|
-smalltalk.send(self,"_graceTime_",[(200)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(200)]);
|
|
result=smalltalk.send(runner,"_result",[]);
|
|
result=smalltalk.send(runner,"_result",[]);
|
|
assertBlock=smalltalk.send(self,"_async_",[(function(){
|
|
assertBlock=smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(self,"_assert_",[smalltalk.send(smalltalk.send(result,"_errors",[]),"_isEmpty",[])]);
|
|
smalltalk.send(self,"_assert_",[smalltalk.send(smalltalk.send(result,"_errors",[]),"_isEmpty",[])]);
|
|
-smalltalk.send(self,"_assert_equals_",[["fakeMultipleGraceTimeFailing", "fakeTimeout"],smalltalk.send(self,"_sortedSelectors_",[smalltalk.send(result,"_failures",[])])]);
|
|
|
|
|
|
+smalltalk.send(self,"_assert_equals_",[["fakeMultipleTimeoutFailing", "fakeTimeout"],smalltalk.send(self,"_sortedSelectors_",[smalltalk.send(result,"_failures",[])])]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
return smalltalk.send(self,"_finished",[]);
|
|
})]);
|
|
})]);
|
|
$1=smalltalk.send(runner,"_announcer",[]);
|
|
$1=smalltalk.send(runner,"_announcer",[]);
|
|
@@ -479,8 +479,8 @@ smalltalk.send($1,"_on_do_",[$2,$3]);
|
|
smalltalk.send(runner,"_run",[]);
|
|
smalltalk.send(runner,"_run",[]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testTimeouts\x0a\x09| suite runner result assertBlock |\x0a\x09suite := #('fakeTimeout' 'fakeMultipleGraceTimeFailing' 'fakeMultipleGraceTimePassing' 'testPass') collect: [ :each | self class selector: each ].\x0a runner := TestSuiteRunner on: suite.\x0a self graceTime: 200.\x0a\x09result := runner result.\x0a assertBlock := self async: [\x0a\x09\x09self assert: result errors isEmpty.\x0a\x09\x09self assert: #('fakeMultipleGraceTimeFailing' 'fakeTimeout') equals: (self sortedSelectors: result failures).\x0a\x09\x09self finished\x0a \x09].\x0a runner announcer on: ResultAnnouncement do: [:ann |\x0a \x09ann result == result ifTrue: [ result runs = result total ifTrue: assertBlock ]].\x0a\x09runner run",
|
|
|
|
-messageSends: ["collect:", "selector:", "class", "on:", "graceTime:", "result", "async:", "assert:", "isEmpty", "errors", "assert:equals:", "sortedSelectors:", "failures", "finished", "on:do:", "ifTrue:", "=", "total", "runs", "==", "announcer", "run"],
|
|
|
|
|
|
+source: "testTimeouts\x0a\x09| suite runner result assertBlock |\x0a\x09suite := #('fakeTimeout' 'fakeMultipleTimeoutFailing' 'fakeMultipleTimeoutPassing' 'testPass') collect: [ :each | self class selector: each ].\x0a runner := TestSuiteRunner on: suite.\x0a self timeout: 200.\x0a\x09result := runner result.\x0a assertBlock := self async: [\x0a\x09\x09self assert: result errors isEmpty.\x0a\x09\x09self assert: #('fakeMultipleTimeoutFailing' 'fakeTimeout') equals: (self sortedSelectors: result failures).\x0a\x09\x09self finished\x0a \x09].\x0a runner announcer on: ResultAnnouncement do: [:ann |\x0a \x09ann result == result ifTrue: [ result runs = result total ifTrue: assertBlock ]].\x0a\x09runner run",
|
|
|
|
+messageSends: ["collect:", "selector:", "class", "on:", "timeout:", "result", "async:", "assert:", "isEmpty", "errors", "assert:equals:", "sortedSelectors:", "failures", "finished", "on:do:", "ifTrue:", "=", "total", "runs", "==", "announcer", "run"],
|
|
referencedClasses: ["TestSuiteRunner", "ResultAnnouncement"]
|
|
referencedClasses: ["TestSuiteRunner", "ResultAnnouncement"]
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|
|
@@ -494,7 +494,7 @@ fn: function (){
|
|
var self=this;
|
|
var self=this;
|
|
var x;
|
|
var x;
|
|
self["@flag"]="bad";
|
|
self["@flag"]="bad";
|
|
-smalltalk.send(self,"_graceTime_",[(10)]);
|
|
|
|
|
|
+smalltalk.send(self,"_timeout_",[(10)]);
|
|
x=(0);
|
|
x=(0);
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
self["@flag"]=smalltalk.send(smalltalk.send(self,"_async_",[(function(){
|
|
smalltalk.send(self,"_finished",[]);
|
|
smalltalk.send(self,"_finished",[]);
|
|
@@ -514,8 +514,8 @@ return smalltalk.send(self,"_assert_equals_",[(1),x]);
|
|
})]),"_valueWithTimeout_",[(0)]);
|
|
})]),"_valueWithTimeout_",[(0)]);
|
|
return self},
|
|
return self},
|
|
args: [],
|
|
args: [],
|
|
-source: "testTwoAsyncPassesWithFinishedOnlyOneIsRun\x0a\x09| x |\x0a\x09flag := 'bad'.\x0a\x09self graceTime: 10.\x0a x := 0.\x0a flag := (self async: [ self finished. flag := 'ok'. x := x+1. self assert: 1 equals: x ]) valueWithTimeout: 0.\x0a flag := (self async: [ self finished. flag := 'ok'. x := x+1. self assert: 1 equals: x ]) valueWithTimeout: 0.\x0a",
|
|
|
|
-messageSends: ["graceTime:", "valueWithTimeout:", "async:", "finished", "+", "assert:equals:"],
|
|
|
|
|
|
+source: "testTwoAsyncPassesWithFinishedOnlyOneIsRun\x0a\x09| x |\x0a\x09flag := 'bad'.\x0a\x09self timeout: 10.\x0a x := 0.\x0a flag := (self async: [ self finished. flag := 'ok'. x := x+1. self assert: 1 equals: x ]) valueWithTimeout: 0.\x0a flag := (self async: [ self finished. flag := 'ok'. x := x+1. self assert: 1 equals: x ]) valueWithTimeout: 0.\x0a",
|
|
|
|
+messageSends: ["timeout:", "valueWithTimeout:", "async:", "finished", "+", "assert:equals:"],
|
|
referencedClasses: []
|
|
referencedClasses: []
|
|
}),
|
|
}),
|
|
smalltalk.SUnitAsyncTest);
|
|
smalltalk.SUnitAsyncTest);
|