diff --git a/lib/modules/testsuite.in b/lib/modules/testsuite.in index e461ca8ea78b7134f9addbbec9ddaced9bfb845e..a6964850c3b582db36adf56d0c5937de75d3e053 100644 --- a/lib/modules/testsuite.in +++ b/lib/modules/testsuite.in @@ -1,7 +1,21 @@ -dnl $Id: testsuite.in,v 1.39 2007/12/27 00:51:47 nilsson Exp $ +dnl $Id: testsuite.in,v 1.40 2008/05/01 21:08:15 nilsson Exp $ START_MARKER +dnl - Arg + +test_equal( Arg.parse("aa --hopp --haha=ho -bar=foo x y"/" "), + ([ "hopp":1, "haha":"ho", "b":1, "a":1, "r":"foo", Arg.REST: ({"x","y"}) ]) ) +test_equal( Arg.parse("aa -bar -x=6"/" "), + ([ "b":1, "a":1, "r":1, "x":"6", Arg.REST: ({}) ]) ) +test_equal( Arg.parse("aa --foo --bar"/" "), + ([ "foo":1, "bar":1, Arg.REST: ({}) ]) ) +test_equal( Arg.parse("aa --foo - --bar"/" "), + ([ "foo":1, Arg.REST: ({ "-","--bar" }) ]) ) +test_equal( Arg.parse("aa --foo x --bar"/" "), + ([ "foo":1, Arg.REST: ({ "x","--bar" }) ]) ) + + dnl - Array test_equal(Array.diff(({ 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 }),