basis/command-line/command-line-tests.factor

   1 USING: namespaces splitting tools.test ;
   2 IN: command-line
   3
   4 { "factor" f { "a" "b" "c" } } [
   5     { "factor" "-run=test-voc" "a" "b" "c" } parse-command-line
   6     executable get script get command-line get
   7 ] unit-test
   8
   9 { "factor" f { "-a" "b" "c" } } [
  10     { "factor" "-run=test-voc" "-a" "b" "c" } parse-command-line
  11     executable get script get command-line get
  12 ] unit-test
  13
  14 { "factor" f { "a" "-b" "c" } } [
  15     { "factor" "-run=test-voc" "a" "-b" "c" } parse-command-line
  16     executable get script get command-line get
  17 ] unit-test
  18
  19 { "factor" f { "a" "b" "-c" } } [
  20     { "factor" "-run=test-voc" "a" "b" "-c" } parse-command-line
  21     executable get script get command-line get
  22 ] unit-test
  23
  24 { "factor" "a" { "b" "c" } } [
  25     { "factor" "a" "b" "c" } parse-command-line
  26     executable get script get command-line get
  27 ] unit-test
  28
  29 { "factor" "a" { "b" "c" } } [
  30     { "factor" "-foo" "a" "b" "c" } parse-command-line
  31     executable get script get command-line get
  32 ] unit-test