equal
deleted
inserted
replaced
13 " |
13 " |
14 No other class instance variables are inherited by this class. |
14 No other class instance variables are inherited by this class. |
15 " |
15 " |
16 ! |
16 ! |
17 |
17 |
|
18 TestCase comment:'' |
|
19 ! |
|
20 |
18 |
21 |
19 !TestCase class methodsFor:'initialization'! |
22 !TestCase class methodsFor:'initialization'! |
20 |
23 |
21 initialize |
24 initialize |
22 ResumableTestFailure autoload |
25 ResumableTestFailure autoload |
23 |
26 |
24 " |
27 " |
25 self initialize |
28 self initialize |
26 " |
29 " |
27 ! |
|
28 |
|
29 postAutoload |
|
30 self projectDefinitionClass loadExtensions |
|
31 ! ! |
30 ! ! |
32 |
31 |
33 !TestCase class methodsFor:'instance creation'! |
32 !TestCase class methodsFor:'instance creation'! |
34 |
33 |
35 debug: aSymbol |
34 debug: aSymbol |
223 ^false |
222 ^false |
224 |
223 |
225 "Created: / 13-06-2011 / 16:46:09 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
224 "Created: / 13-06-2011 / 16:46:09 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
226 ! |
225 ! |
227 |
226 |
228 sunitSelectors |
|
229 |
|
230 ^self selectors |
|
231 |
|
232 "Modified: / 11-09-2010 / 15:07:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
233 ! |
|
234 |
|
235 sunitVersion |
227 sunitVersion |
236 ^'4.0' |
228 ^'4.0' |
237 ! |
229 ! |
238 |
230 |
239 testSelectorError:selector |
231 testSelectorError:selector |
366 ! ! |
358 ! ! |
367 |
359 |
368 !TestCase class methodsFor:'testing'! |
360 !TestCase class methodsFor:'testing'! |
369 |
361 |
370 isAbstract |
362 isAbstract |
371 "Override to true if a TestCase subclass is Abstract and should not have |
363 "Override to true if a TestCase subclass is Abstract and should not have |
372 TestCase instances built from it" |
364 TestCase instances built from it" |
373 |
365 |
374 ^ self == TestCase |
366 ^self sunitName = #TestCase |
375 ! |
367 ! |
376 |
368 |
377 isTestCaseLike |
369 isTestCaseLike |
378 |
370 |
379 ^true |
371 ^true |
754 ! ! |
746 ! ! |
755 |
747 |
756 !TestCase class methodsFor:'documentation'! |
748 !TestCase class methodsFor:'documentation'! |
757 |
749 |
758 version_CVS |
750 version_CVS |
759 ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.61 2011-07-05 16:22:57 cg Exp $' |
751 ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.62 2011-07-05 16:23:57 cg Exp $' |
760 ! |
752 ! |
761 |
753 |
762 version_SVN |
754 version_SVN |
763 ^ '§Id: TestCase.st 218 2011-06-13 15:45:06Z vranyj1 §' |
755 ^ '§Id: TestCase.st 218 2011-06-13 15:45:06Z vranyj1 §' |
764 ! ! |
756 ! ! |