pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
1998-04-24
1998-04-24 00:41:10 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
694bb1fbd8902fefc3fe4d693d0a88e91fffacbf (
21
lines) (+
12
/-
9
)
[
Show
|
Annotate
]
Branch:
7.9
more tests
Rev: src/testsuite.in:1.96
1:
-
test_true([["$Id: testsuite.in,v 1.
95
1998/04/
20
02
:
37:
41 hubbe Exp $"]])
-
cond([[_verify_internals]],
+
test_true([["$Id: testsuite.in,v 1.
96
1998/04/
24
00
:
41
:
10
hubbe Exp $"]])
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])
17:
test_true([[stringp(#string "Makefile")]]) test_any([[class Bar { array(int) foo = ({}); }; class Foo { inherit Bar; array(int) foo = ({1}); }; return sizeof(Foo()->foo);]],1)
+
test_do(_static_modules())
+
test_compile_any([[import Stdio; class x { string y() { read_file("foo"); } }]])
test_compile([[Stdio.File foo=Stdio.File();]]) test_compile([[class { Stdio.File foo=Stdio.File(); }]]) test_compile_any([[void foo(Stdio.FILE f) {}]])
253:
test_true(mappingp(localtime(0))) ]])
-
cond([[_verify_internals]],
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])
489:
test_any([[multiset m=(<>); m[m]=1; gc(); m=0; return gc() > 0; ]],1); ]])
-
cond([[_verify_internals]],
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])
1145:
test_any(int e;string t=""; for(e=0;e<10;e++) switch(e) { default: t+=e; case 4..8: } return t,"01239") test_any([[float e,q; q=0.0; for(e=0.1;e<10.0;e+=1.0) switch(e) { default: q+=e; case 4.0..8.0: } return q]],0.1+1.1+2.1+3.1+8.1+9.1)
-
cond([[_verify_internals]],
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])
1652:
// - aggregate_mapping test_true(multisetp(aggregate_multiset()))
-
// - all_
efuns
+
// - all_
constants
test_true(mappingp(all_constants())) test_true(all_constants()["all_constants"]) test_eq(all_constants()["all_constants"],all_constants)
1772:
// - explode test_equal(({"a","b","c",}), "anna bnna c"/"nna ") test_equal(({"","",}),"hej"/"hej")
-
test_equal((
{"",}
),""/"hej")
+
test_equal((
{}
),""/"hej")
// - fork() // FIXME: add tests for fork
-
cond([[_verify_internals]],
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])
2059:
test_equal(Array.everynth("0123456789"/"",3,4), ({ "4", "7"}))
-
cond([[_verify_internals]],
+
cond([[
all
_
constants()->_
verify_internals]],
[[ test_do(_verify_internals()) ]])