equal
deleted
inserted
replaced
246 suite run:result. |
246 suite run:result. |
247 ]. |
247 ]. |
248 Transcript cr; cr. |
248 Transcript cr; cr. |
249 Transcript show: 'COLLECTING COVERAGE...'. |
249 Transcript show: 'COLLECTING COVERAGE...'. |
250 coverage name: self name. |
250 coverage name: self name. |
|
251 coverage ident: self ident. |
251 coverage run. |
252 coverage run. |
252 ] ifFalse:[ |
253 ] ifFalse:[ |
253 suite run:result. |
254 suite run:result. |
254 ]. |
255 ]. |
255 Transcript cr; cr. |
256 Transcript cr; cr. |
268 Transcript show: 'SUMMARY: '. |
269 Transcript show: 'SUMMARY: '. |
269 result printOn: Transcript. |
270 result printOn: Transcript. |
270 Transcript cr. |
271 Transcript cr. |
271 |
272 |
272 "Created: / 04-08-2011 / 12:39:56 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
273 "Created: / 04-08-2011 / 12:39:56 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
273 "Modified: / 23-10-2013 / 11:48:27 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
274 "Modified: / 28-05-2016 / 10:33:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
274 ! ! |
275 ! ! |
275 |
276 |
276 !TestReport::Result methodsFor:'accessing'! |
277 !TestReport::Result methodsFor:'accessing'! |
277 |
278 |
278 errorCount |
279 errorCount |
625 |
626 |
626 version_CVS |
627 version_CVS |
627 ^ '$Header$' |
628 ^ '$Header$' |
628 ! |
629 ! |
629 |
630 |
|
631 version_HG |
|
632 |
|
633 ^ '$Changeset: <not expanded> $' |
|
634 ! |
|
635 |
630 version_SVN |
636 version_SVN |
631 ^ '$Id$' |
637 ^ '$Id$' |
632 ! ! |
638 ! ! |
633 |
639 |