pike.git/ src/ testsuite.in

1998-03-26

1998-03-26 01:08:22 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 974e0847441059fc3eca9e10d51f76037a0ea9c1 (9 lines) (+5/-4) ^{[ Show | Annotate ]}
  Branch: 7.9

ADT.Table tests are back

Rev: src/testsuite.in:1.83

1: - test_true([["$Id: testsuite.in,v 1.82 1998/03/25 14:25:09 noring Exp $"]]) + test_true([["$Id: testsuite.in,v 1.83 1998/03/26 01:08:22 hubbe Exp $"]])   test_eq(1e1,10.0)   test_eq(1E1,10.0)   test_eq(1e+1,10.0)
1918:   test_program([[ object(LR.parser) p=LR.Grammar_parser.make_parser("foo : bar;foo : foo bar;bar : \"a\";"); int pos; array(string) data="aaaaaaaaa"/""; string scan() { if (pos < sizeof(data)) return(data[pos++]); else return ""; } int a() { return(p->parse(scan) == "a"); }]])      // - Table.pmod - dnl test_true(ADT.Table.table) - dnl test_true(ADT.Table.ASCII) - dnl test_true(ADT.Table.table( ({ ({ "a", "b", 42 }), ({ "c", "b", 41 }), ({ "a", "a", 76 }) }), ({ "X", "Y", "z" }))->select("x", 2)->sum("Z")->distinct(0)->rsort("X")->rename(0, "fOo")->sort("foO")->cast("array"), ({ ({ "a", 118 }), ({ "c", 41 }) })) + test_true(ADT.Table.table) + test_true(ADT.Table.ASCII) + test_true(ADT.Table.table( ({ ({ "a", "b", 42 }), ({ "c", "b", 41 }), ({ "a", "a", 76 }) }), ({ "X", "Y", "z" }))->select("x", 2)->sum("Z")->distinct(0)->rsort("X")->rename(0, "fOo")->sort("foO")->cast("array"), ({ ({ "a", 118 }), ({ "c", 41 }) }))