vim: src/testdir/test_options.vim annotate

author	Christian Brabandt <cb@256bit.org>
date	Mon, 26 Jun 2023 09:54:34 +0200
parents	f35ea6c38a20
children	695b50472e85

rev	line source
32669 448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	1 " Test for options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	2
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	3 source shared.vim
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	4 source check.vim
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	5 source view_util.vim
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	6
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	7 func Test_whichwrap()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	8 set whichwrap=b,s
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	9 call assert_equal('b,s', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	10
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	11 set whichwrap+=h,l
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	12 call assert_equal('b,s,h,l', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	13
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	14 set whichwrap+=h,l
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	15 call assert_equal('b,s,h,l', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	16
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	17 set whichwrap+=h,l
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	18 call assert_equal('b,s,h,l', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	19
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	20 set whichwrap=h,h
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	21 call assert_equal('h', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	22
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	23 set whichwrap=h,h,h
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	24 call assert_equal('h', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	25
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	26 " For compatibility with Vim 3.0 and before, number values are also
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	27 " supported for 'whichwrap'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	28 set whichwrap=1
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	29 call assert_equal('b', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	30 set whichwrap=2
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	31 call assert_equal('s', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	32 set whichwrap=4
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	33 call assert_equal('h,l', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	34 set whichwrap=8
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	35 call assert_equal('<,>', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	36 set whichwrap=16
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	37 call assert_equal('[,]', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	38 set whichwrap=31
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	39 call assert_equal('b,s,h,l,<,>,[,]', &whichwrap)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	40
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	41 set whichwrap&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	42 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	43
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	44 func Test_isfname()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	45 " This used to cause Vim to access uninitialized memory.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	46 set isfname=
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	47 call assert_equal("~X", expand("~X"))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	48 set isfname&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	49 " Test for setting 'isfname' to an unsupported character
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	50 let save_isfname = &isfname
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	51 call assert_fails('exe $"set isfname+={"\u1234"}"', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	52 call assert_equal(save_isfname, &isfname)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	53 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	54
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	55 " Test for getting the value of 'pastetoggle'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	56 func Test_pastetoggle()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	57 " character with K_SPECIAL byte
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	58 let &pastetoggle = '…'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	59 call assert_equal('…', &pastetoggle)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	60 call assert_equal("\n pastetoggle=…", execute('set pastetoggle?'))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	61
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	62 " modified character with K_SPECIAL byte
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	63 let &pastetoggle = '<M-…>'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	64 call assert_equal('<M-…>', &pastetoggle)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	65 call assert_equal("\n pastetoggle=<M-…>", execute('set pastetoggle?'))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	66
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	67 " illegal bytes
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	68 let str = ":\x7f:\x80:\x90:\xd0:"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	69 let &pastetoggle = str
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	70 call assert_equal(str, &pastetoggle)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	71 call assert_equal("\n pastetoggle=" .. strtrans(str), execute('set pastetoggle?'))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	72
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	73 unlet str
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	74 set pastetoggle&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	75 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	76
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	77 func Test_wildchar()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	78 " Empty 'wildchar' used to access invalid memory.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	79 call assert_fails('set wildchar=', 'E521:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	80 call assert_fails('set wildchar=abc', 'E521:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	81 set wildchar=<Esc>
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	82 let a=execute('set wildchar?')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	83 call assert_equal("\n wildchar=<Esc>", a)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	84 set wildchar=27
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	85 let a=execute('set wildchar?')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	86 call assert_equal("\n wildchar=<Esc>", a)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	87 set wildchar&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	88 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	89
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	90 func Test_wildoptions()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	91 set wildoptions=
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	92 set wildoptions+=tagfile
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	93 set wildoptions+=tagfile
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	94 call assert_equal('tagfile', &wildoptions)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	95 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	96
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	97 func Test_options_command()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	98 let caught = 'ok'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	99 try
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	100 options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	101 catch
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	102 let caught = v:throwpoint . "\n" . v:exception
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	103 endtry
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	104 call assert_equal('ok', caught)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	105
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	106 " Check if the option-window is opened horizontally.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	107 wincmd j
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	108 call assert_notequal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	109 wincmd k
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	110 call assert_equal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	111 " close option-window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	112 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	113
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	114 " Open the option-window vertically.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	115 vert options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	116 " Check if the option-window is opened vertically.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	117 wincmd l
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	118 call assert_notequal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	119 wincmd h
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	120 call assert_equal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	121 " close option-window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	122 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	123
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	124 " Open the option-window at the top.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	125 set splitbelow
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	126 topleft options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	127 call assert_equal(1, winnr())
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	128 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	129
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	130 " Open the option-window at the bottom.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	131 set nosplitbelow
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	132 botright options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	133 call assert_equal(winnr('$'), winnr())
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	134 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	135 set splitbelow&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	136
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	137 " Open the option-window in a new tab.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	138 tab options
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	139 " Check if the option-window is opened in a tab.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	140 normal gT
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	141 call assert_notequal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	142 normal gt
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	143 call assert_equal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	144 " close option-window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	145 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	146
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	147 " Open the options window browse
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	148 if has('browse')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	149 browse set
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	150 call assert_equal('option-window', bufname(''))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	151 close
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	152 endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	153 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	154
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	155 func Test_path_keep_commas()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	156 " Test that changing 'path' keeps two commas.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	157 set path=foo,,bar
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	158 set path-=bar
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	159 set path+=bar
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	160 call assert_equal('foo,,bar', &path)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	161
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	162 set path&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	163 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	164
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	165 func Test_path_too_long()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	166 exe 'set path=' .. repeat('x', 10000)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	167 call assert_fails('find x', 'E854:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	168 set path&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	169 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	170
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	171 func Test_signcolumn()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	172 CheckFeature signs
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	173 call assert_equal("auto", &signcolumn)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	174 set signcolumn=yes
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	175 set signcolumn=no
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	176 call assert_fails('set signcolumn=nope')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	177 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	178
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	179 func Test_filetype_valid()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	180 set ft=valid_name
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	181 call assert_equal("valid_name", &filetype)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	182 set ft=valid-name
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	183 call assert_equal("valid-name", &filetype)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	184
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	185 call assert_fails(":set ft=wrong;name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	186 call assert_fails(":set ft=wrong\\\\name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	187 call assert_fails(":set ft=wrong\\\|name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	188 call assert_fails(":set ft=wrong/name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	189 call assert_fails(":set ft=wrong\\\nname", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	190 call assert_equal("valid-name", &filetype)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	191
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	192 exe "set ft=trunc\x00name"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	193 call assert_equal("trunc", &filetype)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	194 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	195
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	196 func Test_syntax_valid()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	197 CheckFeature syntax
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	198 set syn=valid_name
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	199 call assert_equal("valid_name", &syntax)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	200 set syn=valid-name
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	201 call assert_equal("valid-name", &syntax)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	202
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	203 call assert_fails(":set syn=wrong;name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	204 call assert_fails(":set syn=wrong\\\\name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	205 call assert_fails(":set syn=wrong\\\|name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	206 call assert_fails(":set syn=wrong/name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	207 call assert_fails(":set syn=wrong\\\nname", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	208 call assert_equal("valid-name", &syntax)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	209
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	210 exe "set syn=trunc\x00name"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	211 call assert_equal("trunc", &syntax)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	212 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	213
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	214 func Test_keymap_valid()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	215 CheckFeature keymap
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	216 call assert_fails(":set kmp=valid_name", "E544:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	217 call assert_fails(":set kmp=valid_name", "valid_name")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	218 call assert_fails(":set kmp=valid-name", "E544:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	219 call assert_fails(":set kmp=valid-name", "valid-name")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	220
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	221 call assert_fails(":set kmp=wrong;name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	222 call assert_fails(":set kmp=wrong\\\\name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	223 call assert_fails(":set kmp=wrong\\\|name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	224 call assert_fails(":set kmp=wrong/name", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	225 call assert_fails(":set kmp=wrong\\\nname", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	226
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	227 call assert_fails(":set kmp=trunc\x00name", "E544:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	228 call assert_fails(":set kmp=trunc\x00name", "trunc")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	229 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	230
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	231 func Check_dir_option(name)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	232 " Check that it's possible to set the option.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	233 exe 'set ' . a:name . '=/usr/share/dict/words'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	234 call assert_equal('/usr/share/dict/words', eval('&' . a:name))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	235 exe 'set ' . a:name . '=/usr/share/dict/words,/and/there'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	236 call assert_equal('/usr/share/dict/words,/and/there', eval('&' . a:name))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	237 exe 'set ' . a:name . '=/usr/share/dict\ words'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	238 call assert_equal('/usr/share/dict words', eval('&' . a:name))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	239
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	240 " Check rejecting weird characters.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	241 call assert_fails("set " . a:name . "=/not&there", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	242 call assert_fails("set " . a:name . "=/not>there", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	243 call assert_fails("set " . a:name . "=/not.*there", "E474:")
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	244 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	245
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	246 func Test_cinkeys()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	247 " This used to cause invalid memory access
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	248 set cindent cinkeys=0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	249 norm a
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	250 set cindent& cinkeys&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	251 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	252
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	253 func Test_dictionary()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	254 call Check_dir_option('dictionary')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	255 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	256
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	257 func Test_thesaurus()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	258 call Check_dir_option('thesaurus')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	259 endfun
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	260
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	261 func Test_complete()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	262 " Trailing single backslash used to cause invalid memory access.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	263 set complete=s\
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	264 new
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	265 call feedkeys("i\<C-N>\<Esc>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	266 bwipe!
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	267 call assert_fails('set complete=ix', 'E535:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	268 set complete&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	269 endfun
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	270
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	271 func Test_set_completion()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	272 call feedkeys(":set di\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	273 call assert_equal('"set dictionary diff diffexpr diffopt digraph directory display', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	274
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	275 call feedkeys(":setlocal di\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	276 call assert_equal('"setlocal dictionary diff diffexpr diffopt digraph directory display', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	277
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	278 call feedkeys(":setglobal di\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	279 call assert_equal('"setglobal dictionary diff diffexpr diffopt digraph directory display', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	280
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	281 " Expand boolean options. When doing :set no<Tab> Vim prefixes the option
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	282 " names with "no".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	283 call feedkeys(":set nodi\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	284 call assert_equal('"set nodiff nodigraph', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	285
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	286 call feedkeys(":set invdi\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	287 call assert_equal('"set invdiff invdigraph', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	288
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	289 " Expanding "set noinv" does nothing.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	290 call feedkeys(":set noinv\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	291 call assert_equal('"set noinv', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	292
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	293 " Expand abbreviation of options.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	294 call feedkeys(":set ts\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	295 call assert_equal('"set tabstop thesaurus thesaurusfunc ttyscroll', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	296
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	297 " Expand current value
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	298 call feedkeys(":set fileencodings=\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	299 call assert_equal('"set fileencodings=ucs-bom,utf-8,default,latin1', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	300
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	301 call feedkeys(":set fileencodings:\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	302 call assert_equal('"set fileencodings:ucs-bom,utf-8,default,latin1', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	303
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	304 " Expand key codes.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	305 call feedkeys(":set <H\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	306 call assert_equal('"set <Help> <Home>', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	307
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	308 " Expand terminal options.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	309 call feedkeys(":set t_A\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	310 call assert_equal('"set t_AB t_AF t_AU t_AL', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	311 call assert_fails('call feedkeys(":set <t_afoo>=\<C-A>\<CR>", "xt")', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	312
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	313 " Expand directories.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	314 call feedkeys(":set cdpath=./\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	315 call assert_match(' ./samples/ ', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	316 call assert_notmatch(' ./summarize.vim ', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	317
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	318 " Expand files and directories.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	319 call feedkeys(":set tags=./\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	320 call assert_match(' ./samples/.* ./summarize.vim', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	321
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	322 call feedkeys(":set tags=./\\\\ dif\<C-A>\<C-B>\"\<CR>", 'tx')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	323 call assert_equal('"set tags=./\\ diff diffexpr diffopt', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	324 set tags&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	325
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	326 " Expanding the option names
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	327 call feedkeys(":set \<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	328 call assert_equal('"set all', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	329
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	330 " Expanding a second set of option names
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	331 call feedkeys(":set wrapscan \<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	332 call assert_equal('"set wrapscan all', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	333
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	334 " Expanding a special keycode
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	335 call feedkeys(":set <Home>\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	336 call assert_equal('"set <Home>', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	337
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	338 " Expanding an invalid special keycode
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	339 call feedkeys(":set <abcd>\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	340 call assert_equal("\"set <abcd>\<Tab>", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	341
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	342 " Expanding a terminal keycode
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	343 call feedkeys(":set t_AB\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	344 call assert_equal("\"set t_AB", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	345
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	346 " Expanding an invalid option name
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	347 call feedkeys(":set abcde=\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	348 call assert_equal("\"set abcde=\<Tab>", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	349
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	350 " Expanding after a = for a boolean option
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	351 call feedkeys(":set wrapscan=\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	352 call assert_equal("\"set wrapscan=\<Tab>", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	353
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	354 " Expanding a numeric option
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	355 call feedkeys(":set tabstop+=\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	356 call assert_equal("\"set tabstop+=" .. &tabstop, @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	357
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	358 " Expanding a non-boolean option
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	359 call feedkeys(":set invtabstop=\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	360 call assert_equal("\"set invtabstop=", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	361
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	362 " Expand options for 'spellsuggest'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	363 call feedkeys(":set spellsuggest=best,file:xyz\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	364 call assert_equal("\"set spellsuggest=best,file:xyz", @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	365
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	366 " Expand value for 'key'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	367 set key=abcd
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	368 call feedkeys(":set key=\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	369 call assert_equal('"set key=*****', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	370 set key=
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	371
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	372 " Expand values for 'filetype'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	373 call feedkeys(":set filetype=sshdconfi\<Tab>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	374 call assert_equal('"set filetype=sshdconfig', @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	375 call feedkeys(":set filetype=a\<C-A>\<C-B>\"\<CR>", 'xt')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	376 call assert_equal('"set filetype=' .. getcompletion('a*', 'filetype')->join(), @:)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	377 endfunc
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	378
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	379 func Test_set_option_errors()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	380 call assert_fails('set scroll=-1', 'E49:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	381 call assert_fails('set backupcopy=', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	382 call assert_fails('set regexpengine=3', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	383 call assert_fails('set history=10001', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	384 call assert_fails('set numberwidth=21', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	385 call assert_fails('set colorcolumn=-a', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	386 call assert_fails('set colorcolumn=a', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	387 call assert_fails('set colorcolumn=1,', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	388 call assert_fails('set colorcolumn=1;', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	389 call assert_fails('set cmdheight=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	390 call assert_fails('set cmdwinheight=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	391 if has('conceal')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	392 call assert_fails('set conceallevel=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	393 call assert_fails('set conceallevel=4', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	394 endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	395 call assert_fails('set helpheight=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	396 call assert_fails('set history=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	397 call assert_fails('set report=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	398 call assert_fails('set shiftwidth=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	399 call assert_fails('set sidescroll=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	400 call assert_fails('set tabstop=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	401 call assert_fails('set tabstop=10000', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	402 call assert_fails('let &tabstop = 10000', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	403 call assert_fails('set tabstop=5500000000', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	404 call assert_fails('set textwidth=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	405 call assert_fails('set timeoutlen=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	406 call assert_fails('set updatecount=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	407 call assert_fails('set updatetime=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	408 call assert_fails('set winheight=-1', 'E487:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	409 call assert_fails('set tabstop!', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	410 call assert_fails('set xxx', 'E518:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	411 call assert_fails('set beautify?', 'E519:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	412 call assert_fails('set undolevels=x', 'E521:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	413 call assert_fails('set tabstop=', 'E521:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	414 call assert_fails('set comments=-', 'E524:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	415 call assert_fails('set comments=a', 'E525:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	416 call assert_fails('set foldmarker=x', 'E536:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	417 call assert_fails('set commentstring=x', 'E537:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	418 call assert_fails('let &commentstring = "x"', 'E537:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	419 call assert_fails('set complete=x', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	420 call assert_fails('set rulerformat=%-', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	421 call assert_fails('set rulerformat=%(', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	422 call assert_fails('set rulerformat=%15(%%', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	423 call assert_fails('set statusline=%$', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	424 call assert_fails('set statusline=%{', 'E540:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	425 call assert_fails('set statusline=%{%', 'E540:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	426 call assert_fails('set statusline=%{%}', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	427 call assert_fails('set statusline=%(', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	428 call assert_fails('set statusline=%)', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	429 call assert_fails('set tabline=%$', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	430 call assert_fails('set tabline=%{', 'E540:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	431 call assert_fails('set tabline=%{%', 'E540:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	432 call assert_fails('set tabline=%{%}', 'E539:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	433 call assert_fails('set tabline=%(', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	434 call assert_fails('set tabline=%)', 'E542:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	435
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	436 if has('cursorshape')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	437 " This invalid value for 'guicursor' used to cause Vim to crash.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	438 call assert_fails('set guicursor=i-ci,r-cr:h', 'E545:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	439 call assert_fails('set guicursor=i-ci', 'E545:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	440 call assert_fails('set guicursor=x', 'E545:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	441 call assert_fails('set guicursor=x:', 'E546:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	442 call assert_fails('set guicursor=r-cr:horx', 'E548:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	443 call assert_fails('set guicursor=r-cr:hor0', 'E549:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	444 endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	445 if has('mouseshape')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	446 call assert_fails('se mouseshape=i-r:x', 'E547:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	447 endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	448
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	449 " Test for 'backupext' and 'patchmode' set to the same value
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	450 set backupext=.bak
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	451 set patchmode=.patch
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	452 call assert_fails('set patchmode=.bak', 'E589:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	453 call assert_equal('.patch', &patchmode)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	454 call assert_fails('set backupext=.patch', 'E589:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	455 call assert_equal('.bak', &backupext)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	456 set backupext& patchmode&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	457
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	458 call assert_fails('set winminheight=10 winheight=9', 'E591:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	459 set winminheight& winheight&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	460 set winheight=10 winminheight=10
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	461 call assert_fails('set winheight=9', 'E591:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	462 set winminheight& winheight&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	463 call assert_fails('set winminwidth=10 winwidth=9', 'E592:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	464 set winminwidth& winwidth&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	465 call assert_fails('set winwidth=9 winminwidth=10', 'E592:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	466 set winwidth& winminwidth&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	467 call assert_fails("set showbreak=\x01", 'E595:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	468 call assert_fails('set t_foo=', 'E846:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	469 call assert_fails('set tabstop??', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	470 call assert_fails('set wrapscan!!', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	471 call assert_fails('set tabstop&&', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	472 call assert_fails('set wrapscan<<', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	473 call assert_fails('set wrapscan=1', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	474 call assert_fails('set autoindent@', 'E488:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	475 call assert_fails('set wildchar=<abc>', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	476 call assert_fails('set cmdheight=1a', 'E521:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	477 call assert_fails('set invcmdheight', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	478 if has('python') \|\| has('python3')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	479 call assert_fails('set pyxversion=6', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	480 endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	481 call assert_fails("let &tabstop='ab'", ['E521:', 'E521:'])
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	482 call assert_fails('set spellcapcheck=%\\(', 'E54:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	483 call assert_fails('set sessionoptions=curdir,sesdir', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	484 call assert_fails('set foldmarker={{{,', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	485 call assert_fails('set sessionoptions=sesdir,curdir', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	486 setlocal listchars=trail:·
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	487 call assert_fails('set ambiwidth=double', 'E834:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	488 setlocal listchars=trail:-
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	489 setglobal listchars=trail:·
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	490 call assert_fails('set ambiwidth=double', 'E834:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	491 set listchars&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	492 setlocal fillchars=stl:·
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	493 call assert_fails('set ambiwidth=double', 'E835:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	494 setlocal fillchars=stl:-
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	495 setglobal fillchars=stl:·
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	496 call assert_fails('set ambiwidth=double', 'E835:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	497 set fillchars&
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	498 call assert_fails('set fileencoding=latin1,utf-8', 'E474:')
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	499 set nomodifiable
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32599 diff changeset	500 call assert_fails('set fileencoding=latin1', 'E21:')

32669

448aef880252 normalize line endings