Branch: Tag:

2013-06-03

2013-06-03 16:53:50 by Martin Nilsson <nilsson@opera.com>

Support -x -x style arguments.

13:    ([ "foo":1, Arg.REST: ({ "-","--bar" }) ]) )   test_equal( Arg.parse("aa --foo x --bar"/" "),    ([ "foo":1, Arg.REST: ({ "x","--bar" }) ]) ) + test_equal( Arg.parse("aa -foo -o"/" "), +  ([ "f":1, "o":3, Arg.REST: ({}) ]) )      test_any([[   
39:   test_equal( (mapping)o("x -dvn foo xor"/" ",([])), ([ "debug":1, "verbose":1, "name":"foo", Arg.REST : ({ "xor" }) ]) )   test_equal( o(({"x"}),(["VERBOSE":"1"]))->verbose, "1" )   test_equal( (mapping)o("x --verbose=5"/" ",([])), ([ "name":"Donald", Arg.REST : ({ "--verbose=5" }) ]) ) + test_equal( o("x -v -v"/" ",([]))->verbose , 2 )      test_do(add_constant("o"))