vim: src/testdir/test_edit.vim annotate

annotate src/testdir/test_edit.vim @ 29340:fba9e366ced4 v9.0.0013

patch 9.0.0013: reproducing memory access errors can be difficult Commit: https://github.com/vim/vim/commit/fa4873ccfc10e0f278dc46f39d00136fab059b19 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Jun 30 22:13:59 2022 +0100 patch 9.0.0013: reproducing memory access errors can be difficult Problem: Reproducing memory access errors can be difficult. Solution: When testing, copy each line to allocated memory, so that valgrind can detect accessing memory before and/or after it. Fix uncovered problems.

author	Bram Moolenaar <Bram@vim.org>
date	Thu, 30 Jun 2022 23:15:03 +0200
parents	6b4c1ca1436e
children	2a327999c05c

rev	line source
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Test for edit functions
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	2
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	3 if exists("+t_kD")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	4 let &t_kD="[3;*~"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	5 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	6
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	7 source check.vim
c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	8
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	9 " Needed for testing basic rightleft: Test_edit_rightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	10 source view_util.vim
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	11
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	12 " Needs to come first until the bug in getchar() is
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	13 " fixed: https://groups.google.com/d/msg/vim_dev/fXL9yme4H4c/bOR-U6_bAQAJ
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	14 func Test_edit_00b()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	15 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	16 call setline(1, ['abc '])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	17 inoreabbr <buffer> h here some more
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	18 call cursor(1, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	19 " <c-l> expands the abbreviation and ends insertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	20 call feedkeys(":set im\<cr> h\<c-l>:set noim\<cr>", 'tix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	21 call assert_equal(['abc here some more '], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	22 iunabbr <buffer> h
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	23 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	24 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	25
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	26 func Test_edit_01()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	27 " set for Travis CI?
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	28 " set nocp noesckeys
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	29 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	30 " 1) empty buffer
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	31 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	32 " 2) delete in an empty line
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	33 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	34 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	35 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	36 " 3) delete one character
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	37 call setline(1, 'a')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	38 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	39 call assert_equal([''], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	40 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	41 " 4) delete a multibyte character
15607 2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	42 call setline(1, "\u0401")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	43 call feedkeys("i\<del>\<esc>", 'tnix')
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	44 call assert_equal([''], getline(1,'$'))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	45 %d
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	46 " 5.1) delete linebreak with 'bs' option containing eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	47 let _bs=&bs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	48 set bs=eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	49 call setline(1, ["abc def", "ghi jkl"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	50 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	51 call feedkeys("A\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	52 call assert_equal(['abc defghi jkl'], getline(1, 2))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	53 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	54 " 5.2) delete linebreak with backspace option w/out eol
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	55 set bs=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	56 call setline(1, ["abc def", "ghi jkl"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	57 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	58 call feedkeys("A\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	59 call assert_equal(["abc def", "ghi jkl"], getline(1, 2))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	60 let &bs=_bs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	61 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	62 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	63
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	64 func Test_edit_02()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	65 " Change cursor position in InsertCharPre command
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	66 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	67 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	68 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	69 fu! DoIt(...)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	70 call cursor(1, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	71 if len(a:000)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	72 let v:char=a:1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	73 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	74 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	75 au InsertCharPre <buffer> :call DoIt('y')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	76 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	77 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	78 " Setting <Enter> in InsertCharPre
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	79 au! InsertCharPre <buffer> :call DoIt("\n")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	80 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	81 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	82 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	83 call assert_equal(['abc', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	84 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	85 au! InsertCharPre
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	86 " Change cursor position in InsertEnter command
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	87 " 1) when setting v:char, keeps changed cursor position
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	88 au! InsertEnter <buffer> :call DoIt('y')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	89 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	90 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	91 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	92 call assert_equal(['abxc'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	93 " 2) when not setting v:char, restores changed cursor position
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	94 au! InsertEnter <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	95 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	96 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	97 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	98 call assert_equal(['xabc'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	99 au! InsertEnter
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	100 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	101 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	102 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	103
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	104 func Test_edit_03()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	105 " Change cursor after <c-o> command to end of line
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	106 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	107 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	108 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	109 call feedkeys("i\<c-o>$y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	110 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	111 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	112 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	113 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	114 call feedkeys("i\<c-o>80\|y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	115 call assert_equal(['abcy'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	116 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	117 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	118 call feedkeys("Ad\<c-o>:s/$/efg/\<cr>hij", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	119 call assert_equal(['hijabcdefg'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	120 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	121 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	122
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	123 func Test_edit_04()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	124 " test for :stopinsert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	125 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	126 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	127 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	128 call feedkeys("i\<c-o>:stopinsert\<cr>$", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	129 call feedkeys("aX\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	130 call assert_equal(['abcX'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	131 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	132 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	133 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	134
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	135 func Test_edit_05()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	136 " test for folds being opened
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	137 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	138 call setline(1, ['abcX', 'abcX', 'zzzZ'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	139 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	140 set foldmethod=manual foldopen+=insert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	141 " create fold for those two lines
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	142 norm! Vjzf
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	143 call feedkeys("$ay\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	144 call assert_equal(['abcXy', 'abcX', 'zzzZ'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	145 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	146 call setline(1, ['abcX', 'abcX', 'zzzZ'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	147 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	148 set foldmethod=manual foldopen-=insert
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	149 " create fold for those two lines
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	150 norm! Vjzf
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	151 call feedkeys("$ay\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	152 call assert_equal(['abcXy', 'abcX', 'zzzZ'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	153 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	154 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	155 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	156
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	157 func Test_edit_06()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	158 " Test in diff mode
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	159 CheckFeature diff
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	160 CheckExecutable diff
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	161 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	162 call setline(1, ['abc', 'xxx', 'yyy'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	163 vnew
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	164 call setline(1, ['abc', 'zzz', 'xxx', 'yyy'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	165 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	166 diffthis
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	167 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	168 diffthis
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	169 wincmd p
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	170 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	171 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	172 call feedkeys("Ozzz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	173 call assert_equal(['abc', 'zzz', 'xxx', 'yyy'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	174 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	175 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	176 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	177
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	178 func Test_edit_07()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	179 " 1) Test with completion <c-l> when popupmenu is visible
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	180 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	181 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	182
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	183 func! ListMonths()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	184 call complete(col('.')-1, ['January', 'February', 'March',
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	185 \ 'April', 'May', 'June', 'July', 'August', 'September',
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	186 \ 'October', 'November', 'December'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	187 return ''
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	188 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	189 inoremap <buffer> <F5> <C-R>=ListMonths()<CR>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	190
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	191 call feedkeys("A\<f5>\<c-p>". repeat("\<down>", 6)."\<c-l>\<down>\<c-l>\<cr>", 'tx')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	192 call assert_equal(['July'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	193 " 1) Test completion when InsertCharPre kicks in
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	194 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	195 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	196 fu! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	197 if v:char=='u'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	198 let v:char='an'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	199 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	200 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	201 au InsertCharPre <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	202 call feedkeys("A\<f5>\<c-p>u\<cr>\<c-l>\<cr>", 'tx')
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	203 call assert_equal(["Jan\<c-l>",''], 1->getline('$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	204 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	205 call setline(1, 'J')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	206 call feedkeys("A\<f5>\<c-p>u\<down>\<c-l>\<cr>", 'tx')
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	207 call assert_equal(["January"], 1->getline('$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	208
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	209 delfu ListMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	210 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	211 iunmap <buffer> <f5>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	212 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	213 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	214
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	215 func Test_edit_08()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	216 " reset insertmode from i_ctrl-r_=
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	217 let g:bufnr = bufnr('%')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	218 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	219 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	220 call cursor(1, 4)
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	221 call feedkeys(":set im\<cr>ZZZ\<c-r>=setbufvar(g:bufnr,'&im', 0)\<cr>",'tnix')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	222 call assert_equal(['abZZZc'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	223 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	224 call assert_false(0, '&im')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	225 bw!
12696 6daad7ef16be patch 8.0.1226: edit and popup tests failing Christian Brabandt <cb@256bit.org> parents: 12654 diff changeset	226 unlet g:bufnr
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	227 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	228
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	229 func Test_edit_09()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	230 " test i_CTRL-\ combinations
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	231 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	232 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	233 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	234 " 1) CTRL-\ CTLR-N
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	235 call feedkeys(":set im\<cr>\<c-\>\<c-n>ccABC\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	236 call assert_equal(['ABC', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	237 call setline(1, ['ABC', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	238 " 2) CTRL-\ CTLR-G
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	239 call feedkeys("j0\<c-\>\<c-g>ZZZ\<cr>\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	240 call assert_equal(['ABC', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	241 call feedkeys("I\<c-\>\<c-g>YYY\<c-l>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	242 call assert_equal(['ABC', 'ZZZ', 'YYYdef', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	243 set noinsertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	244 " 3) CTRL-\ CTRL-O
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	245 call setline(1, ['ABC', 'ZZZ', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	246 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	247 call feedkeys("A\<c-o>ix", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	248 call assert_equal(['ABxC', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	249 call feedkeys("A\<c-\>\<c-o>ix", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	250 call assert_equal(['ABxCx', 'ZZZ', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	251 " 4) CTRL-\ a (should be inserted literally, not special after <c-\>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	252 call setline(1, ['ABC', 'ZZZ', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	253 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	254 call feedkeys("A\<c-\>a", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	255 call assert_equal(["ABC\<c-\>a", 'ZZZ', 'def', 'ghi'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	256 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	257 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	258
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	259 func Test_edit_11()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	260 " Test that indenting kicks in
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	261 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	262 set cindent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	263 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	264 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	265 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	266 call cursor(3, 1)
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	267 call feedkeys("\<Insert>/* comment */", 'tnix')
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	268 call assert_equal(['{', "\<tab>int c;", "/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	269 " added changed cindentkeys slightly
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	270 set cindent cinkeys+=*/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	271 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	272 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	273 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	274 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	275 call feedkeys("i/* comment */", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	276 call assert_equal(['{', "\<tab>int c;", "\<tab>/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	277 set cindent cinkeys+==end
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	278 call feedkeys("oend\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	279 call assert_equal(['{', "\<tab>int c;", "\<tab>/* comment */", "\tend", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	280 set cinkeys-==end
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	281 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	282 " Use indentexpr instead of cindenting
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	283 func! Do_Indent()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	284 if v:lnum == 3
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	285 return 3*shiftwidth()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	286 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	287 return 2*shiftwidth()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	288 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	289 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	290 setl indentexpr=Do_Indent() indentkeys+=*/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	291 call setline(1, ['{', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	292 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	293 call feedkeys("i\<c-f>int c;\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	294 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	295 call feedkeys("i/* comment */", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	296 call assert_equal(['{', "\<tab>\<tab>int c;", "\<tab>\<tab>\<tab>/* comment */"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	297 set cinkeys&vim indentkeys&vim
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	298 set nocindent indentexpr=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	299 delfu Do_Indent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	300 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	301 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	302
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	303 func Test_edit_11_indentexpr()
12551 a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	304 " Test that indenting kicks in
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	305 new
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	306 " Use indentexpr instead of cindenting
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	307 func! Do_Indent()
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	308 let pline=prevnonblank(v:lnum)
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	309 if empty(getline(v:lnum))
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	310 if getline(pline) =~ 'if\\|then'
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	311 return shiftwidth()
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	312 else
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	313 return 0
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	314 endif
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	315 else
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	316 return 0
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	317 endif
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	318 endfunc
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	319 setl indentexpr=Do_Indent() indentkeys+=0=then,0=fi
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	320 call setline(1, ['if [ $this ]'])
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	321 call cursor(1, 1)
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	322 call feedkeys("othen\<cr>that\<cr>fi", 'tnix')
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	323 call assert_equal(['if [ $this ]', "then", "\<tab>that", "fi"], getline(1, '$'))
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	324 set cinkeys&vim indentkeys&vim
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	325 set nocindent indentexpr=
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	326 delfu Do_Indent
26743 c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	327
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	328 " Using a script-local function
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	329 func s:NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	330 endfunc
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	331 set indentexpr=s:NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	332 call assert_equal(expand('<SID>') .. 'NewIndentExpr()', &indentexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	333 set indentexpr=<SID>NewIndentExpr()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	334 call assert_equal(expand('<SID>') .. 'NewIndentExpr()', &indentexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	335 set indentexpr&
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option Bram Moolenaar <Bram@vim.org> parents: 26592 diff changeset	336
12551 a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	337 bw!
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	338 endfunc
a69d3595d773 patch 8.0.1154: 'indentkeys' does not work properly Christian Brabandt <cb@256bit.org> parents: 11319 diff changeset	339
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	340 " Test changing indent in replace mode
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	341 func Test_edit_12()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	342 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	343 call setline(1, ["\tabc", "\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	344 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	345 call feedkeys("R^\<c-d>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	346 call assert_equal(["\tabc", "def"], getline(1, '$'))
17857 4935244c1128 patch 8.1.1925: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 16692 diff changeset	347 call assert_equal([0, 2, 2, 0], '.'->getpos())
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	348 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	349 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	350 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	351 call feedkeys("R^\<c-d>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	352 call assert_equal(["\tabc", "def"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	353 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	354 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	355 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	356 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	357 call feedkeys("R\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	358 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	359 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	360 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	361 10vnew
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	362 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	363 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	364 call feedkeys("R\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	365 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	366 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	367 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	368 set sw=4
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	369 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	370 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	371 call feedkeys("R\<c-t>\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	372 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	373 call assert_equal([0, 2, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	374 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	375 call setline(1, ["\tabc", "\t\tdef"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	376 call cursor(2, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	377 call feedkeys("R\<c-t>\<c-t>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	378 call assert_equal(["\tabc", "\t\t\tdef"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	379 call assert_equal([0, 2, 2, 0], getpos('.'))
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	380 set sw&
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	381
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	382 " In replace mode, after hitting enter in a line with tab characters,
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	383 " pressing backspace should restore the tab characters.
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	384 %d
20285 bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	385 setlocal autoindent backspace=2
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	386 call setline(1, "\tone\t\ttwo")
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	387 exe "normal ggRred\<CR>six" .. repeat("\<BS>", 8)
bce10d039e06 patch 8.2.0698: insert mode completion not fully tested Bram Moolenaar <Bram@vim.org> parents: 20229 diff changeset	388 call assert_equal(["\tone\t\ttwo"], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	389 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	390 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	391
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	392 func Test_edit_13()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	393 " Test smartindenting
28942 6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	394 new
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	395 set smartindent autoindent
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	396 call setline(1, ["\tabc"])
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	397 call feedkeys("A {\<cr>more\<cr>}\<esc>", 'tnix')
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	398 call assert_equal(["\tabc {", "\t\tmore", "\t}"], getline(1, '$'))
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	399 set smartindent& autoindent&
6cdf55afaae9 patch 8.2.4993: smart/C/lisp indenting is optional Bram Moolenaar <Bram@vim.org> parents: 28796 diff changeset	400 bwipe!
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	401
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	402 " Test autoindent removing indent of blank line.
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	403 new
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	404 call setline(1, ' foo bar baz')
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	405 set autoindent
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	406 exe "normal 0eea\<CR>\<CR>\<Esc>"
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	407 call assert_equal(" foo bar", getline(1))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	408 call assert_equal("", getline(2))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	409 call assert_equal(" baz", getline(3))
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	410 set autoindent&
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	411
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	412 " pressing <C-U> to erase line should keep the indent with 'autoindent'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	413 set backspace=2 autoindent
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	414 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	415 exe "normal i\tone\<CR>three\<C-U>two"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	416 call assert_equal(["\tone", "\ttwo"], getline(1, '$'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	417 set backspace& autoindent&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	418
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	419 bwipe!
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	420 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	421
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	422 " Test for autoindent removing indent when insert mode is stopped. Some parts
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	423 " of the code is exercised only when interactive mode is used. So use Vim in a
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	424 " terminal.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	425 func Test_autoindent_remove_indent()
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	426 CheckRunVimInTerminal
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	427 let buf = RunVimInTerminal('-N Xfile', {'rows': 6, 'cols' : 20})
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	428 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	429 call term_sendkeys(buf, ":set autoindent\n")
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	430 " leaving insert mode in a new line with indent added by autoindent, should
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	431 " remove the indent.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	432 call term_sendkeys(buf, "i\<Tab>foo\<CR>\<Esc>")
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	433 " Need to delay for some time, otherwise the code in getchar.c will not be
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	434 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	435 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	436 " when a line is wrapped and the cursor is at the start of the second line,
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	437 " leaving insert mode, should move the cursor back to the first line.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	438 call term_sendkeys(buf, "o" .. repeat('x', 20) .. "\<Esc>")
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	439 " Need to delay for some time, otherwise the code in getchar.c will not be
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	440 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	441 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	442 call term_sendkeys(buf, ":w\n")
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	443 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	444 call StopVimInTerminal(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	445 call assert_equal(["\tfoo", '', repeat('x', 20)], readfile('Xfile'))
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	446 call delete('Xfile')
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	447 endfunc
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	448
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	449 func Test_edit_CR()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	450 " Test for <CR> in insert mode
26211 485c7c4afeb7 patch 8.2.3637: typos in test files Bram Moolenaar <Bram@vim.org> parents: 26157 diff changeset	451 " basically only in quickfix mode it's tested, the rest
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	452 " has been taken care of by other tests
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	453 CheckFeature quickfix
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	454 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	455 call writefile(range(1, 10), 'Xqflist.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	456 call setqflist([{'filename': 'Xqflist.txt', 'lnum': 2}])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	457 copen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	458 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	459 call feedkeys("A\<cr>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	460 call assert_equal('Xqflist.txt', bufname(''))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	461 call assert_equal(2, line('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	462 cclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	463 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	464 call setloclist(0, [{'filename': 'Xqflist.txt', 'lnum': 10}])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	465 lopen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	466 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	467 call feedkeys("A\<cr>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	468 call assert_equal('Xqflist.txt', bufname(''))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	469 call assert_equal(10, line('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	470 call feedkeys("A\<Enter>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	471 call feedkeys("A\<kEnter>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	472 call feedkeys("A\n", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	473 call feedkeys("A\r", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	474 call assert_equal(map(range(1, 10), 'string(v:val)') + ['', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	475 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	476 lclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	477 call delete('Xqflist.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	478 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	479
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	480 func Test_edit_CTRL_()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	481 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	482 " disabled for Windows builds, why?
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	483 CheckNotMSWindows
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	484 let _encoding=&encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	485 set encoding=utf-8
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	486 " Test for CTRL-_
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	487 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	488 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	489 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	490 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	491 call assert_equal(["\<C-_>xyzabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	492 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	493 set ari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	494 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	495 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	496 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	497 call assert_equal(["æèñabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	498 call assert_true(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	499 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	500 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	501 call feedkeys("i\<c-_>xyz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	502 call assert_equal(["xyzabc"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	503 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	504 set noari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	505 let &encoding=_encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	506 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	507 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	508
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	509 " needs to come first, to have the @. register empty
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	510 func Test_edit_00a_CTRL_A()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	511 " Test pressing CTRL-A
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	512 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	513 call setline(1, repeat([''], 5))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	514 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	515 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	516 call feedkeys("A\<NUL>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	517 catch /^Vim\%((\a\+)\)\=:E29/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	518 call assert_true(1, 'E29 error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	519 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	520 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	521 call feedkeys("Afoobar \<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	522 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	523 call feedkeys("A\<c-a>more\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	524 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	525 call feedkeys("A\<NUL>and more\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	526 call assert_equal(['foobar ', 'foobar more', 'foobar morend more', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	527 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	528 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	529
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	530 func Test_edit_CTRL_EY()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	531 " Ctrl-E/ Ctrl-Y in insert mode completion to scroll
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	532 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	533 call setline(1, range(1, 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	534 call cursor(30, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	535 norm! z.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	536 call feedkeys("A\<c-x>\<c-e>\<c-e>\<c-e>\<c-e>\<c-e>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	537 call assert_equal(30, winsaveview()['topline'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	538 call assert_equal([0, 30, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	539 call feedkeys("A\<c-x>\<c-e>\<c-e>\<c-e>\<c-e>\<c-e>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	540 call feedkeys("A\<c-x>".repeat("\<c-y>", 10), 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	541 call assert_equal(21, winsaveview()['topline'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	542 call assert_equal([0, 30, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	543 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	544 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	545
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	546 func Test_edit_CTRL_G()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	547 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	548 call setline(1, ['foobar', 'foobar', 'foobar'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	549 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	550 call feedkeys("ioooooooo\<c-g>k\<c-r>.\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	551 call assert_equal(['foooooooooobar', 'foooooooooobar', 'foobar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	552 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	553 call feedkeys("i\<c-g>k\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	554 call assert_equal([0, 1, 10, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	555 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	556 call feedkeys("i\<c-g>jzzzz\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	557 call assert_equal(['foooooooooobar', 'foooooooooobar', 'foozzzzbar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	558 call assert_equal([0, 3, 7, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	559 call feedkeys("i\<c-g>j\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	560 call assert_equal([0, 3, 6, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	561 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	562 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	563
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	564 func Test_edit_CTRL_I()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	565 " Tab in completion mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	566 let path=expand("%:p:h")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	567 new
14039 acb2dc112b06 patch 8.1.0037: cannot easily append lines to another buffer Christian Brabandt <cb@256bit.org> parents: 14033 diff changeset	568 call setline(1, [path. "/", ''])
11171 7fc6afa998be patch 8.0.0472: when a test fails another test may also fail Christian Brabandt <cb@256bit.org> parents: 11105 diff changeset	569 call feedkeys("Arunt\<c-x>\<c-f>\<tab>\<cr>\<esc>", 'tnix')
7fc6afa998be patch 8.0.0472: when a test fails another test may also fail Christian Brabandt <cb@256bit.org> parents: 11105 diff changeset	570 call assert_match('runtest\.vim', getline(1))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	571 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	572 call writefile(['one', 'two', 'three'], 'Xinclude.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	573 let include='#include Xinclude.txt'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	574 call setline(1, [include, ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	575 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	576 call feedkeys("A\<c-x>\<tab>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	577 call assert_equal([include, 'one', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	578 call feedkeys("2ggC\<c-x>\<tab>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	579 call assert_equal([include, 'two', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	580 call feedkeys("2ggC\<c-x>\<tab>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	581 call assert_equal([include, 'three', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	582 call feedkeys("2ggC\<c-x>\<tab>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	583 call assert_equal([include, '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	584 call delete("Xinclude.txt")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	585 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	586 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	587
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	588 func Test_edit_CTRL_K()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	589 " Test pressing CTRL-K (basically only dictionary completion and digraphs
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	590 " the rest is already covered
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	591 call writefile(['A', 'AA', 'AAA', 'AAAA'], 'Xdictionary.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	592 set dictionary=Xdictionary.txt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	593 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	594 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	595 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	596 call feedkeys("A\<c-x>\<c-k>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	597 call assert_equal(['AA', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	598 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	599 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	600 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	601 call feedkeys("A\<c-x>\<c-k>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	602 call assert_equal(['AAA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	603 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	604 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	605 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	606 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	607 call assert_equal(['AAAA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	608 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	609 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	610 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	611 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	612 call assert_equal(['A'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	613 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	614 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	615 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	616 call feedkeys("A\<c-x>\<c-k>\<down>\<down>\<down>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	617 call assert_equal(['AA'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	618
19195 2ef19eed524a patch 8.2.0156: various typos in source files and tests Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	619 " press an unexpected key after dictionary completion
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	620 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	621 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	622 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	623 call feedkeys("A\<c-x>\<c-k>\<c-]>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	624 call assert_equal(['AA', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	625 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	626 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	627 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	628 call feedkeys("A\<c-x>\<c-k>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	629 call assert_equal(["AA\<c-s>", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	630 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	631 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	632 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	633 call feedkeys("A\<c-x>\<c-k>\<c-f>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	634 call assert_equal(["AA\<c-f>", ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	635
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	636 set dictionary=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	637 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	638 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	639 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	640 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	641 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	642 call feedkeys("A\<c-x>\<c-k>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	643 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	644 " error sleeps 2 seconds, when v:testing is not set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	645 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	646 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	647 call delete('Xdictionary.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	648
15607 2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	649 call test_override("char_avail", 1)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	650 set showcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	651 %d
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	652 call feedkeys("A\<c-k>a:\<esc>", 'tnix')
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	653 call assert_equal(['ä'], getline(1, '$'))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	654 call test_override("char_avail", 0)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	655 set noshowcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	656
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	657 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	658 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	659
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	660 func Test_edit_CTRL_L()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	661 " Test Ctrl-X Ctrl-L (line completion)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	662 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	663 set complete=.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	664 call setline(1, ['one', 'two', 'three', '', '', '', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	665 call cursor(4, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	666 call feedkeys("A\<c-x>\<c-l>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	667 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	668 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	669 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	670 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	671 call assert_equal(['one', 'two', 'three', 'two', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	672 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	673 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	674 call feedkeys("cct\<c-x>\<c-l>\<c-n>\<c-n>\<c-n>\<c-n>\<esc>", 'tnix')
13215 ae5f855a64be patch 8.0.1482: using feedkeys() does not work to test completion Christian Brabandt <cb@256bit.org> parents: 12696 diff changeset	675 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	676 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	677 call assert_equal(['one', 'two', 'three', 'two', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	678 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	679 call assert_equal(['one', 'two', 'three', 't', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	680 call feedkeys("cct\<c-x>\<c-l>\<c-p>\<c-p>\<c-p>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	681 call assert_equal(['one', 'two', 'three', 'three', '', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	682 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	683 call cursor(5, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	684 call feedkeys("A\<c-x>\<c-l>\<c-p>\<c-n>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	685 call assert_equal(['one', 'two', 'three', 'three', "\<c-l>\<c-p>\<c-n>", '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	686 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	687 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	688 if has("conceal") && has("syntax")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	689 call setline(1, ['foo', 'bar', 'foobar'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	690 call test_override("char_avail", 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	691 set conceallevel=2 concealcursor=n
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	692 syn on
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	693 syn match ErrorMsg "^bar"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	694 call matchadd("Conceal", 'oo', 10, -1, {'conceal': 'X'})
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	695 func! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	696 let g:change=1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	697 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	698 au! TextChangedI <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	699
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	700 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	701 call assert_false(exists("g:change"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	702 call feedkeys("A \<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	703 call assert_equal(['foo', 'bar ', 'foobar'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	704 call assert_equal(1, g:change)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	705
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	706 call test_override("char_avail", 0)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	707 call clearmatches()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	708 syn off
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	709 au! TextChangedI
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	710 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	711 unlet! g:change
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	712 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	713 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	714 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	715
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	716 func Test_edit_CTRL_N()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	717 " Check keyword completion
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	718 for e in ['latin1', 'utf-8']
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	719 exe 'set encoding=' .. e
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	720 new
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	721 set complete=.
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	722 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	723 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	724 call feedkeys("Ai\<c-n>\<cr>\<esc>", "tnix")
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	725 call feedkeys("ILO\<c-n>\<cr>\<esc>", 'tnix')
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	726 call assert_equal(['INFER', 'loWER', 'i', 'LO', '', ''], getline(1, '$'), e)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	727 %d
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	728 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	729 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	730 set ignorecase infercase
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	731 call feedkeys("Ii\<c-n>\<cr>\<esc>", "tnix")
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	732 call feedkeys("ILO\<c-n>\<cr>\<esc>", 'tnix')
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	733 call assert_equal(['INFER', 'loWER', 'infer', 'LOWER', '', ''], getline(1, '$'), e)
26921 b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	734 set noignorecase noinfercase
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	735 %d
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	736 call setline(1, ['one word', 'two word'])
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	737 exe "normal! Goo\<C-P>\<C-X>\<C-P>"
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	738 call assert_equal('one word', getline(3))
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	739 %d
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	740 set complete&
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	741 bw!
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	742 endfor
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	743 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	744
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	745 func Test_edit_CTRL_O()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	746 " Check for CTRL-O in insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	747 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	748 inoreabbr <buffer> h here some more
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	749 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	750 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	751 " Ctrl-O after an abbreviation
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	752 exe "norm A h\<c-o>:set nu\<cr> text"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	753 call assert_equal(['abc here some more text', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	754 call assert_true(&nu)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	755 set nonu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	756 iunabbr <buffer> h
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	757 " Ctrl-O at end of line with 've'=onemore
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	758 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	759 call feedkeys("A\<c-o>:let g:a=getpos('.')\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	760 call assert_equal([0, 1, 23, 0], g:a)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	761 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	762 set ve=onemore
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	763 call feedkeys("A\<c-o>:let g:a=getpos('.')\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	764 call assert_equal([0, 1, 24, 0], g:a)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	765 set ve=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	766 unlet! g:a
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	767 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	768 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	769
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	770 func Test_edit_CTRL_R()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	771 " Insert Register
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	772 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	773 call test_override("ALL", 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	774 set showcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	775 call feedkeys("AFOOBAR eins zwei\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	776 call feedkeys("O\<c-r>.", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	777 call feedkeys("O\<c-r>=10*500\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	778 call feedkeys("O\<c-r>=getreg('=', 1)\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	779 call assert_equal(["getreg('=', 1)", '5000', "FOOBAR eins zwei", "FOOBAR eins zwei"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	780 call test_override("ALL", 0)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	781 set noshowcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	782 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	783 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	784
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	785 func Test_edit_CTRL_S()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	786 " Test pressing CTRL-S (basically only spellfile completion)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	787 " the rest is already covered
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	788 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	789 if !has("spell")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	790 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	791 call feedkeys("A\<c-x>ss\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	792 call assert_equal(['vims', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	793 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	794 return
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	795 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	796 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	797 " spell option not yet set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	798 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	799 call feedkeys("A\<c-x>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	800 catch /^Vim\%((\a\+)\)\=:E756/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	801 call assert_true(1, 'error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	802 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	803 call assert_equal(['vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	804 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	805 setl spell spelllang=en
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	806 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	807 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	808 call feedkeys("A\<c-x>\<c-s>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	809 call assert_equal(['Vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	810 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	811 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	812 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	813 call feedkeys("A\<c-x>\<c-s>\<down>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	814 call assert_equal(['Aim'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	815 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	816 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	817 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	818 call feedkeys("A\<c-x>\<c-s>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	819 call assert_equal(['vim', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	820 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	821 " empty buffer
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	822 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	823 call feedkeys("A\<c-x>\<c-s>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	824 call assert_equal(['', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	825 setl nospell
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	826 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	827 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	828
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	829 func Test_edit_CTRL_T()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	830 " Check for CTRL-T and CTRL-X CTRL-T in insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	831 " 1) increase indent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	832 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	833 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	834 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	835 call feedkeys("A\<c-t>xyz", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	836 call assert_equal(["\<tab>abcxyz"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	837 " 2) also when paste option is set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	838 set paste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	839 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	840 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	841 call feedkeys("A\<c-t>xyz", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	842 call assert_equal(["\<tab>abcxyz"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	843 set nopaste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	844 " CTRL-X CTRL-T (thesaurus complete)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	845 call writefile(['angry furious mad enraged'], 'Xthesaurus')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	846 set thesaurus=Xthesaurus
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	847 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	848 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	849 call feedkeys("A\<c-x>\<c-t>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	850 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	851 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	852 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	853 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	854 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	855 call assert_equal(['angry', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	856 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	857 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	858 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	859 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	860 call assert_equal(['furious', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	861 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	862 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	863 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	864 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	865 call assert_equal(['enraged', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	866 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	867 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	868 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	869 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	870 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	871 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	872 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	873 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	874 call feedkeys("A\<c-x>\<c-t>\<c-n>\<c-n>\<c-n>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	875 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	876 " Using <c-p> <c-n> when 'complete' is empty
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	877 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	878 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	879 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	880 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	881 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	882 call assert_equal(['angry', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	883 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	884 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	885 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	886 call feedkeys("A\<c-x>\<c-t>\<c-p>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	887 call assert_equal(['mad', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	888 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	889
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	890 set thesaurus=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	891 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	892 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	893 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	894 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	895 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	896 call feedkeys("A\<c-x>\<c-t>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	897 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	898 " error sleeps 2 seconds, when v:testing is not set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	899 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	900 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	901 call assert_equal(['mad'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	902 call delete('Xthesaurus')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	903 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	904 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	905
26921 b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	906 " Test thesaurus completion with different encodings
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	907 func Test_thesaurus_complete_with_encoding()
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	908 call writefile(['angry furious mad enraged'], 'Xthesaurus')
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	909 set thesaurus=Xthesaurus
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	910 for e in ['latin1', 'utf-8']
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	911 exe 'set encoding=' .. e
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	912 new
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	913 call setline(1, 'mad')
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	914 call cursor(1, 1)
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	915 call feedkeys("A\<c-x>\<c-t>\<cr>\<esc>", 'tnix')
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	916 call assert_equal(['mad', ''], getline(1, '$'))
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	917 bw!
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	918 endfor
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	919 set thesaurus=
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	920 call delete('Xthesaurus')
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	921 endfunc
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	922
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	923 " Test 'thesaurusfunc'
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	924 func MyThesaurus(findstart, base)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	925 let mythesaurus = [
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	926 \ #{word: "happy",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	927 \ synonyms: "cheerful,blissful,flying high,looking good,peppy"},
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	928 \ #{word: "kind",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	929 \ synonyms: "amiable,bleeding-heart,heart in right place"}]
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	930 if a:findstart
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	931 " locate the start of the word
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	932 let line = getline('.')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	933 let start = col('.') - 1
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	934 while start > 0 && line[start - 1] =~ '\a'
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	935 let start -= 1
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	936 endwhile
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	937 return start
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	938 else
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	939 " find strings matching with "a:base"
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	940 let res = []
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	941 for w in mythesaurus
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	942 if w.word =~ '^' . a:base
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	943 call add(res, w.word)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	944 call extend(res, split(w.synonyms, ","))
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	945 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	946 endfor
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	947 return res
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	948 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	949 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	950
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	951 func Test_thesaurus_func()
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	952 new
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	953 set thesaurus=notused
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	954 set thesaurusfunc=NotUsed
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	955 setlocal thesaurusfunc=MyThesaurus
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	956 call setline(1, "an ki")
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	957 call cursor(1, 1)
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	958 call feedkeys("A\<c-x>\<c-t>\<c-n>\<cr>\<esc>", 'tnix')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	959 call assert_equal(['an amiable', ''], getline(1, '$'))
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	960
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	961 setlocal thesaurusfunc=NonExistingFunc
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	962 call assert_fails("normal $a\<C-X>\<C-T>", 'E117:')
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	963
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	964 setlocal thesaurusfunc=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	965 set thesaurusfunc=NonExistingFunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	966 call assert_fails("normal $a\<C-X>\<C-T>", 'E117:')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	967 %bw!
25990 ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	968
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	969 set thesaurusfunc=
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	970 set thesaurus=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	971 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	972
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	973 func Test_edit_CTRL_U()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	974 " Test 'completefunc'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	975 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	976 " -1, -2 and -3 are special return values
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	977 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	978 fun! CompleteMonths(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	979 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	980 " locate the start of the word
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	981 return g:special
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	982 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	983 " find months matching with "a:base"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	984 let res = []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	985 for m in split("Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	986 if m =~ '^\c'.a:base
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	987 call add(res, {'word': m, 'abbr': m.' Month', 'icase': 0})
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	988 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	989 endfor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	990 return {'words': res, 'refresh': 'always'}
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	991 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	992 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	993 set completefunc=CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	994 call setline(1, ['', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	995 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	996 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	997 call assert_equal(['X', '', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	998 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	999 let g:special=-1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1000 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1001 call assert_equal(['XJan', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1002 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1003 let g:special=-2
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1004 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1005 call assert_equal(['X', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1006 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1007 let g:special=-3
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1008 call feedkeys("AX\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1009 call assert_equal(['X', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1010 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1011 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1012 call feedkeys("AM\<c-x>\<c-u>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1013 call assert_equal(['Mar', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1014 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1015 call feedkeys("AM\<c-x>\<c-u>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1016 call assert_equal(['May', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1017 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1018 call feedkeys("AM\<c-x>\<c-u>\<c-n>\<c-n>\<cr>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1019 call assert_equal(['M', ''], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1020 delfu CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1021 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1022 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1023 call feedkeys("A\<c-x>\<c-u>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1024 call assert_fails(1, 'unknown completion function')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1025 catch /^Vim\%((\a\+)\)\=:E117/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1026 call assert_true(1, 'E117 error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1027 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1028 set completefunc=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1029 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1030 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1031
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1032 func Test_edit_completefunc_delete()
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1033 func CompleteFunc(findstart, base)
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1034 if a:findstart == 1
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1035 return col('.') - 1
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1036 endif
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1037 normal dd
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1038 return ['a', 'b']
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1039 endfunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1040 new
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1041 set completefunc=CompleteFunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1042 call setline(1, ['', 'abcd', ''])
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1043 2d
29014 45c182c4f7e9 patch 8.2.5029: "textlock" is always zero Bram Moolenaar <Bram@vim.org> parents: 28942 diff changeset	1044 call assert_fails("normal 2G$a\<C-X>\<C-U>", 'E565:')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1045 bwipe!
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1046 endfunc
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1047
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1048
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1049 func Test_edit_CTRL_Z()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1050 " Ctrl-Z when insertmode is not set inserts it literally
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1051 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1052 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1053 call feedkeys("A\<c-z>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1054 call assert_equal(["abc\<c-z>"], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1055 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1056 " TODO: How to Test Ctrl-Z in insert mode, e.g. suspend?
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1057 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1058
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1059 func Test_edit_DROP()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1060 CheckFeature dnd
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1061 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1062 call setline(1, ['abc def ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1063 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1064 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1065 call feedkeys("i\<Drop>\<Esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1066 call assert_fails(1, 'Invalid register name')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1067 catch /^Vim\%((\a\+)\)\=:E353/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1068 call assert_true(1, 'error caught')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1069 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1070 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1071 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1072
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1073 func Test_edit_CTRL_V()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1074 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1075 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1076 call cursor(2, 1)
27350 63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1077
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1078 " force some redraws
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1079 set showmode showcmd
27350 63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1080 call test_override('char_avail', 1)
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1081
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1082 call feedkeys("A\<c-v>\<c-n>\<c-v>\<c-l>\<c-v>\<c-b>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1083 call assert_equal(["abc\x0e\x0c\x02"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1084
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1085 if has("rightleft") && exists("+rl")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1086 set rl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1087 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1088 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1089 call feedkeys("A\<c-v>\<c-n>\<c-v>\<c-l>\<c-v>\<c-b>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1090 call assert_equal(["abc\x0e\x0c\x02"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1091 set norl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1092 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1093
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1094 set noshowmode showcmd
27350 63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1095 call test_override('char_avail', 0)
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1096
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1097 " No modifiers should be applied to the char typed using i_CTRL-V_digit.
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1098 call feedkeys(":append\<CR>\<C-V>76c\<C-V>76\<C-F2>\<C-V>u3c0j\<C-V>u3c0\<M-F3>\<CR>.\<CR>", 'tnix')
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1099 call assert_equal('LcL<C-F2>πjπ<M-F3>', getline(2))
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1100
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1101 if has('osx')
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1102 " A char with a modifier should not be a valid char for i_CTRL-V_digit.
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1103 call feedkeys("o\<C-V>\<D-j>\<C-V>\<D-1>\<C-V>\<D-o>\<C-V>\<D-x>\<C-V>\<D-u>", 'tnix')
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1104 call assert_equal('<D-j><D-1><D-o><D-x><D-u>', getline(3))
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1105 endif
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1106
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1107 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1108 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1109
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1110 func Test_edit_F1()
18767 068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18538 diff changeset	1111 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18538 diff changeset	1112
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1113 " Pressing <f1>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1114 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1115 call feedkeys(":set im\<cr>\<f1>\<c-l>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1116 set noinsertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1117 call assert_equal('help', &buftype)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1118 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1119 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1120 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1121
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1122 func Test_edit_F21()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1123 " Pressing <f21>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1124 " sends a netbeans command
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1125 CheckFeature netbeans_intg
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1126 new
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1127 " I have no idea what this is supposed to do :)
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1128 call feedkeys("A\<F21>\<F1>\<esc>", 'tnix')
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1129 bw
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1130 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1131
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1132 func Test_edit_HOME_END()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1133 " Test Home/End Keys
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1134 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1135 set foldopen+=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1136 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1137 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1138 call feedkeys("AX\<Home>Y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1139 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1140 call feedkeys("iZ\<End>Y\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1141 call assert_equal(['YabcX', 'ZdefY'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1142
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1143 set foldopen-=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1144 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1145 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1146
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1147 func Test_edit_INS()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1148 " Test for Pressing <Insert>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1149 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1150 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1151 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1152 call feedkeys("i\<Insert>ZYX>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1153 call assert_equal(['ZYX>', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1154 call setline(1, ['abc', 'def'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1155 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1156 call feedkeys("i\<Insert>Z\<Insert>YX>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1157 call assert_equal(['ZYX>bc', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1158 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1159 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1160
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1161 func Test_edit_LEFT_RIGHT()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1162 " Left, Shift-Left, Right, Shift-Right
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1163 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1164 call setline(1, ['abc def ghi', 'ABC DEF GHI', 'ZZZ YYY XXX'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1165 let _ww=&ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1166 set ww=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1167 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1168 call feedkeys("i\<left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1169 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1170 " Is this a bug, <s-left> does not respect whichwrap option
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1171 call feedkeys("i\<s-left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1172 call assert_equal([0, 1, 8, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1173 call feedkeys("i". repeat("\<s-left>", 3). "\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1174 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1175 call feedkeys("i\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1176 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1177 call feedkeys("i\<right>\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1178 call assert_equal([0, 1, 2, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1179 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1180 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1181 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1182 call assert_equal([0, 2, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1183 call feedkeys("i\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1184 call assert_equal([0, 2, 4, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1185 call cursor(3, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1186 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1187 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1188 call assert_equal([0, 3, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1189 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1190 " <S-Right> does not respect 'whichwrap' option
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1191 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1192 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1193 " Check motion when 'whichwrap' contains cursor keys for insert mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1194 set ww+=[,]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1195 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1196 call feedkeys("i\<left>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1197 call assert_equal([0, 1, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1198 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1199 call feedkeys("A\<right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1200 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1201 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1202 call feedkeys("A\<s-right>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1203 call assert_equal([0, 3, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1204 let &ww = _ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1205 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1206 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1207
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1208 func Test_edit_MOUSE()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1209 " This is a simple test, since we not really using the mouse here
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1210 CheckFeature mouse
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1211 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1212 call setline(1, range(1, 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1213 call cursor(1, 1)
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1214 call assert_equal(1, line('w0'))
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1215 call assert_equal(10, line('w$'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1216 set mouse=a
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1217 " One scroll event moves three lines.
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1218 call feedkeys("A\<ScrollWheelDown>\<esc>", 'tnix')
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1219 call assert_equal(4, line('w0'))
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1220 call assert_equal(13, line('w$'))
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1221 " This should move by one page down.
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1222 call feedkeys("A\<S-ScrollWheelDown>\<esc>", 'tnix')
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1223 call assert_equal(14, line('w0'))
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1224 set nostartofline
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1225 " Another page down.
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1226 call feedkeys("A\<C-ScrollWheelDown>\<esc>", 'tnix')
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1227 call assert_equal(24, line('w0'))
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1228
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1229 call assert_equal([0, 24, 2, 0], getpos('.'))
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1230 call test_setmouse(4, 3)
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1231 call feedkeys("A\<LeftMouse>\<esc>", 'tnix')
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1232 call assert_equal([0, 27, 2, 0], getpos('.'))
28796 7c1a884495e5 patch 8.2.4922: mouse test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 28784 diff changeset	1233 set mousemodel=extend
28784 faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1234 call test_setmouse(5, 3)
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1235 call feedkeys("A\<RightMouse>\<esc>\<esc>", 'tnix')
faf3acb2509b patch 8.2.4916: mouse in Insert mode test fails Bram Moolenaar <Bram@vim.org> parents: 28704 diff changeset	1236 call assert_equal([0, 28, 2, 0], getpos('.'))
28796 7c1a884495e5 patch 8.2.4922: mouse test fails on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 28784 diff changeset	1237 set mousemodel&
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1238 call cursor(1, 100)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1239 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1240 " this should move by a screen up, but when the test
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1241 " is run, it moves up to the top of the buffer...
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1242 call feedkeys("A\<ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1243 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1244 call cursor(1, 30)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1245 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1246 call feedkeys("A\<S-ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1247 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1248 call cursor(1, 30)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1249 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1250 call feedkeys("A\<C-ScrollWheelUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1251 call assert_equal([0, 1, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1252 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1253 call setline(1, repeat(["12345678901234567890"], 100))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1254 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1255 call feedkeys("A\<ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1256 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1257 call feedkeys("A\<ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1258 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1259 call feedkeys("A\<S-ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1260 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1261 call feedkeys("A\<S-ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1262 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1263 call feedkeys("A\<C-ScrollWheelRight>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1264 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1265 call feedkeys("A\<C-ScrollWheelLeft>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1266 call assert_equal([0, 2, 20, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1267 set mouse& startofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1268 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1269 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1270
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1271 func Test_edit_PAGEUP_PAGEDOWN()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1272 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1273 call setline(1, repeat(['abc def ghi'], 30))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1274 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1275 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1276 call assert_equal([0, 9, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1277 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1278 call assert_equal([0, 17, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1279 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1280 call assert_equal([0, 25, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1281 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1282 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1283 call feedkeys("i\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1284 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1285 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1286 call assert_equal([0, 29, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1287 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1288 call assert_equal([0, 21, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1289 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1290 call assert_equal([0, 13, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1291 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1292 call assert_equal([0, 5, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1293 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1294 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1295 " <S-Up> is the same as <PageUp>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1296 " <S-Down> is the same as <PageDown>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1297 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1298 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1299 call assert_equal([0, 9, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1300 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1301 call assert_equal([0, 17, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1302 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1303 call assert_equal([0, 25, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1304 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1305 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1306 call feedkeys("i\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1307 call assert_equal([0, 30, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1308 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1309 call assert_equal([0, 29, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1310 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1311 call assert_equal([0, 21, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1312 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1313 call assert_equal([0, 13, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1314 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1315 call assert_equal([0, 5, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1316 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1317 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1318 set nostartofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1319 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1320 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1321 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1322 call assert_equal([0, 29, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1323 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1324 call assert_equal([0, 21, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1325 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1326 call assert_equal([0, 13, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1327 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1328 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1329 call feedkeys("A\<PageUp>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1330 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1331 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1332 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1333 call assert_equal([0, 9, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1334 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1335 call assert_equal([0, 17, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1336 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1337 call assert_equal([0, 25, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1338 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1339 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1340 call feedkeys("A\<PageDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1341 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1342 " <S-Up> is the same as <PageUp>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1343 " <S-Down> is the same as <PageDown>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1344 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1345 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1346 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1347 call assert_equal([0, 29, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1348 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1349 call assert_equal([0, 21, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1350 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1351 call assert_equal([0, 13, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1352 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1353 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1354 call feedkeys("A\<S-Up>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1355 call assert_equal([0, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1356 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1357 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1358 call assert_equal([0, 9, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1359 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1360 call assert_equal([0, 17, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1361 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1362 call assert_equal([0, 25, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1363 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1364 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1365 call feedkeys("A\<S-Down>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1366 call assert_equal([0, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1367 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1368 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1369
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1370 func Test_edit_forbidden()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1371 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1372 " 1) edit in the sandbox is not allowed
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1373 call setline(1, 'a')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1374 com! Sandbox :sandbox call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1375 call assert_fails(':Sandbox', 'E48:')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1376 com! Sandbox :sandbox exe "norm! i\<del>"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1377 call assert_fails(':Sandbox', 'E48:')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1378 delcom Sandbox
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1379 call assert_equal(['a'], getline(1,'$'))
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1380
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1381 " 2) edit with textlock set
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1382 fu! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1383 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1384 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1385 au InsertCharPre <buffer> :call DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1386 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1387 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1388 call assert_fails(1, 'textlock')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1389 catch /^Vim\%((\a\+)\)\=:E565/ " catch E565: not allowed here
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1390 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1391 " TODO: Might be a bug: should x really be inserted here
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1392 call assert_equal(['xa'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1393 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1394 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1395 call feedkeys("ix\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1396 call assert_fails(1, 'unknown function')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1397 catch /^Vim\%((\a\+)\)\=:E117/ " catch E117: unknown function
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1398 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1399 au! InsertCharPre
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1400
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1401 " 3) edit when completion is shown
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1402 fun! Complete(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1403 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1404 return col('.')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1405 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1406 call feedkeys("i\<del>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1407 return []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1408 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1409 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1410 set completefunc=Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1411 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1412 call feedkeys("i\<c-x>\<c-u>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1413 call assert_fails(1, 'change in complete function')
20118 252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1414 catch /^Vim\%((\a\+)\)\=:E565/ " catch E565
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1415 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1416 delfu Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1417 set completefunc=
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1418
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1419 if has("rightleft") && exists("+fkmap")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1420 " 4) 'R' when 'fkmap' and 'revins' is set.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1421 set revins fkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1422 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1423 normal Ri
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1424 call assert_fails(1, "R with 'fkmap' and 'ri' set")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1425 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1426 finally
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1427 set norevins nofkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1428 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1429 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1430 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1431 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1432
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1433 func Test_edit_rightleft()
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1434 " Cursor in rightleft mode moves differently
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1435 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1436 call NewWindow(10, 20)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1437 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1438 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1439 set rightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1440 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1441 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1442 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1443 \" cba",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1444 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1445 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1446 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1447 call assert_equal(join(expect, "\n"), join(lines, "\n"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1448 " 2) right moves to the left
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1449 call feedkeys("i\<right>\<esc>x", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1450 call assert_equal(['bc', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1451 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1452 call feedkeys("i\<s-right>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1453 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1454 call feedkeys("i\<c-right>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1455 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1456 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1457 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1458 \" cb",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1459 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1460 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1461 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1462 call assert_equal(join(expect, "\n"), join(lines, "\n"))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1463 " 2) left moves to the right
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1464 call setline(1, ['abc', 'def', 'ghi'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1465 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1466 call feedkeys("i\<left>\<esc>x", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1467 call assert_equal(['ac', 'def', 'ghi'], getline(1,'$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1468 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1469 call feedkeys("i\<s-left>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1470 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1471 call feedkeys("i\<c-left>\<esc>", 'txin')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1472 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1473 let lines = ScreenLines([1, 4], winwidth(0))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1474 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1475 \" ca",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1476 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1477 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1478 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1479 call assert_equal(join(expect, "\n"), join(lines, "\n"))
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1480 %d _
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1481 call test_override('redraw_flag', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1482 call test_override('char_avail', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1483 call feedkeys("a\<C-V>x41", "xt")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1484 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1485 call assert_equal(repeat(' ', 19) .. 'A', Screenline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1486 call test_override('ALL', 0)
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1487 set norightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1488 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1489 endfunc
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1490
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1491 func Test_edit_complete_very_long_name()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1492 " Long directory names only work on Unix.
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1493 CheckUnix
11319 2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1494
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1495 let dirname = getcwd() . "/Xdir"
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1496 let longdirname = dirname . repeat('/' . repeat('d', 255), 4)
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1497 try
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1498 call mkdir(longdirname, 'p')
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1499 catch /E739:/
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1500 " Long directory name probably not supported.
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1501 call delete(dirname, 'rf')
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1502 return
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1503 endtry
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1504
16692 2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1505 " Try to get the Vim window position before setting 'columns', so that we can
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1506 " move the window back to where it was.
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1507 let winposx = getwinposx()
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1508 let winposy = getwinposy()
16692 2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1509
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1510 if winposx >= 0 && winposy >= 0 && !has('gui_running')
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1511 " We did get the window position, but xterm may report the wrong numbers.
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1512 " Move the window to the reported position and compute any offset.
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1513 exe 'winpos ' . winposx . ' ' . winposy
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1514 sleep 100m
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1515 let x = getwinposx()
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1516 if x >= 0
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1517 let winposx += winposx - x
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1518 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1519 let y = getwinposy()
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1520 if y >= 0
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1521 let winposy += winposy - y
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1522 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1523 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1524
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1525 let save_columns = &columns
11319 2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1526 " Need at least about 1100 columns to reproduce the problem.
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1527 set columns=2000
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1528 set noswapfile
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1529
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1530 let longfilename = longdirname . '/' . repeat('a', 255)
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1531 call writefile(['Totum', 'Table'], longfilename)
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1532 new
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1533 exe "next Xfile " . longfilename
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1534 exe "normal iT\<C-N>"
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1535
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1536 bwipe!
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1537 exe 'bwipe! ' . longfilename
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1538 call delete(dirname, 'rf')
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1539 let &columns = save_columns
11315 0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1540 if winposx >= 0 && winposy >= 0
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1541 exe 'winpos ' . winposx . ' ' . winposy
0c091a7c588c patch 8.0.0543: test_edit causes older xfce4-terminal to close Christian Brabandt <cb@256bit.org> parents: 11293 diff changeset	1542 endif
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1543 set swapfile&
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1544 endfunc
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1545
14409 9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1546 func Test_edit_backtick()
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1547 next a\`b c
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1548 call assert_equal('a`b', expand('%'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1549 next
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1550 call assert_equal('c', expand('%'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1551 call assert_equal('a\`b c', expand('##'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1552 endfunc
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1553
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1554 func Test_edit_quit()
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1555 edit foo.txt
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1556 split
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1557 new
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1558 call setline(1, 'hello')
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1559 3wincmd w
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1560 redraw!
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1561 call assert_fails('1q', 'E37:')
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1562 bwipe! foo.txt
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1563 only
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1564 endfunc
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1565
14033 bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1566 func Test_edit_alt()
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1567 " Keeping the cursor line didn't happen when the first line has indent.
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1568 new
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1569 call setline(1, [' one', 'two', 'three'])
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1570 w XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1571 $
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1572 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1573 e Xother
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1574 e #
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1575 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1576
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1577 bwipe XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1578 call delete('XAltFile')
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1579 endfunc
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1580
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1581 func Test_edit_InsertLeave()
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1582 new
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1583 au InsertLeavePre * let g:did_au_pre = 1
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1584 au InsertLeave * let g:did_au = 1
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1585 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1586 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1587 call feedkeys("afoo\<Esc>", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1588 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1589 call assert_equal(1, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1590 call assert_equal('foo', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1591
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1592 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1593 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1594 call feedkeys("Sbar\<C-C>", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1595 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1596 call assert_equal(0, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1597 call assert_equal('bar', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1598
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1599 inoremap x xx<Esc>
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1600 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1601 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1602 call feedkeys("Saax", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1603 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1604 call assert_equal(1, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1605 call assert_equal('aaxx', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1606
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1607 inoremap x xx<C-C>
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1608 let g:did_au_pre = 0
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1609 let g:did_au = 0
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1610 call feedkeys("Sbbx", 'tx')
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1611 call assert_equal(1, g:did_au_pre)
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1612 call assert_equal(0, g:did_au)
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1613 call assert_equal('bbxx', getline(1))
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1614
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1615 bwipe!
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1616 au! InsertLeave InsertLeavePre
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1617 iunmap x
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1618 endfunc
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1619
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1620 func Test_edit_InsertLeave_undo()
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1621 new XtestUndo
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1622 set undofile
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1623 au InsertLeave * wall
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1624 exe "normal ofoo\<Esc>"
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1625 call assert_equal(2, line('$'))
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1626 normal u
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1627 call assert_equal(1, line('$'))
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1628
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1629 bwipe!
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1630 au! InsertLeave
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1631 call delete('XtestUndo')
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1632 call delete(undofile('XtestUndo'))
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1633 set undofile&
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1634 endfunc
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1635
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1636 " Test for inserting characters using CTRL-V followed by a number.
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1637 func Test_edit_special_chars()
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1638 new
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1639
27490 fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27350 diff changeset	1640 let t = "o\<C-V>65\<C-V>x42\<C-V>o103 \<C-V>33a\<C-V>xfg\<C-V>o78\<Esc>"
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1641
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1642 exe "normal " . t
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1643 call assert_equal("ABC !a\<C-O>g\<C-G>8", getline(2))
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1644
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1645 close!
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1646 endfunc
17984 2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1647
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1648 func Test_edit_startinsert()
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1649 new
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1650 set backspace+=start
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1651 call setline(1, 'foobar')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1652 call feedkeys("A\<C-U>\<Esc>", 'xt')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1653 call assert_equal('', getline(1))
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1654
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1655 call setline(1, 'foobar')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1656 call feedkeys(":startinsert!\<CR>\<C-U>\<Esc>", 'xt')
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1657 call assert_equal('', getline(1))
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1658
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1659 set backspace&
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1660 bwipe!
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1661 endfunc
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1662
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1663 " Test for :startreplace and :startgreplace
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1664 func Test_edit_startreplace()
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1665 new
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1666 call setline(1, 'abc')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1667 call feedkeys("l:startreplace\<CR>xyz\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1668 call assert_equal('axyz', getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1669 call feedkeys("0:startreplace!\<CR>abc\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1670 call assert_equal('axyzabc', getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1671 call setline(1, "a\tb")
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1672 call feedkeys("0l:startgreplace\<CR>xyz\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1673 call assert_equal("axyz\tb", getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1674 call feedkeys("0i\<C-R>=execute('startreplace')\<CR>12\e", 'xt')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1675 call assert_equal("12axyz\tb", getline(1))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1676 close!
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1677 endfunc
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1678
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1679 func Test_edit_noesckeys()
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	1680 CheckNotGui
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1681 new
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1682
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1683 " <Left> moves cursor when 'esckeys' is set
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1684 exe "set t_kl=\<Esc>OD"
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1685 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1686 call feedkeys("axyz\<Esc>ODX", "xt")
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1687 call assert_equal("xyXz", getline(1))
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1688
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1689 " <Left> exits Insert mode when 'esckeys' is off
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1690 set noesckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1691 call setline(1, '')
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1692 call feedkeys("axyz\<Esc>ODX", "xt")
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1693 call assert_equal(["DX", "xyz"], getline(1, 2))
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1694
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1695 bwipe!
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1696 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1697 endfunc
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1698
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1699 " Test for running an invalid ex command in insert mode using CTRL-O
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1700 func Test_edit_ctrl_o_invalid_cmd()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1701 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1702 set showmode showcmd
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1703 " Avoid a sleep of 3 seconds. Zero might have side effects.
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1704 call test_override('ui_delay', 50)
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1705 let caught_e492 = 0
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1706 try
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1707 call feedkeys("i\<C-O>:invalid\<CR>abc\<Esc>", "xt")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1708 catch /E492:/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1709 let caught_e492 = 1
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1710 endtry
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1711 call assert_equal(1, caught_e492)
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1712 call assert_equal('abc', getline(1))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1713 set showmode& showcmd&
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1714 call test_override('ui_delay', 0)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1715 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1716 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1717
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1718 " Test for editing a file with a very long name
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1719 func Test_edit_illegal_filename()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1720 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1721 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1722 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1723 exe 'edit ' . repeat('f', 5000)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1724 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1725 call assert_match("Illegal file name$", split(msg, "\n")[0])
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1726 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1727 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1728
22490 23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1729 " Test for editing a directory
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1730 func Test_edit_is_a_directory()
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1731 CheckEnglish
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1732 let dirname = getcwd() . "/Xdir"
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1733 call mkdir(dirname, 'p')
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1734
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1735 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1736 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1737 exe 'edit' dirname
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1738 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1739 call assert_match("is a directory$", split(msg, "\n")[0])
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1740 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1741
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1742 let dirname .= '/'
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1743
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1744 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1745 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1746 exe 'edit' dirname
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1747 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1748 call assert_match("is a directory$", split(msg, "\n")[0])
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1749 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1750
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1751 call delete(dirname, 'rf')
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1752 endfunc
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1753
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1754 " Test for editing a file using invalid file encoding
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1755 func Test_edit_invalid_encoding()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1756 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1757 call writefile([], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1758 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1759 new ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1760 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1761 call assert_match('\[NOT converted\]', msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1762 call delete('Xfile')
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1763 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1764 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1765
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1766 " Test for the "charconvert" option
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1767 func Test_edit_charconvert()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1768 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1769 call writefile(['one', 'two'], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1770
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1771 " set 'charconvert' to a non-existing function
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1772 set charconvert=NonExitingFunc()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1773 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1774 let caught_e117 = v:false
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1775 try
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1776 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1777 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1778 catch /E117:/
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1779 let caught_e117 = v:true
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1780 finally
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1781 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1782 endtry
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1783 call assert_true(caught_e117)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1784 call assert_equal(['one', 'two'], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1785 call assert_match("Conversion with 'charconvert' failed", msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1786 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1787 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1788
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1789 " 'charconvert' function doesn't create a output file
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1790 func Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1791 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1792 set charconvert=Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1793 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1794 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1795 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1796 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1797 call assert_equal(['one', 'two'], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1798 call assert_match("can't read output of 'charconvert'", msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1799 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1800 delfunc Cconv1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1801 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1802
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1803 " 'charconvert' function to convert to upper case
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1804 func Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1805 let data = readfile(v:fname_in)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1806 call map(data, 'toupper(v:val)')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1807 call writefile(data, v:fname_out)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1808 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1809 set charconvert=Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1810 new Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1811 write ++enc=ucase Xfile1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1812 call assert_equal(['ONE', 'TWO'], readfile('Xfile1'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1813 call delete('Xfile1')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1814 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1815 delfunc Cconv2
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1816 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1817
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1818 " 'charconvert' function removes the input file
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1819 func Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1820 call delete(v:fname_in)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1821 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1822 set charconvert=Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1823 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1824 call assert_fails('edit ++enc=lcase Xfile', 'E202:')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1825 call assert_equal([''], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1826 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1827 delfunc Cconv3
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1828 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1829
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1830 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1831 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1832
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1833 " Test for editing a file without read permission
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1834 func Test_edit_file_no_read_perm()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1835 CheckUnix
24164 2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1836 CheckNotRoot
2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1837
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1838 call writefile(['one', 'two'], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1839 call setfperm('Xfile', '-w-------')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1840 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1841 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1842 edit Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1843 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1844 call assert_equal(1, &readonly)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1845 call assert_equal([''], getline(1, '$'))
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1846 call assert_match('\[Permission Denied\]', msg)
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1847 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1848 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1849 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1850
28371 c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1851 " Using :edit without leaving 'insertmode' should not cause Insert mode to be
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1852 " re-entered immediately after <C-L>
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1853 func Test_edit_insertmode_ex_edit()
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1854 CheckRunVimInTerminal
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1855
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1856 let lines =<< trim END
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1857 set insertmode noruler
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1858 inoremap <C-B> <Cmd>edit Xfoo<CR>
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1859 END
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1860 call writefile(lines, 'Xtest_edit_insertmode_ex_edit')
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1861
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1862 let buf = RunVimInTerminal('-S Xtest_edit_insertmode_ex_edit', #{rows: 6})
29340 fba9e366ced4 patch 9.0.0013: reproducing memory access errors can be difficult Bram Moolenaar <Bram@vim.org> parents: 29222 diff changeset	1863 " Somehow this can be very slow with valgrind. A separate TermWait() works
fba9e366ced4 patch 9.0.0013: reproducing memory access errors can be difficult Bram Moolenaar <Bram@vim.org> parents: 29222 diff changeset	1864 " better than a longer time with WaitForAssert() (why?)
fba9e366ced4 patch 9.0.0013: reproducing memory access errors can be difficult Bram Moolenaar <Bram@vim.org> parents: 29222 diff changeset	1865 call TermWait(buf, 1000)
29222 6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1866 call WaitForAssert({-> assert_match('^-- INSERT --\s*$', term_getline(buf, 6))})
28371 c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1867 call term_sendkeys(buf, "\<C-B>\<C-L>")
29222 6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1868 call WaitForAssert({-> assert_notmatch('^-- INSERT --\s*$', term_getline(buf, 6))})
28371 c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1869
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1870 " clean up
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1871 call StopVimInTerminal(buf)
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1872 call delete('Xtest_edit_insertmode_ex_edit')
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1873 endfunc
c3a7be75ef16 patch 8.2.4711: when 'insermode' is set :edit from <Cmd> mapping misbehaves Bram Moolenaar <Bram@vim.org> parents: 28303 diff changeset	1874
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1875 " Pressing escape in 'insertmode' should beep
29222 6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1876 " FIXME: Execute this later, when using valgrind it makes the next test
6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1877 " Test_edit_insertmode_ex_edit() fail.
6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1878 func Test_z_edit_insertmode_esc_beeps()
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1879 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1880 set insertmode
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1881 call assert_beeps("call feedkeys(\"one\<Esc>\", 'xt')")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1882 set insertmode&
29222 6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1883 " unsupported "CTRL-G l" command should beep in insert mode.
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1884 call assert_beeps("normal i\<C-G>l")
29222 6b4c1ca1436e patch 8.2.5130: edit test for mode message fails when using valgrind Bram Moolenaar <Bram@vim.org> parents: 29014 diff changeset	1885 bwipe!
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1886 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1887
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1888 " Test for 'hkmap' and 'hkmapp'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1889 func Test_edit_hkmap()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1890 CheckFeature rightleft
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1891 if has('win32') && !has('gui')
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1892 throw 'Skipped: fails on the MS-Windows terminal version'
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1893 endif
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1894 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1895
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1896 set revins hkmap
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1897 let str = 'abcdefghijklmnopqrstuvwxyz'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1898 let str ..= 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1899 let str ..= '`/'',.;'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1900 call feedkeys('i' .. str, 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1901 let expected = "óõú,.;"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1902 let expected ..= "ZYXWVUTSRQPONMLKJIHGFEDCBA"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1903 let expected ..= "æèñ'äåàãø/ôíîöêìçïéòë÷âáðù"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1904 call assert_equal(expected, getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1905
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1906 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1907 set revins hkmap hkmapp
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1908 let str = 'abcdefghijklmnopqrstuvwxyz'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1909 let str ..= 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1910 call feedkeys('i' .. str, 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1911 let expected = "õYXWVUTSRQóOïíLKJIHGFEDêBA"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1912 let expected ..= "öòXùåèúæø'ôñðîì÷çéäâóǟãëáà"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1913 call assert_equal(expected, getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1914
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1915 set revins& hkmap& hkmapp&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1916 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1917 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1918
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1919 " Test for 'allowrevins' and using CTRL-_ in insert mode
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1920 func Test_edit_allowrevins()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1921 CheckFeature rightleft
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1922 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1923 set allowrevins
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1924 call feedkeys("iABC\<C-_>DEF\<C-_>GHI", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1925 call assert_equal('ABCFEDGHI', getline(1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1926 set allowrevins&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1927 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1928 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1929
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1930 " Test for inserting a register in insert mode using CTRL-R
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1931 func Test_edit_insert_reg()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1932 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1933 let g:Line = ''
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1934 func SaveFirstLine()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1935 let g:Line = Screenline(1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1936 return 'r'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1937 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1938 inoremap <expr> <buffer> <F2> SaveFirstLine()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1939 call test_override('redraw_flag', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1940 call test_override('char_avail', 1)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1941 let @r = 'sample'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1942 call feedkeys("a\<C-R>=SaveFirstLine()\<CR>", "xt")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1943 call assert_equal('"', g:Line)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1944 call test_override('ALL', 0)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1945 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1946 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1947
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1948 " When a character is inserted at the last position of the last line in a
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1949 " window, the window contents should be scrolled one line up. If the top line
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1950 " is part of a fold, then the entire fold should be scrolled up.
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1951 func Test_edit_lastline_scroll()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1952 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1953 let h = winheight(0)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1954 let lines = ['one', 'two', 'three']
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1955 let lines += repeat(['vim'], h - 4)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1956 call setline(1, lines)
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1957 call setline(h, repeat('x', winwidth(0) - 1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1958 call feedkeys("GAx", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1959 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1960 call assert_equal(h - 1, winline())
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1961 call assert_equal(2, line('w0'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1962
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1963 " scroll with a fold
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1964 1,2fold
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1965 normal gg
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1966 call setline(h + 1, repeat('x', winwidth(0) - 1))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1967 call feedkeys("GAx", 'xt')
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1968 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1969 call assert_equal(h - 1, winline())
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1970 call assert_equal(3, line('w0'))
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1971
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1972 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1973 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1974
22588 050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1975 func Test_edit_browse()
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1976 " in the GUI this opens a file picker, we only test the terminal behavior
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1977 CheckNotGui
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1978
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1979 " ":browse xxx" checks for the FileExplorer augroup and assumes editing "."
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1980 " works then.
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1981 augroup FileExplorer
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1982 au!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1983 augroup END
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1984
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1985 " When the USE_FNAME_CASE is defined this used to cause a crash.
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1986 browse enew
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1987 bwipe!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1988
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1989 browse split
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1990 bwipe!
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1991 endfunc
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1992
22724 51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1993 func Test_read_invalid()
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1994 set encoding=latin1
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1995 " This was not properly checking for going past the end.
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1996 call assert_fails('r`=', 'E484')
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1997 set encoding=utf-8
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1998 endfunc
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1999
24882 4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2000 " Test for the 'revins' option
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2001 func Test_edit_revins()
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2002 CheckFeature rightleft
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2003 new
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2004 set revins
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2005 exe "normal! ione\ttwo three"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2006 call assert_equal("eerht owt\teno", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2007 call setline(1, "one\ttwo three")
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2008 normal! gg$bi a
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2009 call assert_equal("one\ttwo a three", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2010 exe "normal! $bi\<BS>\<BS>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2011 call assert_equal("one\ttwo a ree", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2012 exe "normal! 0wi\<C-W>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2013 call assert_equal("one\t a ree", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2014 exe "normal! 0wi\<C-U>"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2015 call assert_equal("one\t ", getline(1))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2016 " newline in insert mode starts at the end of the line
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2017 call setline(1, 'one two three')
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2018 exe "normal! wi\nfour"
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2019 call assert_equal(['one two three', 'ruof'], getline(1, '$'))
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2020 set revins&
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2021 bw!
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2022 endfunc
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	2023
25786 ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2024 " Test for getting the character of the line below after "p"
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2025 func Test_edit_put_CTRL_E()
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2026 set encoding=latin1
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2027 new
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2028 let @" = ''
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2029 sil! norm orggRx
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2030 sil! norm pr
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2031 call assert_equal(['r', 'r'], getline(1, 2))
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2032 bwipe!
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2033 set encoding=utf-8
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2034 endfunc
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2035
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2036 " Test for ModeChanged pattern
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2037 func Test_mode_changes()
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2038 let g:index = 0
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2039 let g:mode_seq = ['n', 'i', 'n', 'v', 'V', 'i', 'ix', 'i', 'ic', 'i', 'n', 'no', 'n', 'V', 'v', 's', 'n']
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2040 func! TestMode()
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2041 call assert_equal(g:mode_seq[g:index], get(v:event, "old_mode"))
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2042 call assert_equal(g:mode_seq[g:index + 1], get(v:event, "new_mode"))
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2043 call assert_equal(mode(1), get(v:event, "new_mode"))
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2044 let g:index += 1
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2045 endfunc
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2046
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2047 au ModeChanged * :call TestMode()
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2048 let g:n_to_any = 0
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2049 au ModeChanged n:* let g:n_to_any += 1
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2050 call feedkeys("i\<esc>vVca\<CR>\<C-X>\<C-L>\<esc>ggdG", 'tnix')
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2051
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2052 let g:V_to_v = 0
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2053 au ModeChanged V:v let g:V_to_v += 1
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2054 call feedkeys("Vv\<C-G>\<esc>", 'tnix')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2055 call assert_equal(len(filter(g:mode_seq[1:], {idx, val -> val == 'n'})), g:n_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2056 call assert_equal(1, g:V_to_v)
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2057 call assert_equal(len(g:mode_seq) - 1, g:index)
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2058
25858 fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2059 let g:n_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2060 au ModeChanged n:i let g:n_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2061 let g:n_to_niI = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2062 au ModeChanged i:niI let g:n_to_niI += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2063 let g:niI_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2064 au ModeChanged niI:i let g:niI_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2065 let g:nany_to_i = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2066 au ModeChanged n*:i let g:nany_to_i += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2067 let g:i_to_n = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2068 au ModeChanged i:n let g:i_to_n += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2069 let g:nori_to_any = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2070 au ModeChanged [ni]:* let g:nori_to_any += 1
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2071 let g:i_to_any = 0
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2072 au ModeChanged i:* let g:i_to_any += 1
25856 1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2073 let g:index = 0
1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2074 let g:mode_seq = ['n', 'i', 'niI', 'i', 'n']
1a5351f6803f patch 8.2.3462: ModeChanged only uses one character for new_mode and old_mode Bram Moolenaar <Bram@vim.org> parents: 25790 diff changeset	2075 call feedkeys("a\<C-O>l\<esc>", 'tnix')
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2076 call assert_equal(len(g:mode_seq) - 1, g:index)
25858 fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2077 call assert_equal(1, g:n_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2078 call assert_equal(1, g:n_to_niI)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2079 call assert_equal(1, g:niI_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2080 call assert_equal(2, g:nany_to_i)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2081 call assert_equal(1, g:i_to_n)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2082 call assert_equal(2, g:i_to_any)
fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2083 call assert_equal(3, g:nori_to_any)
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2084
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2085 if has('terminal')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2086 let g:mode_seq += ['c', 'n', 't', 'nt', 'c', 'nt', 'n']
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2087 call feedkeys(":term\<CR>\<C-W>N:bd!\<CR>", 'tnix')
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2088 call assert_equal(len(g:mode_seq) - 1, g:index)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2089 call assert_equal(1, g:n_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2090 call assert_equal(1, g:n_to_niI)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2091 call assert_equal(1, g:niI_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2092 call assert_equal(2, g:nany_to_i)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2093 call assert_equal(1, g:i_to_n)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2094 call assert_equal(2, g:i_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2095 call assert_equal(5, g:nori_to_any)
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2096 endif
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2097
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2098 au! ModeChanged
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2099 delfunc TestMode
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2100 unlet! g:mode_seq
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2101 unlet! g:index
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2102 unlet! g:n_to_any
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2103 unlet! g:V_to_v
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2104 unlet! g:n_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2105 unlet! g:n_to_niI
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2106 unlet! g:niI_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2107 unlet! g:nany_to_i
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2108 unlet! g:i_to_n
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2109 unlet! g:nori_to_any
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2110 unlet! g:i_to_any
25790 16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2111 endfunc
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2112
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2113 func Test_recursive_ModeChanged()
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2114 au! ModeChanged * norm 0u
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2115 sil! norm
26157 20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2116 au! ModeChanged
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2117 endfunc
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2118
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2119 func Test_ModeChanged_starts_visual()
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2120 " This was triggering ModeChanged before setting VIsual, causing a crash.
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2121 au! ModeChanged * norm 0u
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2122 sil! norm
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2123
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2124 au! ModeChanged
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2125 endfunc
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2126
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2127 " Test toggling of input method. See :help i_CTRL-^
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2128 func Test_edit_CTRL_hat()
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2129 CheckFeature xim
26069 33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2130
28303 9849df834f1d patch 8.2.4677: the Athena GUI support is outdated Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	2131 " FIXME: test fails with Motif GUI.
26069 33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2132 " test also fails when running in the GUI.
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2133 CheckFeature gui_gtk
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2134 CheckNotGui
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2135
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2136 new
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2137
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2138 call assert_equal(0, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2139 call feedkeys("i\<C-^>", 'xt')
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2140 call assert_equal(2, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2141 call feedkeys("i\<C-^>", 'xt')
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2142 call assert_equal(0, &iminsert)
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2143
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2144 bwipe!
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2145 endfunc
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2146
27090 5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2147 " Weird long file name was going over the end of NameBuff
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2148 func Test_edit_overlong_file_name()
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2149 CheckUnix
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2150
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2151 file 0000000000000000000000000000
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2152 file %%%%%%%%%%%%%%%%%%%%%%%%%%
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2153 file %%%%%%
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2154 set readonly
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2155 set ls=2
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2156
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2157 redraw!
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2158 set noreadonly ls&
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2159 bwipe!
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2160 endfunc
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2161
28704 e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2162 func Test_edit_shift_bs()
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2163 CheckMSWindows
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2164
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2165 " FIXME: this works interactively, but the test fails
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2166 throw 'Skipped: Shift-Backspace Test not working correctly :('
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2167
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2168 " Need to run this in Win32 Terminal, do not use CheckRunVimInTerminal
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2169 if !has("terminal")
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2170 return
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2171 endif
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2172
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2173 " Shift Backspace should work like Backspace in insert mode
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2174 let lines =<< trim END
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2175 call setline(1, ['abc'])
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2176 END
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2177 call writefile(lines, 'Xtest_edit_shift_bs')
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2178
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2179 let buf = RunVimInTerminal('-S Xtest_edit_shift_bs', #{rows: 3})
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2180 call term_sendkeys(buf, "A\<S-BS>-\<esc>")
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2181 call TermWait(buf, 50)
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2182 call assert_equal('ab-', term_getline(buf, 1))
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2183
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2184 " clean up
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2185 call StopVimInTerminal(buf)
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2186 call delete('Xtest_edit_shift_bs')
e1aff2f300be patch 8.2.4876: MS-Windows: Shift-BS results in strange char in powershell Bram Moolenaar <Bram@vim.org> parents: 28371 diff changeset	2187 endfunc
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2188
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	2189 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_edit.vim @ 29340:fba9e366ced4 v9.0.0013