factor/library/test/init.factor

17 lines
337 B
Factor

IN: temporary
USE: namespaces
USE: test
USE: kernel
USE: hashtables
USE: command-line
[
[ 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