pike.git / lib / modules / testsuite.in

version» Context lines:

pike.git/lib/modules/testsuite.in:1: - dnl $Id: testsuite.in,v 1.10 2002/11/17 13:51:38 grubba Exp $ + dnl $Id: testsuite.in,v 1.11 2003/01/02 01:42:29 nilsson Exp $      dnl - Array      dnl Array.diff_longest_sequence   dnl Array.diff_compare_table   dnl Array.longest_ordered_sequence   dnl Array.interleave_array   dnl Array.sort      test_equal([[ Array.diff(enumerate(4),enumerate(4,1,2)) ]],
pike.git/lib/modules/testsuite.in:216:   test_equal( Getopt.get_args(({ "x",0,0,1,"y",0,"z" })), "xyz"/1 )   test_eval_error( Getopt.get_args(({ "x", "-a" }), 0, 1) )   test_equal( Getopt.get_args(({ "-a", 0, "a"})), ({ "-a", "a" }) )   test_eval_error( Getopt.get_args(({ "x", "--a" }), 0, 1) )   test_equal( Getopt.get_args(({ "x", "--", "--a" })), ({ "x", "--a" }) )   test_equal( Getopt.get_args(({ "x", "-" })), ({ "x", "-" }) )   test_eval_error( Getop.get_args(({ "x", "a", "-b" }), 0, 1) )      test_equal( Getopt.get_args(({ "x", "a", "-b" }), 1, 1), ({ "x", "a", "-b" }))   test_equal( Getopt.get_args(({ "x", "ab", "-b" }), 1, 1), ({ "x", "ab", "-b" })) - test_equal( Getopt.get_args(({ "x", 0, "-b" }), 1, 1), ({ "x", "-b" })) + test_eval_error( Getopt.get_args(({ "x", 0, "-b" }), 1, 1))   test_eval_error( Getopt.get_args(({ "x", "-a" }), 1, 1))      test_do( add_constant("opt", lambda(array x, array y, mixed ... z) {    return Getopt.find_all_options(x, ({ y }), @z); }); )   test_equal( Getopt.find_all_options( ({}), ({}) ), ({}) )   test_equal( opt( "-a,-b"/",", ({ "a", Getopt.NO_ARG, "-a" }) ), ({}) )   test_equal( opt( "-a,--b"/",", ({ "a", Getopt.NO_ARG, "-b" }) ), ({}) )   test_equal( opt( "-a,-b"/",", ({ "b", Getopt.NO_ARG, "-b" }) ),    ({ ({ "b", 1 }) }) )   test_equal( opt( "-a,-ab"/",", ({ "b", Getopt.NO_ARG, "-b" }) ),
pike.git/lib/modules/testsuite.in:360:   test_equal( Getopt.get_args(({ "x", "a", "-b" }), 1, 1), ({ "x", "a", "-b" }))   test_any_equal([[    array x = ({ "x", "a", "-b" });    opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1 );    return x;   ]],[[ ({ "x", "a", "-b" }) ]])      test_do( putenv("POSIX_ME_HARDER", "1"); )   test_eval_error( Getop.get_args(({ "x", "a", "-b" }), -1, 1) )   test_equal( Getopt.get_args(({ "x", "a", "-b" }), 0, 1), ({ "x", "a", "-b" })) - test_equal( Getopt.get_args(({ "x", 0, "-b" }), 0, 1), ({ "x", "-b" })) + test_eval_error( Getopt.get_args(({ "x", 0, "-b" }), 0, 1))   test_eval_error( opt( ({"x","a","-b"}), ({"y",Getopt.HAS_ARG,"-b"}), -1, 1 ))   test_any_equal([[    array x = ({ "x", "a", "-b" });    opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 0, 1 );    return x;   ]],[[ ({ "x", "a", "-b" }) ]])   test_any_equal([[    array x = ({ "x", "a", "-b" });    opt(x, ({ "y", Getopt.HAS_ARG, "-b" }), 1, 1);    return x;