pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
1998-04-30
1998-04-30 03:44:11 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>
ebb0b42e51ea084b7287ca4e552d29681258d16f (
7
lines) (+
4
/-
3
)
[
Show
|
Annotate
]
Branch:
7.9
bugfix
Rev: src/testsuite.in:1.102
1:
-
stest_true([["$Id: testsuite.in,v 1.
101
1998/04/
28
22
:
59
:11 hubbe Exp $"]])
+
stest_true([["$Id: testsuite.in,v 1.
102
1998/04/
30
03
:
44
:11 hubbe Exp $"]])
cond([[all_constants()->_verify_internals]], [[ test_do(_verify_internals())
569:
test_do(add_constant("mtest_m"); add_constant("mtest_i"); ) test_do(add_constant("mtest_m2"); add_constant("mtest_i2"); )
-
define(MTEST,[[test_equal([[mkmultiset(indices(allocate($1)))]],[[mkmultiset(reverse(indices(allocate($1))))]])]])
+
define(
[[
MTEST
]]
,[[test_equal([[mkmultiset(indices(allocate($1)))]],[[mkmultiset(reverse(indices(allocate($1))))]])]])
MTEST(0) MTEST(1)
702:
test_do(add_constant("mtest_m"); add_constant("mtest_i"); add_constant("mtest_v");) test_do(add_constant("mtest_m2"); add_constant("mtest_i2"); add_constant("mtest_v2");)
-
define(MTEST,[[test_equal([[mkmapping(indices(allocate($1)),reverse(indices(allocate($1))))]],[[mkmapping(reverse(indices(allocate($1))),indices(allocate($1)))]])]])
+
define(
[[
MTEST
]]
,[[test_equal([[mkmapping(indices(allocate($1)),reverse(indices(allocate($1))))]],[[mkmapping(reverse(indices(allocate($1))),indices(allocate($1)))]])]])
MTEST(0) MTEST(1)