pike.git/
src/
testsuite.in
Branch:
Tag:
Non-build tags
All tags
No tags
2000-02-05
2000-02-05 04:02:59 by Martin Stjernholm <mast@lysator.liu.se>
d356f5747c60fff03e19ed92dca4ee5655fce57b (
11
lines) (+
10
/-
1
)
[
Show
|
Annotate
]
Branch:
7.9
Test search with start value on mappings.
Rev: src/testsuite.in:1.268
1:
-
test_true([["$Id: testsuite.in,v 1.
267
2000/02/
04
20
:
16
:
18
hubbe
Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
268
2000/02/
05
04:
02
:
59
mast
Exp $"]]);
cond([[all_constants()->_verify_internals]], [[
3891:
search(m, 4711); ]])
+
test_any_equal([[
+
mapping m = (["foo": "bar", "bar": "gnu", "gnu": "bar"]);
+
array a = ({});
+
a += ({search (m, "bar")});
+
a += ({search (m, "bar", a[-1])});
+
a += ({search (m, "bar", a[-1])});
+
return sort (a);
+
]], ({0, "foo", "gnu"}))
// test large searches (find string, size, pattern) define(test_search,[[