equal
deleted
inserted
replaced
393 possibly change name to 'exception'" |
393 possibly change name to 'exception'" |
394 |
394 |
395 |
395 |
396 outcome result: (TestResult stateError). |
396 outcome result: (TestResult stateError). |
397 outcome remember. |
397 outcome remember. |
398 ^ self errorOutcomes add:outcome. |
398 self errorOutcomes add:outcome. |
|
399 ^ outcome |
399 |
400 |
400 "Created: / 03-08-2011 / 13:50:42 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
401 "Created: / 03-08-2011 / 13:50:42 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
401 "Modified: / 06-08-2011 / 09:46:41 / cg" |
402 "Modified: / 06-08-2011 / 09:46:41 / cg" |
402 "Modified: / 20-08-2011 / 12:46:24 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
403 "Modified: / 20-08-2011 / 12:46:24 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
403 "Modified (comment): / 22-05-2017 / 18:27:02 / mawalch" |
404 "Modified (comment): / 22-05-2017 / 18:27:02 / mawalch" |
417 ^ self |
418 ^ self |
418 ]. |
419 ]. |
419 ]. |
420 ]. |
420 outcome result: (TestResult stateFail). |
421 outcome result: (TestResult stateFail). |
421 outcome remember. |
422 outcome remember. |
422 ^ self failureOutcomes add: outcome |
423 self failureOutcomes add:outcome. |
|
424 ^ outcome |
423 |
425 |
424 "Created: / 03-08-2011 / 13:53:18 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
426 "Created: / 03-08-2011 / 13:53:18 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
425 "Modified: / 06-08-2011 / 09:55:17 / cg" |
427 "Modified: / 06-08-2011 / 09:55:17 / cg" |
426 "Modified: / 20-08-2011 / 12:46:15 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
428 "Modified: / 20-08-2011 / 12:46:15 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
427 "Modified (comment): / 22-05-2017 / 18:25:30 / mawalch" |
429 "Modified (comment): / 22-05-2017 / 18:25:30 / mawalch" |
429 |
431 |
430 addPass:testCase |
432 addPass:testCase |
431 |
433 |
432 outcome result: (TestResult statePass). |
434 outcome result: (TestResult statePass). |
433 outcome remember. |
435 outcome remember. |
434 ^ self passedOutcomes add: outcome |
436 self passedOutcomes add: outcome. |
|
437 ^ outcome |
435 |
438 |
436 "Modified: / 20-08-2011 / 12:44:52 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
439 "Modified: / 20-08-2011 / 12:44:52 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
437 ! |
440 ! |
438 |
441 |
439 addSkipped:testCase |
442 addSkipped:testCase |
447 addSkipped:testCase detail:detail |
450 addSkipped:testCase detail:detail |
448 |
451 |
449 outcome result: (TestResult stateSkip). |
452 outcome result: (TestResult stateSkip). |
450 outcome exceptionDetail:('skipped because: ',detail asString). |
453 outcome exceptionDetail:('skipped because: ',detail asString). |
451 outcome remember. |
454 outcome remember. |
452 ^ self skippedOutcomes add: outcome |
455 self skippedOutcomes add: outcome. |
|
456 ^ outcome |
453 |
457 |
454 "Created: / 08-06-2019 / 13:49:15 / Claus Gittinger" |
458 "Created: / 08-06-2019 / 13:49:15 / Claus Gittinger" |
455 ! |
459 ! |
456 |
460 |
457 remove: aTestCase |
461 remove: aTestCase |