-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Merge pull request #5 from ba-st/add_openssh_client_dependency
Add ssh-client dependency to rowan image
- Loading branch information
Showing
3 changed files
with
120 additions
and
89 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,113 @@ | ||
set compile_env: 0 | ||
! ------------------- Class definition for StdOutTestReporter | ||
expectvalue /Class | ||
doit | ||
Object subclass: 'StdOutTestReporter' | ||
instVarNames: #() | ||
classVars: #() | ||
classInstVars: #() | ||
poolDictionaries: #() | ||
inDictionary: Globals | ||
options: #() | ||
|
||
% | ||
! ------------------- Remove existing behavior from StdOutTestReporter | ||
expectvalue /Metaclass3 | ||
doit | ||
StdOutTestReporter removeAllMethods. | ||
StdOutTestReporter class removeAllMethods. | ||
% | ||
set compile_env: 0 | ||
! ------------------- Instance methods for StdOutTestReporter | ||
category: 'reporting' | ||
method: StdOutTestReporter | ||
runTestsForProjectNamed: aProjectName | ||
|
||
| suite result sortBlock currentTestClass | | ||
|
||
suite := (Rowan projectNamed: aProjectName) testSuite. | ||
|
||
StdOutPrinter printLine: [:s | | ||
s << 'Running suite ' << suite name << ' with ' << suite tests size asString << ' tests.'. | ||
]. | ||
|
||
result := suite run. | ||
|
||
StdOutPrinter | ||
printLine: [:s | s << '.............']; | ||
printLine: [:s | s << 'Finished running suite: ' << suite name ]; | ||
printLine: [:s | ]; | ||
printInfo: [:s | s << '##################################################']; | ||
printInfo: [:s | s << ' ' << suite name]; | ||
printInfo: [:s | s << ' ' << result runCount asString << ' tests with ' << result failureCount asString << ' failures and ' << result errorCount asString << ' errors.' ]; | ||
printInfo: [:s | s << '##################################################']. | ||
|
||
sortBlock := [:a :b | a class name < b class name or: [a class name = b class name and: [ a selector < b selector ]]]. | ||
|
||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printSuccess: [:s | s << '(' << result passedCount asString << ' tests passed)' ]. | ||
|
||
(result passed sort: sortBlock) | ||
do: [:test | | ||
currentTestClass = test class name | ||
ifFalse: [ | ||
currentTestClass := test class name. | ||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printLine: [:s | s << currentTestClass asString ] | ||
]. | ||
StdOutPrinter printSuccess: [:s | s << ' ✓ ' << test selector asString ] | ||
]. | ||
|
||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printWarning: [:s | s << '##########################']; | ||
printWarning: [:s | s << ' ' << result failureCount asString << ' tests failed' ]; | ||
printWarning: [:s | s << '##########################']. | ||
|
||
(result failures sort: sortBlock) | ||
do: [:test | | ||
currentTestClass = test class name | ||
ifFalse: [ | ||
currentTestClass := test class name. | ||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printLine: [:s | s << currentTestClass asString ] | ||
]. | ||
StdOutPrinter printWarning: [:s | s << ' ✗ ' << test selector asString ] | ||
]. | ||
|
||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printError: [:s | s << '##########################']; | ||
printError: [:s | s << ' ' << result errorCount asString << ' tests errored' ]; | ||
printError: [:s | s << '##########################']. | ||
|
||
(result errors sort: sortBlock) | ||
do: [:test | | ||
currentTestClass = test class name | ||
ifFalse: [ | ||
currentTestClass := test class name. | ||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printLine: [:s | s << currentTestClass asString ] | ||
]. | ||
StdOutPrinter printError: [:s | s << ' ✗ ' << test selector asString ] | ||
]. | ||
|
||
result hasPassed ifTrue: [ | ||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printSuccess: [:s | s << '#####################################################']; | ||
printSuccess: [:s | s << '✓ Executed ' << result runCount asString << ' tests with ' << result failureCount asString << ' failures and ' << result errorCount asString << ' errors.' ]; | ||
printSuccess: [:s | s << '#####################################################'] | ||
] ifFalse: [ | ||
StdOutPrinter | ||
printLine: [:s | ]; | ||
printError: [:s | s << '#####################################################']; | ||
printError: [:s | s << '✗ Executed ' << result runCount asString << ' tests with ' << result failureCount asString << ' failures and ' << result errorCount asString << ' errors.' ]; | ||
printError: [:s | s << '#####################################################'] | ||
]. | ||
^ result hasPassed | ||
% |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters