diff options
| author | Boris Kolpackov <boris@codesynthesis.com> | 2022-09-29 13:12:19 +0200 |
|---|---|---|
| committer | Boris Kolpackov <boris@codesynthesis.com> | 2022-09-29 14:14:51 +0200 |
| commit | 785087aa43cf962855724b8fa5da393022204a14 (patch) | |
| tree | 4a24ca94679d72cf160d2ef528bba2c8dac45cb4 /tests/function/builtin/testscript | |
| parent | d7cb460833e6dde3e3b958b993eee3eee4ae3bf0 (diff) | |
Add $find(<sequence>, <value>), $find_index(<sequence>, <value>) functions
The $find() function returns true if the sequence contains the specified
value. The $find_index() function returns the index of the first element
in the sequence that is equal to the specified value or $size(<sequence>)
if none is found. For string sequences, it's possible to request case-
insensitive comparison with a flag.
Diffstat (limited to 'tests/function/builtin/testscript')
| -rw-r--r-- | tests/function/builtin/testscript | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/function/builtin/testscript b/tests/function/builtin/testscript index bbfd4e5..3c430d7 100644 --- a/tests/function/builtin/testscript +++ b/tests/function/builtin/testscript @@ -100,6 +100,20 @@ $* <'print $sort([uint64s] 0 2 1 000, dedup)' >'0 1 2' : dedup } +: find +: +{ + $* <'print $find([uint64s] 1 2 3, 2)' >'true' : basics-true + $* <'print $find([uint64s] 1 2 3, 0)' >'false' : basics-false +} + +: find_index +: +{ + $* <'print $find_index([int64s] -1 -2 -3, -2)' >'1' : basics-true + $* <'print $find_index([int64s] -1 -2 -3, 0)' >'3' : basics-false +} + : getenv : { |