pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2004-12-19
2004-12-19 16:25:36 by Henrik Grubbström (Grubba) <grubba@grubba.org>
785490ecfc987256cad260fc7336868da927f149 (
23
lines) (+
21
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Updated to know about inherit::this_program.
Rev: src/testsuite.in:1.750
1:
START_MARKER
-
test_true([["$Id: testsuite.in,v 1.
749
2004/12/
15
02
:
44
:
41
mast
Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
750
2004/12/
19
16
:
25
:
36
grubba
Exp $"]]);
// This triggered a bug only if run sufficiently early. test_compile_any([[#pike 7.2]])
1708:
test_compile_error_any([[ class A {} class B {
-
inherit A;
+
inherit A
:C
;
mixed f() {return A::this_program;} } ]])
-
+
test_compile_error_any([[
+
#pike 7.6
+
class A {}
+
class B {
+
inherit A:C;
+
mixed f() {return C::this_program;}
+
}
+
]])
+
+
test_any([[
+
class A {};
+
class B {
+
inherit A:C;
+
mixed f() {return C::this_program;}
+
};
+
return B()->f() == A;
+
]], 1)
+
dnl test_compile_error(0()) test_compile_error(1()) test_compile_error(""())