--- a/s/BenchmarkRunnerExecutor.st Sat Jul 27 13:26:01 2013 +0100
+++ b/s/BenchmarkRunnerExecutor.st Tue Jul 30 23:54:50 2013 +0100
@@ -51,7 +51,7 @@
!BenchmarkRunnerExecutor methodsFor:'executing-private'!
-execute: aBenchmarkInstance result: aBenchmarkResult parameters: aDictionary
+execute: aBenchmarkInstance result: aBenchmarkResult parameters: aCollection
| nm |
nm := aBenchmarkInstance name.
@@ -59,14 +59,27 @@
transcript nextPutAll: nm.
transcript nextPutAll: '...'.
- super execute: aBenchmarkInstance result: aBenchmarkResult parameters: aDictionary.
+ super execute: aBenchmarkInstance result: aBenchmarkResult parameters: aCollection.
transcript nextPutAll: 'OK ['.
transcript nextPutAll: (aBenchmarkResult outcomes detect:[:o|o benchmark == aBenchmarkInstance ]) time printString.
- transcript nextPutAll: ']
-'
+ transcript nextPutAll: ']'.
+ aCollection notEmpty ifTrue:[
+ transcript nextPutAll: ' {'.
+ (aCollection asSortedCollection:[:a :b | a key name < b key name ]) do:[:paramAndValue|
+ transcript nextPutAll: paramAndValue key name.
+ transcript nextPutAll: '='.
+ transcript nextPutAll: paramAndValue value storeString.
+ ] separatedBy:[
+ transcript nextPutAll: ', '.
+ ].
+ transcript nextPutAll: '}'.
+ ].
+ transcript nextPutAll: '
+'.
"Created: / 27-07-2013 / 12:33:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 30-07-2013 / 23:49:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
setUp:aBenchmarkInstance parameters: aCollection