pike.git / src / testsuite.in

version» Context lines:

pike.git/src/testsuite.in:1: - test_true([["$Id: testsuite.in,v 1.694 2003/11/25 22:15:35 mast Exp $"]]); + test_true([["$Id: testsuite.in,v 1.695 2004/01/15 17:48:59 nilsson Exp $"]]);      // This triggered a bug only if run sufficiently early.   test_compile_any([[#pike 7.2]])   test_compile_any([[#pike 7.4]])   test_compile_any([[#pike 7.0]])   test_compile_any([[#pike 0.6]])      cond([[all_constants()->_verify_internals]],   [[    test_do(_verify_internals())
pike.git/src/testsuite.in:404:   test_compile_error([[ float b=17.0; string a; a=b*42; ]])   test_compile_error([[ float b=17.0; string a; a=b*42.0; ]])      test_compile_error([[class F {inherit master()->dirnode;};]]);      // Warnings      test_compile_warning([[ int *a ]])   test_compile_warning([[ int|float *a ]])   test_compile_warning([[ [mixed]1 ]]) + test_compile_warning([[ +  class A { int a = 6; }; +  class B { +  constant a = 5; +  inherit A; +  }; + ]])      //      test_any([[    class Foo {    constant zero = 0;    mapping(string:array(int)) m;    string foo() { return sprintf("%O", typeof(m[""][zero])); }    };    return Foo()->foo();
pike.git/src/testsuite.in:2955:    }    class X {    constant s = "X";    inherit A;    class Y {    inherit B: A;    constant s = "Y";    mixed f() {return X::s + X::A::s + Y::s + Y::A::s + A::s;}    }    } -  int a() {return X()->Y()->f() == "XAYBB";} +  +  int a() { +  // Ignore the warning we get from overloading a constant with a string. +  master()->get_inhibit_compile_errors()->warning=0; +  return X()->Y()->f() == "XAYBB"; +  }   ]])      test_program([[    class A {    string s = "A";    }    inherit A;    class X {    constant s = "X";    mixed f (string s) {return s + X::s + A::s;}
pike.git/src/testsuite.in:10038:   test_compile_any(class A {mixed f(){}} class B {inherit A; int f(){}})   test_compile_any(class A {void f(){}} class B {inherit A; void f(int a){}})   test_compile_any(class A {void f(int a){}} class B {inherit A; void f(float a){}})   test_compile_any(class A {void f(int a){}} class B {inherit A; void f(mixed a){}})   test_compile_any(class A {void f(mixed a){}} class B {inherit A; void f(int a){}})   test_compile_error_any(class A {final int f(){}} class B {inherit A; int f(){}})   test_compile_error_any(class A {final int f(){}} class B {inherit A; final int f(){}})   test_compile_error_any(class A {nomask int f(){}} class B {inherit A; int f(){}})   test_compile_error_any(class A {nomask int f(){}} class B {inherit A; nomask int f(){}})    - 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_warning(class A {int v;}; class B {inherit A; int v(){}}) + test_compile_warning(class A {public int v;}; class B {inherit A; int v(){}}) + test_compile_warning(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_any(class A {final int v;} class B {inherit A; int v(){}})   test_compile_error_any(class A {nomask int v;} class B {inherit A; int v(){}})   test_compile_any(class A {local int v;} class B {inherit A; int v(){}})   test_compile_any(class A {inline int v;} class B {inherit A; int v(){}})      test_compile_error_any(class A {int f(){}} class B {inherit A; int f;})   test_compile_error_any(class A {public int f(){}} class B {inherit A; int f;})   test_compile_error_any(class A {static int f(){}} class B {inherit A; int f;})   test_compile_any(class A {private int f(){}} class B {inherit A; int f;})