equal
deleted
inserted
replaced
277 "Created: / 13-01-2012 / 11:48:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
277 "Created: / 13-01-2012 / 11:48:07 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
278 ! ! |
278 ! ! |
279 |
279 |
280 !ReportRunner class methodsFor:'startup-to be redefined'! |
280 !ReportRunner class methodsFor:'startup-to be redefined'! |
281 |
281 |
282 main:argv |
282 main:argv0 |
283 "Process command line arguments" |
283 "Process command line arguments" |
284 |
284 |
|
285 | argv | |
|
286 |
|
287 argv := argv0 asOrderedCollection. |
|
288 argv remove: '--abortOnSEGV' ifAbsent:[nil]. |
285 parser := CmdLineParser new. |
289 parser := CmdLineParser new. |
286 CmdLineOptionError autoload. |
290 CmdLineOptionError autoload. |
287 |
291 |
288 [ |
292 [ |
289 parser parse: argv for: self. |
293 parser parse: argv for: self. |