pike.git
/
src
/
testsuite.in
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/testsuite.in:2234:
test_any([[ class A {}; class B { inherit A:C; mixed f() {return C::this_program;} }; return B()->f() == A; ]], 1)
+
test_any([[
+
class A {
+
class Nested {
+
constant nested = 1;
+
}
+
};
+
class B {
+
inherit A;
+
class Nested {
+
inherit ::this_program;
+
constant other = 2;
+
}
+
};
+
object n = B()->Nested();
+
return n->nested + n->other;
+
]], 3)
+
dnl test_compile_error(0()) test_compile_error(1()) test_compile_error(""()) test_compile_error(([])()) test_compile_error(([])()) test_any([[ class X { int y; class Z { void destroy() { y++; } } }; X x=X(); destruct(x->Z()); return x->y;]],1) test_eval_error([[ class Z { int destroy() { return 1/y; } }(); ]]) test_any([[ class X { int y; class Z { protected void destroy() { y++; } } }; X x=X(); destruct(x->Z()); return x->y;]],1)