2007-09-20 18:09:08 -04:00
|
|
|
USING: namespaces tools.test kernel command-line ;
|
2008-03-01 17:00:45 -05:00
|
|
|
IN: command-line.tests
|
2007-09-20 18:09:08 -04:00
|
|
|
|
|
|
|
|
[
|
|
|
|
|
[ f ] [ "-no-user-init" cli-arg ] unit-test
|
|
|
|
|
[ f ] [ "user-init" get ] unit-test
|
|
|
|
|
|
|
|
|
|
[ f ] [ "-user-init" cli-arg ] unit-test
|
|
|
|
|
[ t ] [ "user-init" get ] unit-test
|
|
|
|
|
|
|
|
|
|
[ "sdl.factor" ] [ "sdl.factor" cli-arg ] unit-test
|
|
|
|
|
] with-scope
|
