vim: src/testdir/test_edit.vim annotate

annotate src/testdir/test_edit.vim @ 27372:81d391f7c189 v8.2.4214

patch 8.2.4214: illegal memory access with large 'tabstop' in Ex mode Commit: https://github.com/vim/vim/commit/85b6747abc15a7a81086db31289cf1b8b17e6cb1 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jan 25 11:55:02 2022 +0000 patch 8.2.4214: illegal memory access with large 'tabstop' in Ex mode Problem: Illegal memory access with large 'tabstop' in Ex mode. Solution: Allocate enough memory.

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 25 Jan 2022 13:00:06 +0100
parents	63179e8300f8
children	fb4c30606b4a

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
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	394 if exists("+smartindent")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	395 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	396 set smartindent autoindent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	397 call setline(1, ["\tabc"])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	398 call feedkeys("A {\<cr>more\<cr>}\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	399 call assert_equal(["\tabc {", "\t\tmore", "\t}"], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	400 set smartindent& autoindent&
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	401 bwipe!
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	402 endif
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	403
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	404 " 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	405 new
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	406 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	407 set autoindent
de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	408 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	409 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	410 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	411 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	412 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	413
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	414 " 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	415 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	416 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	417 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	418 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	419 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	420
16011 de810c9651c8 patch 8.1.1011: indent from autoindent not removed from blank line Bram Moolenaar <Bram@vim.org> parents: 15607 diff changeset	421 bwipe!
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	422 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	423
24204 ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	424 " 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	425 " 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	426 " terminal.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	427 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	428 CheckRunVimInTerminal
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	429 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	430 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	431 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	432 " 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	433 " remove the indent.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	434 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	435 " 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	436 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	437 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	438 " 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	439 " 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	440 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	441 " 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	442 " exercised.
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	443 call TermWait(buf, 50)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	444 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	445 call TermWait(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	446 call StopVimInTerminal(buf)
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	447 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	448 call delete('Xfile')
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	449 endfunc
ec71c859e94c patch 8.2.2643: various code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 24164 diff changeset	450
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	451 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	452 " 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	453 " 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	454 " 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	455 CheckFeature quickfix
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	456 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	457 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	458 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	459 copen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	460 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	461 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	462 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	463 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	464 cclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	465 botright new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	466 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	467 lopen
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	468 set modifiable
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	469 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	470 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	471 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	472 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	473 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	474 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	475 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	476 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	477 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	478 lclose
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	479 call delete('Xqflist.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	480 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	481
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	482 func Test_edit_CTRL_()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	483 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	484 " 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	485 CheckNotMSWindows
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	486 let _encoding=&encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	487 set encoding=utf-8
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	488 " Test for CTRL-_
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	489 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	490 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	491 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	492 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	493 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	494 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	495 set ari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	496 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	497 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	498 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	499 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	500 call assert_true(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	501 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	502 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	503 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	504 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	505 call assert_false(&revins)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	506 set noari
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	507 let &encoding=_encoding
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	508 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	509 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	510
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	511 " 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	512 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	513 " Test pressing CTRL-A
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	514 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	515 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	516 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	517 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	518 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	519 catch /^Vim\%((\a\+)\)\=:E29/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	520 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	521 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	522 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	523 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	524 call cursor(2, 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\<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	526 call cursor(3, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	527 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	528 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	529 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	530 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	531
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	532 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	533 " 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	534 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	535 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	536 call cursor(30, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	537 norm! z.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	538 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	539 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	540 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	541 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	542 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	543 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	544 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	545 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	546 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	547
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	548 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	549 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	550 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	551 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	552 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	553 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	554 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	555 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	556 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	557 call cursor(2, 4)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	558 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	559 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	560 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	561 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	562 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	563 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	564 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	565
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	566 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	567 " Tab in completion mode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	568 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	569 new
14039 acb2dc112b06 patch 8.1.0037: cannot easily append lines to another buffer Christian Brabandt <cb@256bit.org> parents: 14033 diff changeset	570 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	571 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	572 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	573 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	574 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	575 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	576 call setline(1, [include, ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	577 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	578 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	579 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	580 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	581 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	582 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	583 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	584 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	585 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	586 call delete("Xinclude.txt")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	587 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	588 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	589
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	590 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	591 " 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	592 " 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	593 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	594 set dictionary=Xdictionary.txt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	595 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	596 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	597 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	598 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	599 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	600 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	601 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	602 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	603 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	604 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	605 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	606 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	607 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	608 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	609 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	610 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	611 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	612 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	613 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	614 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	615 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	616 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	617 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	618 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	619 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	620
19195 2ef19eed524a patch 8.2.0156: various typos in source files and tests Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	621 " 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	622 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	623 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	624 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	625 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	626 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	627 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	628 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	629 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	630 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	631 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	632 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	633 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	634 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	635 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	636 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	637
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	638 set dictionary=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	639 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	640 call setline(1, 'A')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	641 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	642 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	643 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	644 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	645 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	646 " 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	647 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	648 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	649 call delete('Xdictionary.txt')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	650
15607 2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	651 call test_override("char_avail", 1)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	652 set showcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	653 %d
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	654 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	655 call assert_equal(['ä'], getline(1, '$'))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	656 call test_override("char_avail", 0)
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	657 set noshowcmd
2dcaa860e3fc patch 8.1.0811: too many #ifdefs Bram Moolenaar <Bram@vim.org> parents: 15406 diff changeset	658
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	659 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	660 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	661
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	662 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	663 " 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	664 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	665 set complete=.
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	666 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	667 call cursor(4, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	668 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	669 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	670 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	671 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	672 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	673 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	674 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	675 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	676 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	677 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	678 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	679 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	680 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	681 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	682 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	683 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	684 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	685 call cursor(5, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	686 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	687 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	688 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	689 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	690 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	691 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	692 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	693 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	694 syn on
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	695 syn match ErrorMsg "^bar"
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	696 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	697 func! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	698 let g:change=1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	699 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	700 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	701
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	702 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	703 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	704 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	705 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	706 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	707
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	708 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	709 call clearmatches()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	710 syn off
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	711 au! TextChangedI
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	712 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	713 unlet! g:change
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	714 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	715 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	716 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	717
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	718 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	719 " Check keyword completion
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	720 for e in ['latin1', 'utf-8']
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	721 exe 'set encoding=' .. e
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	722 new
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	723 set complete=.
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	724 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	725 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	726 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	727 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	728 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	729 %d
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	730 call setline(1, ['INFER', 'loWER', '', '', ])
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	731 call cursor(3, 1)
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	732 set ignorecase infercase
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	733 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	734 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	735 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	736 set noignorecase noinfercase
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	737 %d
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	738 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	739 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	740 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	741 %d
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	742 set complete&
23984 e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	743 bw!
e27b5529dc6a patch 8.2.2534: missing test coverage Bram Moolenaar <Bram@vim.org> parents: 22724 diff changeset	744 endfor
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	745 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	746
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	747 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	748 " 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	749 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	750 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	751 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	752 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	753 " 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	754 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	755 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	756 call assert_true(&nu)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	757 set nonu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	758 iunabbr <buffer> h
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	759 " 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	760 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	761 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	762 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	763 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	764 set ve=onemore
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	765 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	766 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	767 set ve=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	768 unlet! g:a
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	769 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	770 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	771
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	772 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	773 " Insert Register
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	774 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	775 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	776 set showcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	777 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	778 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	779 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	780 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	781 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	782 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	783 set noshowcmd
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	784 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	785 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	786
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	787 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	788 " 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	789 " 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	790 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	791 if !has("spell")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	792 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	793 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	794 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	795 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	796 return
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	797 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	798 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	799 " 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	800 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	801 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	802 catch /^Vim\%((\a\+)\)\=:E756/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	803 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	804 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	805 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	806 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	807 setl spell spelllang=en
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	808 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	809 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	810 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	811 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	812 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	813 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	814 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	815 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	816 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	817 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	818 call setline(1, 'vim')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	819 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	820 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	821 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	822 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	823 " empty buffer
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	824 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	825 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	826 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	827 setl nospell
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	828 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	829 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	830
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	831 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	832 " 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	833 " 1) increase indent
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	834 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	835 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	836 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	837 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	838 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	839 " 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	840 set paste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	841 call setline(1, "abc")
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	842 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	843 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	844 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	845 set nopaste
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	846 " 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	847 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	848 set thesaurus=Xthesaurus
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	849 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	850 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	851 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	852 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	853 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	854 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	855 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	856 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	857 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	858 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	859 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	860 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	861 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	862 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	863 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	864 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	865 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	866 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	867 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	868 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	869 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	870 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	871 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	872 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	873 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	874 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	875 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	876 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	877 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	878 " 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	879 set complete=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	880 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	881 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	882 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	883 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	884 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	885 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	886 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	887 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	888 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	889 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	890 set complete&
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	891
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	892 set thesaurus=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	893 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	894 call setline(1, 'mad')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	895 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	896 let v:testing = 1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	897 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	898 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	899 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	900 " 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	901 let v:testing = 0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	902 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	903 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	904 call delete('Xthesaurus')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	905 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	906 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	907
26921 b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	908 " 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	909 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	910 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	911 set thesaurus=Xthesaurus
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	912 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	913 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	914 new
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	915 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	916 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	917 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	918 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	919 bw!
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	920 endfor
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	921 set thesaurus=
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	922 call delete('Xthesaurus')
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	923 endfunc
b975b7c16ba1 patch 8.2.3989: some insert completion code is not tested Bram Moolenaar <Bram@vim.org> parents: 26743 diff changeset	924
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	925 " Test 'thesaurusfunc'
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	926 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	927 let mythesaurus = [
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	928 \ #{word: "happy",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	929 \ 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	930 \ #{word: "kind",
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	931 \ 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	932 if a:findstart
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	933 " 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	934 let line = getline('.')
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	935 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	936 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	937 let start -= 1
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	938 endwhile
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	939 return start
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	940 else
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	941 " 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	942 let res = []
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	943 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	944 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	945 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	946 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	947 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	948 endfor
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	949 return res
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	950 endif
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	951 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	952
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	953 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	954 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	955 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	956 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	957 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	958 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	959 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	960 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	961 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	962
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	963 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	964 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	965
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	966 setlocal thesaurusfunc=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	967 set thesaurusfunc=NonExistingFunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	968 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	969 %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	970
ac330e2fecc4 patch 8.2.3528: 'thesaurus' and 'thesaurusfunc' do not have the same scope Bram Moolenaar <Bram@vim.org> parents: 25974 diff changeset	971 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	972 set thesaurus=
25974 416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	973 endfunc
416237f1de22 patch 8.2.3520: cannot define a function for thesaurus completion Bram Moolenaar <Bram@vim.org> parents: 25858 diff changeset	974
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	975 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	976 " Test 'completefunc'
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	977 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	978 " -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	979 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	980 fun! CompleteMonths(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	981 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	982 " 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	983 return g:special
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	984 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	985 " 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	986 let res = []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	987 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	988 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	989 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	990 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	991 endfor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	992 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	993 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	994 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	995 set completefunc=CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	996 call setline(1, ['', ''])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	997 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	998 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	999 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	1000 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1001 let g:special=-1
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1002 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	1003 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	1004 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1005 let g:special=-2
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1006 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	1007 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	1008 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1009 let g:special=-3
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1010 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	1011 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	1012 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1013 let g:special=0
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1014 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	1015 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	1016 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1017 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	1018 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	1019 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1020 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	1021 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	1022 delfu CompleteMonths
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1023 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1024 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1025 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	1026 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	1027 catch /^Vim\%((\a\+)\)\=:E117/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1028 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	1029 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1030 set completefunc=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1031 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1032 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1033
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	1034 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	1035 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	1036 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	1037 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	1038 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	1039 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	1040 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	1041 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	1042 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	1043 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	1044 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	1045 2d
20229 06a1dd50463e patch 8.2.0670: cannot change window when evaluating 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 20187 diff changeset	1046 call assert_fails("normal 2G$a\<C-X>\<C-U>", 'E578:')
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	1047 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	1048 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	1049
252d2bb90394 patch 8.2.0614: get ml_get error when deleting a line in 'completefunc' Bram Moolenaar <Bram@vim.org> parents: 19852 diff changeset	1050
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1051 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	1052 " 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	1053 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1054 call setline(1, 'abc')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1055 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	1056 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	1057 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1058 " 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	1059 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1060
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1061 func Test_edit_DROP()
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1062 CheckFeature dnd
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1063 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1064 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	1065 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1066 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1067 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	1068 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	1069 catch /^Vim\%((\a\+)\)\=:E353/
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1070 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	1071 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1072 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1073 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1074
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1075 func Test_edit_CTRL_V()
27350 63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1076 CheckNotFeature ebcdic
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 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1079 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1080 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	1081
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1082 " force some redraws
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1083 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	1084 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	1085
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1086 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	1087 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	1088
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1089 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	1090 set rl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1091 call setline(1, ['abc'])
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1092 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1093 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	1094 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	1095 set norl
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1096 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1097
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1098 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	1099 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	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 " 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	1102 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	1103 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	1104
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1105 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	1106 " 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	1107 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	1108 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	1109 endif
63179e8300f8 patch 8.2.4203: entering a character with CTRL-V may include modifiers Bram Moolenaar <Bram@vim.org> parents: 27090 diff changeset	1110
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1111 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1112 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1113
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1114 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	1115 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18538 diff changeset	1116
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1117 " Pressing <f1>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1118 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1119 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	1120 set noinsertmode
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1121 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	1122 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1123 bw
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1124 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1125
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1126 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	1127 " Pressing <f21>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1128 " sends a netbeans command
21765 08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1129 CheckFeature netbeans_intg
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1130 new
08940efa6b4e patch 8.2.1432: various inconsistencies in test files Bram Moolenaar <Bram@vim.org> parents: 21580 diff changeset	1131 " 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	1132 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	1133 bw
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1134 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1135
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1136 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	1137 " Test Home/End Keys
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1138 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1139 set foldopen+=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1140 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	1141 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1142 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	1143 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1144 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	1145 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	1146
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1147 set foldopen-=hor
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1148 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1149 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1150
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1151 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	1152 " Test for Pressing <Insert>
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1153 new
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>ZYX>", '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>', 'def'], getline(1, '$'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1158 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	1159 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1160 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	1161 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	1162 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1163 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1164
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1165 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	1166 " 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	1167 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1168 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	1169 let _ww=&ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1170 set ww=
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1171 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1172 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	1173 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	1174 " 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	1175 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	1176 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	1177 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	1178 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	1179 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	1180 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	1181 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	1182 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	1183 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	1184 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	1185 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	1186 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	1187 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	1188 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	1189 call cursor(3, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1190 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	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, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1193 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1194 " <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	1195 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	1196 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	1197 " 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	1198 set ww+=[,]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1199 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1200 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	1201 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	1202 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1203 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	1204 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	1205 call cursor(2, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1206 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	1207 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	1208 let &ww = _ww
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1209 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1210 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1211
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1212 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	1213 " 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	1214 CheckFeature mouse
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1215 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1216 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	1217 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1218 set mouse=a
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1219 call feedkeys("A\<ScrollWheelDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1220 call assert_equal([0, 4, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1221 " This should move by one pageDown, but only moves
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1222 " by one line when the test is run...
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1223 call feedkeys("A\<S-ScrollWheelDown>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1224 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	1225 set nostartofline
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')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1227 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1228 call feedkeys("A\<LeftMouse>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1229 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1230 call feedkeys("A\<RightMouse>\<esc>", 'tnix')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1231 call assert_equal([0, 6, 1, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1232 call cursor(1, 100)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1233 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1234 " 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	1235 " 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	1236 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	1237 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	1238 call cursor(1, 30)
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 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	1241 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	1242 call cursor(1, 30)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1243 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1244 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	1245 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	1246 %d
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1247 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	1248 call cursor(2, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1249 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	1250 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	1251 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	1252 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	1253 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	1254 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	1255 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	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\<C-ScrollWheelRight>\<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\<C-ScrollWheelLeft>\<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 set mouse& startofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1262 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1263 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1264
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1265 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	1266 10new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1267 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	1268 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1269 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	1270 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	1271 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	1272 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	1273 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	1274 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	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, 30, 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, 30, 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("A\<PageUp>\<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, 29, 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("A\<PageUp>\<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, 21, 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("A\<PageUp>\<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, 13, 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, 5, 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, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1289 " <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	1290 " <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	1291 call cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1292 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	1293 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	1294 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	1295 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	1296 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	1297 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	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, 30, 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, 30, 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("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	1303 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	1304 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	1305 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	1306 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	1307 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	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, 5, 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, 5, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1312 set nostartofline
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1313 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1314 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1315 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	1316 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	1317 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	1318 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	1319 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	1320 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	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, 5, 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, 5, 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 cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1326 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	1327 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	1328 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	1329 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	1330 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	1331 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	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, 30, 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, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1336 " <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	1337 " <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	1338 call cursor(30, 11)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1339 norm! zt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1340 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	1341 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	1342 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	1343 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	1344 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	1345 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	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, 5, 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, 5, 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 cursor(1, 1)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1351 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	1352 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	1353 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	1354 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	1355 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	1356 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	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, 30, 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, 30, 11, 0], getpos('.'))
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1361 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1362 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1363
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1364 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	1365 new
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1366 " 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	1367 call setline(1, 'a')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1368 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	1369 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	1370 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	1371 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	1372 delcom Sandbox
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1373 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	1374
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1375 " 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	1376 fu! DoIt()
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1377 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	1378 endfu
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1379 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	1380 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1381 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	1382 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	1383 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	1384 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1385 " 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	1386 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	1387 delfu DoIt
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1388 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1389 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	1390 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	1391 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	1392 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1393 au! InsertCharPre
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1394
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1395 " 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	1396 fun! Complete(findstart, base)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1397 if a:findstart
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1398 return col('.')
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1399 else
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1400 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	1401 return []
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1402 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1403 endfun
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1404 set completefunc=Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1405 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1406 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	1407 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	1408 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	1409 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1410 delfu Complete
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1411 set completefunc=
26592 9f445e07f766 patch 8.2.3825: various comments could be improved Bram Moolenaar <Bram@vim.org> parents: 26211 diff changeset	1412
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1413 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	1414 " 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	1415 set revins fkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1416 try
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1417 normal Ri
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1418 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	1419 catch
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1420 finally
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1421 set norevins nofkmap
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1422 endtry
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1423 endif
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1424 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1425 endfunc
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1426
15406 63b02fcf1361 patch 8.1.0711: test files still use function! Bram Moolenaar <Bram@vim.org> parents: 14985 diff changeset	1427 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	1428 " 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	1429 CheckFeature rightleft
11105 7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1430 call NewWindow(10, 20)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1431 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	1432 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1433 set rightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1434 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1435 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	1436 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1437 \" cba",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1438 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1439 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1440 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1441 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	1442 " 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	1443 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	1444 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	1445 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1446 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	1447 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1448 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	1449 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1450 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	1451 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1452 \" cb",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1453 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1454 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1455 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1456 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	1457 " 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	1458 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	1459 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1460 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	1461 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	1462 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1463 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	1464 call cursor(1, 2)
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1465 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	1466 " Screen looks as expected
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1467 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	1468 let expect = [
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1469 \" ca",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1470 \" fed",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1471 \" ihg",
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1472 \" ~"]
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1473 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	1474 %d _
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1475 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	1476 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	1477 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	1478 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1479 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	1480 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	1481 set norightleft
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1482 bw!
7c7e496e625d patch 8.0.0440: not enough test coverage in Insert mode Christian Brabandt <cb@256bit.org> parents: diff changeset	1483 endfunc
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1484
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1485 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	1486 " 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	1487 CheckUnix
11319 2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1488
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1489 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	1490 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	1491 try
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1492 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	1493 catch /E739:/
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1494 " 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	1495 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	1496 return
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1497 endtry
2dc624388934 patch 8.0.0545: edit test may fail on some systems Christian Brabandt <cb@256bit.org> parents: 11315 diff changeset	1498
16692 2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1499 " 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	1500 " 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	1501 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	1502 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	1503
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1504 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	1505 " 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	1506 " 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	1507 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	1508 sleep 100m
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1509 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	1510 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	1511 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	1512 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1513 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	1514 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	1515 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	1516 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1517 endif
2e689fb67c91 patch 8.1.1348: running tests may cause the window to move Bram Moolenaar <Bram@vim.org> parents: 16419 diff changeset	1518
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1519 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	1520 " 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	1521 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	1522 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	1523
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1524 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	1525 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	1526 new
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1527 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	1528 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	1529
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1530 bwipe!
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1531 exe 'bwipe! ' . longfilename
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1532 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	1533 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	1534 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	1535 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	1536 endif
11289 e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1537 set swapfile&
e0309111d976 patch 8.0.0530: buffer overflow when 'columns' is very big Christian Brabandt <cb@256bit.org> parents: 11171 diff changeset	1538 endfunc
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1539
14409 9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1540 func Test_edit_backtick()
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1541 next a\`b c
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1542 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	1543 next
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1544 call assert_equal('c', expand('%'))
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1545 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	1546 endfunc
9ffce640d0d3 patch 8.1.0219: expanding ## fails to escape backtick Christian Brabandt <cb@256bit.org> parents: 14039 diff changeset	1547
12654 d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1548 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	1549 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	1550 split
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1551 new
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1552 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	1553 3wincmd w
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1554 redraw!
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1555 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	1556 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	1557 only
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1558 endfunc
d03798bddf5e patch 8.0.1205: it is possible to unload a changed buffer Christian Brabandt <cb@256bit.org> parents: 12644 diff changeset	1559
14033 bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1560 func Test_edit_alt()
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1561 " 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	1562 new
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1563 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	1564 w XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1565 $
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1566 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1567 e Xother
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1568 e #
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1569 call assert_equal(3, line('.'))
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1570
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1571 bwipe XAltFile
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1572 call delete('XAltFile')
bcda3b864c31 patch 8.1.0034: cursor not restored with ":edit #" Christian Brabandt <cb@256bit.org> parents: 13215 diff changeset	1573 endfunc
14985 4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1574
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1575 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	1576 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	1577 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	1578 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	1579 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	1580 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	1581 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	1582 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	1583 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	1584 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	1585
22651 fba5ccf33794 patch 8.2.1874: can't do something just before leaving Insert mode Bram Moolenaar <Bram@vim.org> parents: 22588 diff changeset	1586 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	1587 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	1588 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	1589 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	1590 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	1591 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	1592
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1593 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	1594 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	1595 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	1596 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	1597 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	1598 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	1599 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	1600
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1601 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	1602 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	1603 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	1604 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	1605 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	1606 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	1607 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	1608
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1609 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	1610 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	1611 iunmap x
4ebda55537a5 patch 8.1.0504: when CTRL-C is mapped it triggers InsertLeave Bram Moolenaar <Bram@vim.org> parents: 14409 diff changeset	1612 endfunc
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1613
20187 79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1614 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	1615 new XtestUndo
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1616 set undofile
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1617 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	1618 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	1619 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	1620 normal u
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1621 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	1622
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1623 bwipe!
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1624 au! InsertLeave
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1625 call delete('XtestUndo')
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1626 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	1627 set undofile&
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1628 endfunc
79cc97206476 patch 8.2.0649: undo problem whn an InsertLeave autocommand resets undo Bram Moolenaar <Bram@vim.org> parents: 20118 diff changeset	1629
16419 aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1630 " 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	1631 func Test_edit_special_chars()
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1632 new
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1633
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1634 if has("ebcdic")
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1635 let t = "o\<C-V>193\<C-V>xc2\<C-V>o303 \<C-V>90a\<C-V>xfg\<C-V>o578\<Esc>"
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1636 else
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1637 let t = "o\<C-V>65\<C-V>x42\<C-V>o103 \<C-V>33a\<C-V>xfg\<C-V>o78\<Esc>"
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1638 endif
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1639
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1640 exe "normal " . t
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1641 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	1642
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1643 close!
aebcd20a8a3f patch 8.1.1214: old style tests Bram Moolenaar <Bram@vim.org> parents: 16011 diff changeset	1644 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	1645
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1646 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	1647 new
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1648 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	1649 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	1650 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	1651 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	1652
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 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	1654 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	1655 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	1656
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1657 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	1658 bwipe!
2ea47dee7ddd patch 8.1.1988: :startinsert! does not work the same way as "A" Bram Moolenaar <Bram@vim.org> parents: 17857 diff changeset	1659 endfunc
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1660
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1661 " 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	1662 func Test_edit_startreplace()
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1663 new
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1664 call setline(1, 'abc')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1665 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	1666 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	1667 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	1668 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	1669 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	1670 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	1671 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	1672 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	1673 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	1674 close!
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1675 endfunc
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1676
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1677 func Test_edit_noesckeys()
18538 c4d97a18af37 patch 8.1.2263: 'noesckeys' test fails in GUI Bram Moolenaar <Bram@vim.org> parents: 18534 diff changeset	1678 CheckNotGui
18534 7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1679 new
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1680
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1681 " <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	1682 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	1683 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1684 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	1685 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	1686
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1687 " <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	1688 set noesckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1689 call setline(1, '')
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1690 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	1691 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	1692
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1693 bwipe!
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1694 set esckeys
7dd83b5325e9 patch 8.1.2261: with modifyOtherKeys set 'noesckeys' doesn't work Bram Moolenaar <Bram@vim.org> parents: 17984 diff changeset	1695 endfunc
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	1696
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1697 " 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	1698 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	1699 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1700 set showmode showcmd
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1701 " 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	1702 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	1703 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	1704 try
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1705 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	1706 catch /E492:/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1707 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	1708 endtry
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1709 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	1710 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	1711 set showmode& showcmd&
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1712 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	1713 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1714 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1715
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1716 " 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	1717 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	1718 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1719 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1720 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1721 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	1722 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1723 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	1724 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1725 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1726
22490 23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1727 " 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	1728 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	1729 CheckEnglish
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1730 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	1731 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	1732
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1733 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1734 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1735 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	1736 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1737 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	1738 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1739
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1740 let dirname .= '/'
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 new
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1743 redir => msg
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1744 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	1745 redir END
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1746 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	1747 bwipe!
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1748
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1749 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	1750 endfunc
23a5977d7211 patch 8.2.1793: not consistently giving the "is a directory" warning Bram Moolenaar <Bram@vim.org> parents: 21765 diff changeset	1751
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1752 " 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	1753 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	1754 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1755 call writefile([], 'Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1756 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1757 new ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1758 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1759 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	1760 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	1761 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1762 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19613 diff changeset	1763
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1764 " 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	1765 func Test_edit_charconvert()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1766 CheckEnglish
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1767 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	1768
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1769 " 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	1770 set charconvert=NonExitingFunc()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1771 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1772 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	1773 try
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1774 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1775 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1776 catch /E117:/
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1777 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	1778 finally
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1779 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1780 endtry
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1781 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	1782 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	1783 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	1784 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1785 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1786
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1787 " '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	1788 func Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1789 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1790 set charconvert=Cconv1()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1791 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1792 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1793 edit ++enc=axbyc Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1794 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1795 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	1796 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	1797 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1798 delfunc Cconv1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1799 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1800
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1801 " '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	1802 func Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1803 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	1804 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	1805 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	1806 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1807 set charconvert=Cconv2()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1808 new Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1809 write ++enc=ucase Xfile1
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1810 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	1811 call delete('Xfile1')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1812 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1813 delfunc Cconv2
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1814 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1815
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1816 " '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	1817 func Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1818 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	1819 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1820 set charconvert=Cconv3()
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1821 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1822 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	1823 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	1824 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1825 delfunc Cconv3
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1826 set charconvert&
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1827
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1828 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1829 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1830
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1831 " 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	1832 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	1833 CheckUnix
24164 2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1834 CheckNotRoot
2259c73cc1d9 patch 8.2.2623: some tests fail when run as root Bram Moolenaar <Bram@vim.org> parents: 24057 diff changeset	1835
20861 1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1836 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	1837 call setfperm('Xfile', '-w-------')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1838 new
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1839 redir => msg
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1840 edit Xfile
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1841 redir END
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1842 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	1843 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	1844 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	1845 close!
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1846 call delete('Xfile')
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1847 endfunc
1725bb56178a patch 8.2.0982: insufficient testing for reading/writing files Bram Moolenaar <Bram@vim.org> parents: 20832 diff changeset	1848
20941 505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1849 " Pressing escape in 'insertmode' should beep
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1850 func Test_edit_insertmode_esc_beeps()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1851 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1852 set insertmode
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1853 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	1854 set insertmode&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1855 " unsupported CTRL-G command should beep 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	1856 call assert_beeps("normal i\<C-G>l")
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1857 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1858 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1859
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1860 " 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	1861 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	1862 CheckFeature rightleft
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1863 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	1864 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	1865 endif
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1866 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1867
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1868 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	1869 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	1870 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	1871 let str ..= '`/'',.;'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1872 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	1873 let expected = "óõú,.;"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1874 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	1875 let expected ..= "æèñ'äåàãø/ôíîöêìçïéòë÷âáðù"
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1876 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	1877
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1878 %d
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1879 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	1880 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	1881 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	1882 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	1883 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	1884 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	1885 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	1886
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1887 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	1888 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1889 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1890
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1891 " 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	1892 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	1893 CheckFeature rightleft
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 set allowrevins
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1896 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	1897 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	1898 set allowrevins&
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1899 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1900 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1901
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1902 " 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	1903 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	1904 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1905 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	1906 func SaveFirstLine()
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1907 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	1908 return 'r'
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1909 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1910 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	1911 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	1912 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	1913 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	1914 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	1915 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	1916 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	1917 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1918 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1919
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1920 " 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	1921 " 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	1922 " 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	1923 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	1924 new
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1925 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	1926 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	1927 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	1928 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	1929 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	1930 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	1931 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1932 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	1933 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	1934
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1935 " 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	1936 1,2fold
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1937 normal gg
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1938 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	1939 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	1940 redraw!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1941 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	1942 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	1943
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1944 close!
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1945 endfunc
505d97ea54da patch 8.2.1022: various parts of code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 20861 diff changeset	1946
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	1947 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	1948 " 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	1949 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	1950
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1951 " ":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	1952 " 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	1953 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	1954 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	1955 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	1956
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1957 " 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	1958 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	1959 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	1960
050cff1294ab patch 8.2.1842: crash when USE_FNAME_CASE is defined and using :browse Bram Moolenaar <Bram@vim.org> parents: 22490 diff changeset	1961 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	1962 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	1963 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	1964
22724 51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1965 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	1966 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	1967 " 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	1968 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	1969 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	1970 endfunc
51bc501a13ca patch 8.2.1910: reading past the end of the command line Bram Moolenaar <Bram@vim.org> parents: 22651 diff changeset	1971
24882 4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1972 " 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	1973 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	1974 CheckFeature rightleft
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1975 new
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1976 set revins
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1977 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	1978 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	1979 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	1980 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	1981 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	1982 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	1983 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	1984 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	1985 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	1986 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	1987 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	1988 " 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	1989 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	1990 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	1991 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	1992 set revins&
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1993 bw!
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1994 endfunc
4c1b6f3eb96b patch 8.2.2979: not all options code is covered by tests Bram Moolenaar <Bram@vim.org> parents: 24204 diff changeset	1995
25786 ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1996 " 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	1997 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	1998 set encoding=latin1
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	1999 new
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2000 let @" = ''
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2001 sil! norm orggRx
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2002 sil! norm pr
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2003 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	2004 bwipe!
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2005 set encoding=utf-8
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2006 endfunc
ec62e0764ffa patch 8.2.3428: using freed memory when replacing Bram Moolenaar <Bram@vim.org> parents: 24882 diff changeset	2007
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	2008 " 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	2009 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	2010 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	2011 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	2012 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	2013 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	2014 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	2015 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	2016 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	2017 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	2018
16a7d1154be8 patch 8.2.3430: no generic way to trigger an autocommand on mode change Bram Moolenaar <Bram@vim.org> parents: 25786 diff changeset	2019 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	2020 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	2021 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	2022 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	2023
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2024 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	2025 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	2026 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	2027 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	2028 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	2029 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	2030
25858 fc39d7352cb6 patch 8.2.3463: pattern matching with ModeChanged not tested Bram Moolenaar <Bram@vim.org> parents: 25856 diff changeset	2031 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	2032 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	2033 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	2034 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	2035 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	2036 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	2037 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	2038 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	2039 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	2040 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	2041 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	2042 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	2043 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	2044 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	2045 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	2046 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	2047 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	2048 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	2049 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	2050 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	2051 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	2052 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	2053 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	2054 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	2055 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	2056
26042 6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2057 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	2058 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	2059 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	2060 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	2061 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	2062 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	2063 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	2064 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	2065 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	2066 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	2067 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	2068 endif
6b39ab99e367 patch 8.2.3555: ModeChanged is not triggered on every mode change Bram Moolenaar <Bram@vim.org> parents: 25990 diff changeset	2069
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	2070 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	2071 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	2072 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	2073 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	2074 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	2075 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	2076 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	2077 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	2078 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	2079 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	2080 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	2081 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	2082 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	2083 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	2084
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2085 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	2086 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	2087 sil! norm
26157 20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2088 au! ModeChanged
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2089 endfunc
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2090
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2091 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	2092 " 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	2093 au! ModeChanged * norm 0u
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2094 sil! norm
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2095
20200363816c patch 8.2.3610: crash when ModeChanged triggered too early Bram Moolenaar <Bram@vim.org> parents: 26155 diff changeset	2096 au! ModeChanged
26155 f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2097 endfunc
f2392648af3e patch 8.2.3609: internal error when ModeChanged is triggered recursively Bram Moolenaar <Bram@vim.org> parents: 26069 diff changeset	2098
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2099 " 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	2100 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	2101 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	2102
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2103 " FIXME: test fails with Athena and Motif GUI.
33ae003bb569 patch 8.2.3568: ctrl-hat test fails with Athena and Motif Bram Moolenaar <Bram@vim.org> parents: 26067 diff changeset	2104 " 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	2105 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	2106 CheckNotGui
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2107
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2108 new
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2109
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2110 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	2111 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	2112 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	2113 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	2114 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	2115
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2116 bwipe!
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2117 endfunc
6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2118
27090 5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2119 " 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	2120 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	2121 CheckUnix
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2122
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2123 file 0000000000000000000000000000
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2124 file %%%%%%%%%%%%%%%%%%%%%%%%%%
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2125 file %%%%%%
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2126 set readonly
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2127 set ls=2
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2128
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2129 redraw!
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2130 set noreadonly ls&
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2131 bwipe!
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2132 endfunc
5e65d802bd52 patch 8.2.4074: going over the end of NameBuff Bram Moolenaar <Bram@vim.org> parents: 26921 diff changeset	2133
26067 6a55d46e83cd patch 8.2.3567: CTRL-I in Insert mode is not tested Bram Moolenaar <Bram@vim.org> parents: 26042 diff changeset	2134
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19195 diff changeset	2135 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_edit.vim @ 27372:81d391f7c189 v8.2.4214