[squeak-dev] The Trunk: SUnitGUI-mt.73.mcz
Marcel Taeumel
marcel.taeumel at hpi.de
Mon Sep 30 11:36:29 UTC 2019
Should be fast again in Trunk. Please update. :-)
Best,
Marcel
Am 30.09.2019 08:41:19 schrieb Marcel Taeumel <marcel.taeumel at hpi.de>:
It makes it embarrasingly slow. :-| Let me look into that.
Am 29.09.2019 22:59:48 schrieb Nicolas Cellier <nicolas.cellier.aka.nice at gmail.com>:
Note that this change makes filtering by keyboard inoperant...
Le mer. 4 sept. 2019 à 17:28, <commits at source.squeak.org [mailto:commits at source.squeak.org]> a écrit :
Marcel Taeumel uploaded a new version of SUnitGUI to project The Trunk:
http://source.squeak.org/trunk/SUnitGUI-mt.73.mcz [http://source.squeak.org/trunk/SUnitGUI-mt.73.mcz]
==================== Summary ====================
Name: SUnitGUI-mt.73
Author: mt
Time: 4 September 2019, 5:28:26.809072 pm
UUID: 56e5b083-0108-450e-92d4-9bea9160a539
Ancestors: SUnitGUI-mt.72
Show durations in test runner.
=============== Diff against SUnitGUI-mt.72 ===============
Item was changed:
----- Method: TestRunner>>classList (in category 'accessing-classes') -----
classList
| helper |
classes isEmpty ifTrue: [ ^ classes ].
helper := Browser new.
^ helper
flattenHierarchyTree: (helper createHierarchyTreeOf: classes)
on: OrderedCollection new
indent: ''
by: ' '
format: [:class | class isAbstract
ifTrue: [class name asText addAttribute: TextEmphasis italic; yourself]
+ ifFalse: [
+ (class history notNil and: [class history includesKey: #duration])
+ ifFalse: ['{1} ({2} tests)' format: {class name. class allTestSelectors size}]
+ ifTrue: [
+ | duration |
+ duration := (class history at: #duration).
+ '{1} ({2} tests, {3})' format: {
+ class name.
+ class allTestSelectors size.
+ duration = 0 ifTrue: ['< 1 ms'] ifFalse: [
+ duration < 1000 ifTrue: [duration asString, ' ms'] ifFalse: [
+ (duration / 1000) rounded asString, ' secs']]}]]] !
- ifFalse: ['{1} ({2})' format: {class name. class allTestSelectors size}]]!
Item was changed:
----- Method: TestRunner>>saveResultInHistory (in category 'history saving') -----
saveResultInHistory
+ result dispatchResultsIntoHistory.
+ self changed: #classList.!
- result dispatchResultsIntoHistory!
Item was changed:
----- Method: TestRunner>>updateResults (in category 'updating') -----
updateResults
"<lint: #expect rule: #guardingClause>"
"<lint: #expect rule: #longMethods>"
self updateStatus: false.
failedList size = result failures size ifFalse: [
failedList := result failures asArray
sort: [ :a :b | a printString <= b printString ].
failedSelected := nil.
self
changed: #failedList;
changed: #failedSelected;
changed: #hasFailures;
changed: #hasProgress ].
errorList size = result errors size ifFalse: [
errorList := result errors asArray
sort: [ :a :b | a printString <= b printString ].
errorSelected := nil.
self
changed: #errorList;
changed: #errorSelected;
changed: #hasErrors;
+ changed: #hasProgress;
+ changed: #classList ].!
- changed: #hasProgress ].!
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20190930/25d30043/attachment.html>
More information about the Squeak-dev
mailing list
|