Mercurial > vim
view src/testdir/test_shift.vim @ 27287:9f72ec92d361 v8.2.4172
patch 8.2.4172: filetype detection for BASIC is not optimal
Commit: https://github.com/vim/vim/commit/6517f14165cdebf83a07ab9d4aeeb102b4e16e92
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Jan 21 14:55:13 2022 +0000
patch 8.2.4172: filetype detection for BASIC is not optimal
Problem: Filetype detection for BASIC is not optimal.
Solution: Improve BASIC filetype detection. (Doug Kearns)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 21 Jan 2022 16:00:05 +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