pike.git/ src/ testsuite.in

1999-08-20

1999-08-20 05:08:28 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 8aae6dfebfa73a911ed559ed9890dc5e9d9cc220 (19 lines) (+10/-9) ^{[ Show | Annotate ]}
  Branch: 7.9

some bugfixes for modifiers

Rev: src/.cvsignore:1.17
Rev: src/Makefile.in:1.148
Rev: src/language.yacc:1.122
Rev: src/program.c:1.133
Rev: src/program.h:1.55
Rev: src/testsuite.in:1.189

1: - stest_true([["$Id: testsuite.in,v 1.188 1999/08/17 03:17:57 mast Exp $"]]) + stest_true([["$Id: testsuite.in,v 1.189 1999/08/20 05:08:28 hubbe Exp $"]])   cond([[all_constants()->_verify_internals]],   [[    test_do(_verify_internals())
603:    ({([1:1]),([1:1,2:12]),([1:1,2:13])}))   test_any_equal(array a = ({(["a":10]),(["b":11]),([])}); map(a,`->=,"a",1); return a;,    ({(["a":1]),(["a":1,"b":11]),(["a":1])})) - test_eval_error(array a = ({(["i":1]),([])}); a["i"];) + dnl test_eval_error(array a = ({(["i":1]),([])}); a["i"];)   test_eval_error(array a = ({(["i":1]),([])}); a["i"] = 7;)   test_any([[    class A {int i = 10; int ii(){return i;}};
1603:   test_eq(1 ^ 1,0)   test_eq(4 ^ 1,5)   test_eq(1 ^ 9,8) - test_equal( ({1,2,3,4,4}) ^ ({3,5,6}), ({1,2,4,4,5,6})) + test_equal( Array.sort( ({1,2,3,4,4}) ^ ({3,5,6}) ) , ({1,2,4,4,5,6}))   test_equal( (<4,5,6>) ^ (<5,5,5>), (<4,5,5,6>) )   test_equal( ([-4:8,8:7]) ^ ([3:3,8:3]), ([-4:8,3:3]) )   
3549:   test_compile_error_low(class A {nomask int f(){}} class B {inherit A; int f(){}})   test_compile_error_low(class A {nomask int f(){}} class B {inherit A; nomask int f(){}})    - test_compile_error_low(class A {int v;} class B {inherit A; int v(){}}) - test_compile_error_low(class A {public int v;} class B {inherit A; int v(){}}) - test_compile_error_low(class A {static int v;} class B {inherit A; int v(){}}) + test_compile(class A {int v;}; class B {inherit A; int v(){}}) + test_compile(class A {public int v;}; class B {inherit A; int v(){}}) + test_compile(class A {static int v;}; class B {inherit A; int v(){}})   test_compile_any(class A {private int v;} class B {inherit A; int v(){}})   test_compile_error_low(class A {final int v;} class B {inherit A; int v(){}})   test_compile_error_low(class A {nomask int v;} class B {inherit A; int v(){}})
3875:   test_any([[    class A {int v=0; int a(){return v;}};    class B {inherit A; local int v; int b(){return v;}}; -  class C {inherit B; int v=2; int c(){return v;}} +  class C {inherit B; int v=2; int c(){return v;}};    return C()->a();   ]], 2)   test_any([[    class A {int v=0; int a(){return v;}};    class B {inherit A; local int v; int b(){return v;}}; -  class C {inherit B; int v=2; int c(){return v;}} +  class C {inherit B; int v=2; int c(){return v;}};    return C()->b();   ]], 0)   test_any([[    class A {int v=0; int a(){return v;}};    class B {inherit A; local int v=1; int b(){return v;}}; -  class C {inherit B; int v; int c(){return v;}} +  class C {inherit B; int v; int c(){return v;}};    return C()->c();   ]], 1)