diff options
| author | Yegappan Lakshmanan <yegappan@yahoo.com> | 2024-05-22 16:45:04 +0200 |
|---|---|---|
| committer | Christian Brabandt <cb@256bit.org> | 2024-05-22 16:45:04 +0200 |
| commit | 25536f415eab5a90d68b3c689c66a72803cd8e5d (patch) | |
| tree | 1910f156801d4389aff3bd5c91569f30b5295c13 /src/list.c | |
| parent | 52a6f348874778cf315b47d9e8b5f818f4b97277 (diff) | |
patch 9.1.0431: eval.c is too longv9.1.0431
Problem: eval.c is too long
Solution: Move garbage collection code to new gc.c file
(Yegappan Lakshmanan)
closes: #14824
Signed-off-by: Yegappan Lakshmanan <yegappan@yahoo.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
Diffstat (limited to 'src/list.c')
| -rw-r--r-- | src/list.c | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/src/list.c b/src/list.c index e9f1ae3206..9479b4b6ab 100644 --- a/src/list.c +++ b/src/list.c @@ -3194,4 +3194,28 @@ f_reduce(typval_T *argvars, typval_T *rettv) blob_reduce(argvars, &argvars[1], rettv); } +/* + * slice() function + */ + void +f_slice(typval_T *argvars, typval_T *rettv) +{ + if (in_vim9script() + && ((argvars[0].v_type != VAR_STRING + && argvars[0].v_type != VAR_LIST + && argvars[0].v_type != VAR_BLOB + && check_for_list_arg(argvars, 0) == FAIL) + || check_for_number_arg(argvars, 1) == FAIL + || check_for_opt_number_arg(argvars, 2) == FAIL)) + return; + + if (check_can_index(&argvars[0], TRUE, FALSE) != OK) + return; + + copy_tv(argvars, rettv); + eval_index_inner(rettv, TRUE, argvars + 1, + argvars[2].v_type == VAR_UNKNOWN ? NULL : argvars + 2, + TRUE, NULL, 0, FALSE); +} + #endif // defined(FEAT_EVAL) |