equal
deleted
inserted
replaced
33 |
33 |
34 main:argv |
34 main:argv |
35 self verboseInfo:('starting application'). |
35 self verboseInfo:('starting application'). |
36 self startStartBlockProcess. |
36 self startStartBlockProcess. |
37 |
37 |
38 Stdout nextPutLine:'12'. |
38 "install a global handler, |
39 Stderr nextPutLine:'32'. |
39 which suppresses the updating of the change file" |
|
40 Processor activeProcess exceptionHandlerSet |
|
41 on:(Class updateChangeFileQuerySignal) |
|
42 do:[:ex | ex proceedWith:false]. |
40 |
43 |
41 (OperatingSystem pathOfSTXExecutable asFilename directory / 'Start.st') fileIn. |
44 "ensure that required packages are present" |
42 Transcript nextPutLine:'43'. |
45 #( |
|
46 'stx:goodies/sunit' |
|
47 'stx:libcompat' |
|
48 'stx:libjavascript' |
|
49 'stx:goodies/regression' |
|
50 ) do:[:eachPackage | |
|
51 (Smalltalk loadPackage:eachPackage) ifFalse:[ |
|
52 Stdout showCR:'error: missing package ', eachPackage. |
|
53 Smalltalk exit:1. |
|
54 ]. |
|
55 ]. |
|
56 |
|
57 "run the unit tests" |
|
58 RunUnitTests run. |
43 ! ! |
59 ! ! |
44 |
60 |
45 !RunUnitTestsStart class methodsFor:'documentation'! |
61 !RunUnitTestsStart class methodsFor:'documentation'! |
46 |
62 |
47 version |
63 version |