pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2001-07-28
2001-07-28 07:12:18 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
fa7892cc89bf4d99b82050e78cadff35e7362bda (
18
lines) (+
17
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
test for recent bug in F_COND_RECUR
Rev: src/testsuite.in:1.446
1:
-
test_true([["$Id: testsuite.in,v 1.
445
2001/07/
15
21
:
16
:
04
hubbe Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
446
2001/07/
28
07
:
12
:
18
hubbe Exp $"]]);
cond([[all_constants()->_verify_internals]], [[
36:
test_eq(16, 0b10000); test_eq(-16, -0b10000);
+
test_any([[
+
class X
+
{
+
int Ack(int M, int N) {
+
if (M == 0) return( N + 1 );
+
if (N == 0) return( Ack(M - 1, 1) );
+
return( Ack(M - 1, Ack(M, (N - 1))) );
+
}
+
};
+
+
class Y { inherit X; };
+
+
return Y()->Ack(2,2);
+
]],7)
+
test_eval_error([[mixed x; return mkmapping(x,x)]]); test_eval_error([[class Foo {