neovim/test/old/testdir/test_spellrare.vim
zeertzjq 30f85fcb7f vim-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: vim/vim#14799

4776e64e72

Co-authored-by: Yegappan Lakshmanan <yegappan@yahoo.com>
2024-07-31 10:49:57 +08: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