Skip to content

Commit

Permalink
Add first version of new TestRunner & TestReporter
Browse files Browse the repository at this point in the history
  • Loading branch information
fniephaus committed Jul 18, 2016
1 parent 1fe2519 commit 1ce0104
Show file tree
Hide file tree
Showing 151 changed files with 672 additions and 247 deletions.
Empty file.
Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
as yet unclassified
report: aSCITestRunner
self
basicNew
runner: aSCITestRunner;
initialize;
report
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
helpers
cr
stream cr
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
helpers
lf
stream nextPut: Character lf
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
helpers
print: aString
stream nextPutAll: aString
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printEnd
self subclassResponsibility
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printError: aResult
self subclassResponsibility
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printFailure: aResult
self subclassResponsibility
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printPass: aResult
self subclassResponsibility
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
printing
printResult: aResult
aResult passed ifTrue: [ self printPass: aResult ].
aResult errored ifTrue: [ self printError: aResult ].
aResult failed ifTrue: [ self printFailure: aResult ]
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
printing
printResults
runner results keysAndValuesDo: [ :class :results |
results do: [ :result |
self printResult: result ] ]
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printStart
self subclassResponsibility
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
printing
report
self printStart.
self printResults.
self printEnd
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
accessing
runner: anObject

runner := anObject
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
accessing
stream: anObject

stream := anObject
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
helpers
tab
stream nextPut: Character tab
Original file line number Diff line number Diff line change
@@ -0,0 +1,18 @@
{
"class" : {
"report:" : "fn 7/1/2016 20:44" },
"instance" : {
"cr" : "fn 7/1/2016 17:25",
"lf" : "fn 7/1/2016 20:39",
"print:" : "fn 7/1/2016 17:25",
"printEnd" : "fn 7/2/2016 15:33",
"printError:" : "fn 7/2/2016 15:33",
"printFailure:" : "fn 7/2/2016 15:33",
"printPass:" : "fn 7/2/2016 15:33",
"printResult:" : "fn 7/1/2016 20:40",
"printResults" : "fn 7/1/2016 20:44",
"printStart" : "fn 7/2/2016 15:32",
"report" : "fn 7/2/2016 15:32",
"runner:" : "fn 7/1/2016 17:23",
"stream:" : "fn 7/1/2016 17:23",
"tab" : "fn 7/1/2016 20:39" } }
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
{
"category" : "SmalltalkCI-Core",
"classinstvars" : [
],
"classvars" : [
],
"commentStamp" : "",
"instvars" : [
"runner",
"stream" ],
"name" : "SCITestReporter",
"pools" : [
],
"super" : "Object",
"type" : "normal" }
Empty file.
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiBlue
^ self escape, '[34m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiBold
^ self escape, '[1m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiClear
^ self escape, '[0K'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiGray
^ self escape, '[37m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiGreen
^ self escape, '[32m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiRed
^ self escape, '[31m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiReset
^ self escape, '[0m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ansiYellow
^ self escape, '[33m'
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
ballot
^ (Character value: 10007) asString
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
checkMark
^ (Character value: 10003) asString
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
escape
^ Character escape asString
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
as yet unclassified
separator
^ String new: 80 withAll: $#
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
as yet unclassified
travisFold: foldName startOrEnd: startOrEnd
| prefix |
prefix := ''.
^ self ansiClear, 'travis_fold:', startOrEnd, ':', prefix, (foldName copyReplaceAll: '>>#' with: '_')
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
initialize-release
initialize
super initialize.
stream := FileStream stdout
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
printing
printClassTitle: aClass
self
setModeBold;
cr; print: aClass asString; cr;
resetMode
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
printing
printEnd
runner erroredTests > 0
ifTrue: [ self setModeBold; setModeRed ]
ifFalse: [
runner failedTests > 0
ifTrue: [ self setModeBold; setModeYellow ]].

