1
0
forked from aniani/vim
Files
vim/src/testdir/test_spellrare.vim
Yegappan Lakshmanan 4776e64e72 patch 9.1.0419: eval.c not sufficiently tested
Problem:  eval.c not sufficiently tested
Solution: Add a few more additional tests for eval.c,
          (Yegappan Lakshmanan)

closes: #14799

Signed-off-by: Yegappan Lakshmanan <yegappan@yahoo.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
2024-05-19 09:06:50 +02:00

62 lines
1.4 KiB
VimL

" Test spell checking
source check.vim
CheckFeature spell
" Test spellbadword() with argument, specifically to move to "rare" words
" in normal mode.
func Test_spellrareword()
set spell
" Create a small word list to test that spellbadword('...')
" can return ['...', 'rare'].
let lines =<< trim END
foo
foobar/?
foobara/?
END
call writefile(lines, 'Xwords', 'D')
mkspell! Xwords.spl Xwords
set spelllang=Xwords.spl
call assert_equal(['foobar', 'rare'], spellbadword('foo foobar'))
new
call setline(1, ['foo', '', 'foo bar foo bar foobara foo foo foo foobar', '', 'End'])
set spell wrapscan
normal ]s
call assert_equal('foo', expand('<cword>'))
normal ]s
call assert_equal('bar', expand('<cword>'))
normal ]r
call assert_equal('foobara', expand('<cword>'))
normal ]r
call assert_equal('foobar', expand('<cword>'))
normal ]r
call assert_equal('foobara', expand('<cword>'))
normal 2]r
call assert_equal('foobara', expand('<cword>'))
normal [r
call assert_equal('foobar', expand('<cword>'))
normal [r
call assert_equal('foobara', expand('<cword>'))
normal [r
call assert_equal('foobar', expand('<cword>'))
normal 2[r
call assert_equal('foobar', expand('<cword>'))
bwipe!
set nospell
call delete('Xwords.spl')
set spelllang&
set spell&
" set 'encoding' to clear the word list
set encoding=utf-8
endfunc
" vim: shiftwidth=2 sts=2 expandtab