'From Squeak3.2alpha of 4 October 2001 [latest update: #4469] on 12 November 2001 at 1:14:11 am'! "Change Set: SUnitUICleanup Date: 12 November 2001 Author: David Farber and Doug Way Both runTests and runTests: assume that the window is open, but TestRunner open returns the window morph, not the TestRunner itself. runTests: should be removed altogether. it depends on code from SUnit v2 that did not make it into the v3 release. This fixes those, and cleans up some comments."! !TestRunner commentStamp: '' prior: 0! A simple user interface to run all the test cases that exist in this image within the SUnit framework by Kent Beck and Erich Gamma (SUnit release 3.0). The tests can be executed via TestRunner runTests. See subclasses of TestCase for some sample tests. See also the SUnit Homepage.! ]style[(86 1 1 3 13 33 46 19 67 14 1)f1,f1cgreen;b,f1cred;b,f1bcblack;,f1,f1cblack;,f1,f1dTestRunner runTests;;,f1,f1Rhttp://wiki.cs.uiuc.edu/CampSmalltalk/SUnit+Camp+Smalltalk;,f1! !TestRunner class methodsFor: 'processing' stamp: 'jdf 10/3/2001 23:24'! runTests "TestRunner runTests" TestRunner open runTests.! ! !TestRunner class methodsFor: 'instance creation' stamp: 'jdf 10/3/2001 23:25'! new ^super new initialize! ! !TestRunner class methodsFor: 'instance creation' stamp: 'jdf 10/3/2001 23:25'! open "TestRunner open" ^TestRunner new openAsMorph; yourself ! ! !TestRunner class methodsFor: 'instance creation' stamp: 'dew 11/12/2001 00:53'! testRunnerUsage "Please see the TestRunner class comment for some documentation." self error: 'comment only'.! ]style[(15 18 10 69)f1b,f1,f1LTestRunner Comment;,f1! ! TestRunner class removeSelector: #runTests:! TestRunner removeSelector: #runTests:!