self cr; cr;
print: ' Executed ', runner suite tests size asString, ' tests';
print: ', with ', runner failedTests asString, ' failures';
print: ', and ', runner erroredTests asString, ' errors';
print: ' in ', runner suiteTimeInSeconds asString, 's.';
cr; cr;
resetMode
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
printing
printError: aResult
self
printTravisFold: aResult testCase asString startOrEnd: 'start';
setModeBold; setModeRed;
print: ' ', self class ballot, ' ';
printTestTitle: aResult;
resetMode; setModeBold;
print: aResult testError asString; cr;
resetMode.
aResult testStack ifNotNil: [
self
print: aResult testStack; cr;
resetMode ].
self printTravisFold: aResult testCase asString startOrEnd: 'end'.
Original file line number Diff line number Diff line change
@@ -0,0 +1,15 @@
printing
printFailure: aResult
self
printTravisFold: aResult testCase asString startOrEnd: 'start';
setModeBold; setModeYellow;
print: ' ', self class ballot, ' ';
printTestTitle: aResult;
resetMode; setModeBold;
print: aResult testError asString; cr;
resetMode.
aResult testStack ifNotNil: [
self
print: aResult testStack; cr;
resetMode ].
self printTravisFold: aResult testCase asString startOrEnd: 'end'.
Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
printing
printPass: aResult
self
setModeGreen;
print: ' ', self class checkMark;
resetMode;
print: ' ', (aResult testCase asString); cr
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
printing
printResults
runner results keysAndValuesDo: [ :class :results |
self printClassTitle: class.
results do: [ :result |
self printResult: result ] ]
Original file line number Diff line number Diff line change
@@ -0,0 +1,12 @@
printing
printStart
self
setModeBold; setModeBlue;
print: self class separator; cr;
print: '# ', runner suite name;
print: ': ', runner suite tests size asString, ' Tests, ';
print: '', runner failedTests asString, ' Failures, ';
print: '', runner erroredTests asString, ' Errors ';
print: 'in ', runner suiteTimeInSeconds asString, 's'; cr;
print: self class separator; cr;
resetMode
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printTestTitle: aResult
self print: (aResult testCase asString), ' (', aResult testTime asString, 'ms)'; cr
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
printing
printTravisFold: foldName startOrEnd: startOrEnd
self print: (self class travisFold: foldName startOrEnd: startOrEnd); cr
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
resetMode
self print: self class ansiReset
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
accessing
runner: anObject

runner := anObject
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
setModeBlue
self print: self class ansiBlue
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
setModeBold
self print: self class ansiBold
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
setModeGreen
self print: self class ansiGreen
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
setModeRed
self print: self class ansiRed
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
ansi
setModeYellow
self print: self class ansiYellow
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
accessing
stdout: anObject

stdout := anObject
Original file line number Diff line number Diff line change
@@ -0,0 +1,34 @@
{
"class" : {
"ansiBlue" : "fn 7/1/2016 16:27",
"ansiBold" : "fn 7/1/2016 16:27",
"ansiClear" : "fn 7/1/2016 16:27",
"ansiGray" : "fn 7/1/2016 16:27",
"ansiGreen" : "fn 7/1/2016 16:27",
"ansiRed" : "fn 7/1/2016 16:27",
"ansiReset" : "fn 7/1/2016 16:27",
"ansiYellow" : "fn 7/1/2016 16:27",
"ballot" : "fn 7/2/2016 16:54",
"checkMark" : "fn 7/2/2016 16:54",
"escape" : "fn 7/1/2016 16:28",
"separator" : "fn 7/1/2016 16:28",
"travisFold:startOrEnd:" : "fn 7/1/2016 16:28" },
"instance" : {
"initialize" : "fn 7/1/2016 18:38",
"printClassTitle:" : "fn 7/1/2016 17:28",
"printEnd" : "fn 7/2/2016 16:55",
"printError:" : "fn 7/1/2016 18:43",
"printFailure:" : "fn 7/1/2016 18:43",
"printPass:" : "fn 7/1/2016 18:27",
"printResults" : "fn 7/1/2016 20:44",
"printStart" : "fn 7/2/2016 16:36",
"printTestTitle:" : "fn 7/2/2016 16:38",
"printTravisFold:startOrEnd:" : "fn 7/1/2016 17:30",
"resetMode" : "fn 7/1/2016 17:30",
"runner:" : "fn 7/1/2016 16:28",
"setModeBlue" : "fn 7/1/2016 17:30",
"setModeBold" : "fn 7/1/2016 17:30",
"setModeGreen" : "fn 7/1/2016 17:30",
"setModeRed" : "fn 7/1/2016 17:30",
"setModeYellow" : "fn 7/1/2016 17:30",
"stdout:" : "fn 7/1/2016 16:28" } }
Original file line number Diff line number Diff line change
@@ -0,0 +1,14 @@
{
"category" : "SmalltalkCI-Core",
"classinstvars" : [
],
"classvars" : [
],
"commentStamp" : "",
"instvars" : [
],
"name" : "SCITestReporterStdout",
"pools" : [
],
"super" : "SCITestReporter",
"type" : "normal" }
Empty file.
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
private
printing
encode: aString
^ ((aString asString
copyReplaceAll: '&' with: '&')
Expand Down
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
initialize-release
initialize
super initialize.
stream := StandardFileStream forceNewFileNamed: runner suite name , '.xml'.
stream := MultiByteFileStream newFrom: stream.
Loading

0 comments on commit 1ce0104

Please sign in to comment.