Mercurial > vim
view src/testdir/test_shift.vim @ 27611:e311a80f8cbe v8.2.4332
patch 8.2.4332: Vim9: incomplete test for existing script variable in block
Commit: https://github.com/vim/vim/commit/dce2441a603f2c9343a4a46091283a32420d80a2
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Feb 8 20:35:30 2022 +0000
patch 8.2.4332: Vim9: incomplete test for existing script variable in block
Problem: Vim9: incomplete test for existing script variable in block.
Solution: Add a couple more tests. Fix uncovered problem.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 08 Feb 2022 21:45:03 +0100 |
parents | 08940efa6b4e |
children |
line wrap: on
line source
" Test shifting lines with :> and :< source check.vim func Test_ex_shift_right() set shiftwidth=2 " shift right current line. call setline(1, range(1, 5)) 2 > 3 >> call assert_equal(['1', \ ' 2', \ ' 3', \ '4', \ '5'], getline(1, '$')) " shift right with range. call setline(1, range(1, 4)) 2,3>> call assert_equal(['1', \ ' 2', \ ' 3', \ '4', \ '5'], getline(1, '$')) " shift right with range and count. call setline(1, range(1, 4)) 2>3 call assert_equal(['1', \ ' 2', \ ' 3', \ ' 4', \ '5'], getline(1, '$')) bw! set shiftwidth& endfunc func Test_ex_shift_left() set shiftwidth=2 call setline(1, range(1, 5)) %>>> " left shift current line. 2< 3<< 4<<<<< call assert_equal([' 1', \ ' 2', \ ' 3', \ '4', \ ' 5'], getline(1, '$')) " shift right with range. call setline(1, range(1, 5)) %>>> 2,3<< call assert_equal([' 1', \ ' 2', \ ' 3', \ ' 4', \ ' 5'], getline(1, '$')) " shift right with range and count. call setline(1, range(1, 5)) %>>> 2<<3 call assert_equal([' 1', \ ' 2', \ ' 3', \ ' 4', \ ' 5'], getline(1, '$')) bw! set shiftwidth& endfunc func Test_ex_shift_rightleft() CheckFeature rightleft set shiftwidth=2 rightleft call setline(1, range(1, 4)) 2,3<< call assert_equal(['1', \ ' 2', \ ' 3', \ '4'], getline(1, '$')) 3,4> call assert_equal(['1', \ ' 2', \ ' 3', \ '4'], getline(1, '$')) bw! set rightleft& shiftwidth& endfunc func Test_ex_shift_errors() call assert_fails('><', 'E488:') call assert_fails('<>', 'E488:') call assert_fails('>!', 'E477:') call assert_fails('<!', 'E477:') call assert_fails('2,1>', 'E493:') call assert_fails('2,1<', 'E493:') endfunc " vim: shiftwidth=2 sts=2 expandtab