comparison src/testdir/test_functions.vim @ 34620:abc7a647c83b v9.1.0199

patch 9.1.0199: Not enough tests for the slice() function Commit: https://github.com/vim/vim/commit/ad38769030b5fa86aa0e8f1f0b4266690dfad4c9 Author: zeertzjq <zeertzjq@outlook.com> Date: Sat Mar 23 08:23:48 2024 +0100 patch 9.1.0199: Not enough tests for the slice() function Problem: Not enough tests for the slice() function. Solution: Test with multibyte chars, and in both Legacy and Vim9 script. Update docs to be clearer about how it treats composing chars. (zeertzjq) closes: #14275 Signed-off-by: zeertzjq <zeertzjq@outlook.com> Signed-off-by: Christian Brabandt <cb@256bit.org>
author Christian Brabandt <cb@256bit.org>
date Sat, 23 Mar 2024 08:30:06 +0100
parents 034445b3af10
children d4fb6ea26ae4
comparison
equal deleted inserted replaced
34619:f9ca94f9d31c 34620:abc7a647c83b
3951 let expected = ['Xtestglob/foo/bar/src/foo.cpp', 'Xtestglob/foo/bar/src/foo.h', 'Xtestglob/foo/bar/src/foo.sh'] 3951 let expected = ['Xtestglob/foo/bar/src/foo.cpp', 'Xtestglob/foo/bar/src/foo.h', 'Xtestglob/foo/bar/src/foo.sh']
3952 call assert_equal(expected, sort(glob('Xtestglob/**/foo.*', 0, 1))) 3952 call assert_equal(expected, sort(glob('Xtestglob/**/foo.*', 0, 1)))
3953 call delete('Xtestglob', 'rf') 3953 call delete('Xtestglob', 'rf')
3954 endfunc 3954 endfunc
3955 3955
3956 " Tests for the slice() function.
3957 func Test_slice()
3958 let lines =<< trim END
3959 call assert_equal([1, 2, 3, 4, 5], slice(range(6), 1))
3960 call assert_equal([2, 3, 4, 5], slice(range(6), 2))
3961 call assert_equal([2, 3], slice(range(6), 2, 4))
3962 call assert_equal([0, 1, 2, 3], slice(range(6), 0, 4))
3963 call assert_equal([1, 2, 3], slice(range(6), 1, 4))
3964 call assert_equal([1, 2, 3, 4], slice(range(6), 1, -1))
3965 call assert_equal([1, 2], slice(range(6), 1, -3))
3966 call assert_equal([1], slice(range(6), 1, -4))
3967 call assert_equal([], slice(range(6), 1, -5))
3968 call assert_equal([], slice(range(6), 1, -6))
3969
3970 call assert_equal(0z1122334455, slice(0z001122334455, 1))
3971 call assert_equal(0z22334455, slice(0z001122334455, 2))
3972 call assert_equal(0z2233, slice(0z001122334455, 2, 4))
3973 call assert_equal(0z00112233, slice(0z001122334455, 0, 4))
3974 call assert_equal(0z112233, slice(0z001122334455, 1, 4))
3975 call assert_equal(0z11223344, slice(0z001122334455, 1, -1))
3976 call assert_equal(0z1122, slice(0z001122334455, 1, -3))
3977 call assert_equal(0z11, slice(0z001122334455, 1, -4))
3978 call assert_equal(0z, slice(0z001122334455, 1, -5))
3979 call assert_equal(0z, slice(0z001122334455, 1, -6))
3980
3981 call assert_equal('12345', slice('012345', 1))
3982 call assert_equal('2345', slice('012345', 2))
3983 call assert_equal('23', slice('012345', 2, 4))
3984 call assert_equal('0123', slice('012345', 0, 4))
3985 call assert_equal('123', slice('012345', 1, 4))
3986 call assert_equal('1234', slice('012345', 1, -1))
3987 call assert_equal('12', slice('012345', 1, -3))
3988 call assert_equal('1', slice('012345', 1, -4))
3989 call assert_equal('', slice('012345', 1, -5))
3990 call assert_equal('', slice('012345', 1, -6))
3991
3992 #" Composing chars are treated as a part of the preceding base char.
3993 call assert_equal('β̳́γ̳̂δ̳̃ε̳̄ζ̳̅', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1))
3994 call assert_equal('γ̳̂δ̳̃ε̳̄ζ̳̅', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(2))
3995 call assert_equal('γ̳̂δ̳̃', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(2, 4))
3996 call assert_equal('ὰ̳β̳́γ̳̂δ̳̃', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(0, 4))
3997 call assert_equal('β̳́γ̳̂δ̳̃', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, 4))
3998 call assert_equal('β̳́γ̳̂δ̳̃ε̳̄', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, -1))
3999 call assert_equal('β̳́γ̳̂', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, -3))
4000 call assert_equal('β̳́', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, -4))
4001 call assert_equal('', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, -5))
4002 call assert_equal('', 'ὰ̳β̳́γ̳̂δ̳̃ε̳̄ζ̳̅'->slice(1, -6))
4003 END
4004 call v9.CheckLegacyAndVim9Success(lines)
4005 endfunc
4006
3956 " vim: shiftwidth=2 sts=2 expandtab 4007 " vim: shiftwidth=2 sts=2 expandtab