| 12345678910111213141516171819202122232425262728293031323334353637383940 | 
							- smalltalk.addPackage('Test', {});
 
- smalltalk.addClass('NodeTestRunner', smalltalk.Object, [], 'Test');
 
- smalltalk.addMethod(
 
- "_initialize",
 
- smalltalk.method({
 
- selector: "initialize",
 
- fn: function () {
 
-     var self = this;
 
-     smalltalk.send(self, "_runTestSuite", []);
 
-     return self;
 
- }
 
- }),
 
- smalltalk.NodeTestRunner.klass);
 
- smalltalk.addMethod(
 
- "_runTestSuite",
 
- smalltalk.method({
 
- selector: "runTestSuite",
 
- fn: function () {
 
-     var self = this;
 
-     var $1, $2;
 
-     var result;
 
-     result = smalltalk.send(smalltalk.TestResult || TestResult, "_new", []);
 
-     smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.TestCase || TestCase, "_allSubclasses", []), "_select_", [function (each) {return smalltalk.send(smalltalk.send(each, "_isAbstract", []), "_not", []);}]), "_do_", [function (each) {return smalltalk.send(smalltalk.send(each, "_buildSuite", []), "_do_", [function (suite) {return smalltalk.send(suite, "_runCaseFor_", [result]);}]);}]);
 
-     smalltalk.send(console, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(result, "_runs", []), "_asString", []), "__comma", [" tests run, "]), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(result, "_failures", []), "_size", []), "_asString", [])]), "__comma", [" failures, "]), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(result, "_errors", []), "_size", []), "_asString", [])]), "__comma", [" errors."])]);
 
-     $1 = smalltalk.send(smalltalk.send(result, "_failures", []), "_isEmpty", []);
 
-     if (!smalltalk.assert($1)) {
 
-         smalltalk.send(self, "_throw_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(result, "_failures", []), "_first", []), "_class", []), "_name", []), "__comma", [" >> "]), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(result, "_failures", []), "_first", []), "_selector", [])]), "__comma", [" is failing!"])]);
 
-     }
 
-     $2 = smalltalk.send(smalltalk.send(result, "_errors", []), "_isEmpty", []);
 
-     if (!smalltalk.assert($2)) {
 
-         smalltalk.send(self, "_throw_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(result, "_errors", []), "_first", []), "_class", []), "_name", []), "__comma", [" >> "]), "__comma", [smalltalk.send(smalltalk.send(smalltalk.send(result, "_errors", []), "_first", []), "_selector", [])]), "__comma", [" has errors!"])]);
 
-     }
 
-     return self;
 
- }
 
- }),
 
- smalltalk.NodeTestRunner.klass);
 
 
  |