Branch: Tag:

2004-04-14

2004-04-14 22:09:38 by Martin Stjernholm <mast@lysator.liu.se>

Added some more tests for the order in & on arrays.

Rev: src/testsuite.in:1.711

1: - test_true([["$Id: testsuite.in,v 1.710 2004/04/01 17:05:29 grubba Exp $"]]); + test_true([["$Id: testsuite.in,v 1.711 2004/04/14 22:09:38 mast Exp $"]]);      // This triggered a bug only if run sufficiently early.   test_compile_any([[#pike 7.2]])
6736:   test_equal( ({1,2,3,4,4}) & ({3,5,6}), ({3}))   test_equal( (<4,5,6>) & (<5,5,5>), (<5>) )   test_equal( ([-4:8,8:7]) & ([3:3,8:3]), ([8:3]) ) + test_equal(({1,2,1}) & ({1,2}), ({1,2})) + test_equal(({2,1,2}) & ({1,2}), ({2,1})) + test_equal(({1,2,1,2,2}) & ({1,2}), ({1,2})) + test_equal(({2,1,2,1,2}) & ({1,2}), ({2,1}))      // testing ^   test_eq(0 ^ 0,0)