xref: /vim-8.2.3635/src/testdir/test_expr.vim (revision ee4e0c1e)
1f0e86a0dSBram Moolenaar" Tests for expressions.
2f0e86a0dSBram Moolenaar
3f0e86a0dSBram Moolenaarfunc Test_equal()
4f0e86a0dSBram Moolenaar  let base = {}
5f0e86a0dSBram Moolenaar  func base.method()
6f0e86a0dSBram Moolenaar    return 1
7f0e86a0dSBram Moolenaar  endfunc
8f0e86a0dSBram Moolenaar  func base.other() dict
9f0e86a0dSBram Moolenaar    return 1
10f0e86a0dSBram Moolenaar  endfunc
11f0e86a0dSBram Moolenaar  let instance = copy(base)
12f0e86a0dSBram Moolenaar  call assert_true(base.method == instance.method)
13f0e86a0dSBram Moolenaar  call assert_true([base.method] == [instance.method])
14f0e86a0dSBram Moolenaar  call assert_true(base.other == instance.other)
15f0e86a0dSBram Moolenaar  call assert_true([base.other] == [instance.other])
16f0e86a0dSBram Moolenaar
17f0e86a0dSBram Moolenaar  call assert_false(base.method == base.other)
18f0e86a0dSBram Moolenaar  call assert_false([base.method] == [base.other])
19f0e86a0dSBram Moolenaar  call assert_false(base.method == instance.other)
20f0e86a0dSBram Moolenaar  call assert_false([base.method] == [instance.other])
21f0e86a0dSBram Moolenaar
22f0e86a0dSBram Moolenaar  call assert_fails('echo base.method > instance.method')
23f0e86a0dSBram Moolenaarendfunc
24819821c5SBram Moolenaar
25819821c5SBram Moolenaarfunc Test_version()
26819821c5SBram Moolenaar  call assert_true(has('patch-7.4.001'))
27819821c5SBram Moolenaar  call assert_true(has('patch-7.4.01'))
28819821c5SBram Moolenaar  call assert_true(has('patch-7.4.1'))
29819821c5SBram Moolenaar  call assert_true(has('patch-6.9.999'))
30819821c5SBram Moolenaar  call assert_true(has('patch-7.1.999'))
31819821c5SBram Moolenaar  call assert_true(has('patch-7.4.123'))
32819821c5SBram Moolenaar
33819821c5SBram Moolenaar  call assert_false(has('patch-7'))
34819821c5SBram Moolenaar  call assert_false(has('patch-7.4'))
35819821c5SBram Moolenaar  call assert_false(has('patch-7.4.'))
36819821c5SBram Moolenaar  call assert_false(has('patch-9.1.0'))
37819821c5SBram Moolenaar  call assert_false(has('patch-9.9.1'))
38819821c5SBram Moolenaarendfunc
390921ecffSBram Moolenaar
400921ecffSBram Moolenaarfunc Test_dict()
410921ecffSBram Moolenaar  let d = {'': 'empty', 'a': 'a', 0: 'zero'}
420921ecffSBram Moolenaar  call assert_equal('empty', d[''])
430921ecffSBram Moolenaar  call assert_equal('a', d['a'])
440921ecffSBram Moolenaar  call assert_equal('zero', d[0])
450921ecffSBram Moolenaar  call assert_true(has_key(d, ''))
460921ecffSBram Moolenaar  call assert_true(has_key(d, 'a'))
470921ecffSBram Moolenaar
480921ecffSBram Moolenaar  let d[''] = 'none'
490921ecffSBram Moolenaar  let d['a'] = 'aaa'
500921ecffSBram Moolenaar  call assert_equal('none', d[''])
510921ecffSBram Moolenaar  call assert_equal('aaa', d['a'])
520921ecffSBram Moolenaarendfunc
5358de0e2dSBram Moolenaar
5458de0e2dSBram Moolenaarfunc Test_strgetchar()
5558de0e2dSBram Moolenaar  call assert_equal(char2nr('a'), strgetchar('axb', 0))
56f6ed61e1SBram Moolenaar  call assert_equal(char2nr('x'), 'axb'->strgetchar(1))
5758de0e2dSBram Moolenaar  call assert_equal(char2nr('b'), strgetchar('axb', 2))
5858de0e2dSBram Moolenaar
5958de0e2dSBram Moolenaar  call assert_equal(-1, strgetchar('axb', -1))
6058de0e2dSBram Moolenaar  call assert_equal(-1, strgetchar('axb', 3))
6158de0e2dSBram Moolenaar  call assert_equal(-1, strgetchar('', 0))
620e05de46SBram Moolenaar  call assert_fails("let c=strgetchar([], 1)", 'E730:')
630e05de46SBram Moolenaar  call assert_fails("let c=strgetchar('axb', [])", 'E745:')
6458de0e2dSBram Moolenaarendfunc
6558de0e2dSBram Moolenaar
6658de0e2dSBram Moolenaarfunc Test_strcharpart()
6758de0e2dSBram Moolenaar  call assert_equal('a', strcharpart('axb', 0, 1))
68f6ed61e1SBram Moolenaar  call assert_equal('x', 'axb'->strcharpart(1, 1))
6958de0e2dSBram Moolenaar  call assert_equal('b', strcharpart('axb', 2, 1))
7058de0e2dSBram Moolenaar  call assert_equal('xb', strcharpart('axb', 1))
7158de0e2dSBram Moolenaar
7258de0e2dSBram Moolenaar  call assert_equal('', strcharpart('axb', 1, 0))
7358de0e2dSBram Moolenaar  call assert_equal('', strcharpart('axb', 1, -1))
7458de0e2dSBram Moolenaar  call assert_equal('', strcharpart('axb', -1, 1))
7558de0e2dSBram Moolenaar  call assert_equal('', strcharpart('axb', -2, 2))
7658de0e2dSBram Moolenaar
7758de0e2dSBram Moolenaar  call assert_equal('a', strcharpart('axb', -1, 2))
788b633135SBram Moolenaar
798b633135SBram Moolenaar  call assert_equal('edit', "editor"[-10:3])
8058de0e2dSBram Moolenaarendfunc
81517ffbeeSBram Moolenaar
82517ffbeeSBram Moolenaarfunc Test_getreg_empty_list()
83517ffbeeSBram Moolenaar  call assert_equal('', getreg('x'))
84517ffbeeSBram Moolenaar  call assert_equal([], getreg('x', 1, 1))
85517ffbeeSBram Moolenaar  let x = getreg('x', 1, 1)
86517ffbeeSBram Moolenaar  let y = x
87517ffbeeSBram Moolenaar  call add(x, 'foo')
88517ffbeeSBram Moolenaar  call assert_equal(['foo'], y)
89517ffbeeSBram Moolenaarendfunc
90d8585edeSBram Moolenaar
91d8585edeSBram Moolenaarfunc Test_loop_over_null_list()
92574860b5SBram Moolenaar  let null_list = test_null_list()
93d8585edeSBram Moolenaar  for i in null_list
9437175409SBram Moolenaar    call assert_report('should not get here')
95d8585edeSBram Moolenaar  endfor
96d8585edeSBram Moolenaarendfunc
9713ddc5c3SBram Moolenaar
9813ddc5c3SBram Moolenaarfunc Test_compare_null_dict()
9913ddc5c3SBram Moolenaar  call assert_fails('let x = test_null_dict()[10]')
10013ddc5c3SBram Moolenaar  call assert_equal({}, {})
10113ddc5c3SBram Moolenaar  call assert_equal(test_null_dict(), test_null_dict())
10213ddc5c3SBram Moolenaar  call assert_notequal({}, test_null_dict())
10313ddc5c3SBram Moolenaarendfunc
10413ddc5c3SBram Moolenaar
10513ddc5c3SBram Moolenaarfunc Test_set_reg_null_list()
10613ddc5c3SBram Moolenaar  call setreg('x', test_null_list())
10713ddc5c3SBram Moolenaarendfunc
1081d90a5a5SBram Moolenaar
1091d90a5a5SBram Moolenaarfunc Test_special_char()
1101d90a5a5SBram Moolenaar  " The failure is only visible using valgrind.
1111d90a5a5SBram Moolenaar  call assert_fails('echo "\<C-">')
1121d90a5a5SBram Moolenaarendfunc
1132acfbed9SBram Moolenaar
1142acfbed9SBram Moolenaarfunc Test_option_value()
1152acfbed9SBram Moolenaar  " boolean
1162acfbed9SBram Moolenaar  set bri
1172acfbed9SBram Moolenaar  call assert_equal(1, &bri)
1182acfbed9SBram Moolenaar  set nobri
1192acfbed9SBram Moolenaar  call assert_equal(0, &bri)
1202acfbed9SBram Moolenaar
1212acfbed9SBram Moolenaar  " number
1222acfbed9SBram Moolenaar  set ts=1
1232acfbed9SBram Moolenaar  call assert_equal(1, &ts)
1242acfbed9SBram Moolenaar  set ts=8
1252acfbed9SBram Moolenaar  call assert_equal(8, &ts)
1262acfbed9SBram Moolenaar
1272acfbed9SBram Moolenaar  " string
1282acfbed9SBram Moolenaar  exe "set cedit=\<Esc>"
1292acfbed9SBram Moolenaar  call assert_equal("\<Esc>", &cedit)
1302acfbed9SBram Moolenaar  set cpo=
1312acfbed9SBram Moolenaar  call assert_equal("", &cpo)
1322acfbed9SBram Moolenaar  set cpo=abcdefgi
1332acfbed9SBram Moolenaar  call assert_equal("abcdefgi", &cpo)
1342acfbed9SBram Moolenaar  set cpo&vim
1352acfbed9SBram Moolenaarendfunc
13638ee6b04SBram Moolenaar
13776efafbaSBram Moolenaarfunction Test_printf_misc()
138c71807dbSBram Moolenaar  call assert_equal('123', printf('123'))
139c71807dbSBram Moolenaar  call assert_fails("call printf('123', 3)", "E767:")
140c71807dbSBram Moolenaar
14176efafbaSBram Moolenaar  call assert_equal('123', printf('%d', 123))
14276efafbaSBram Moolenaar  call assert_equal('123', printf('%i', 123))
14376efafbaSBram Moolenaar  call assert_equal('123', printf('%D', 123))
14476efafbaSBram Moolenaar  call assert_equal('123', printf('%U', 123))
14576efafbaSBram Moolenaar  call assert_equal('173', printf('%o', 123))
14676efafbaSBram Moolenaar  call assert_equal('173', printf('%O', 123))
14776efafbaSBram Moolenaar  call assert_equal('7b', printf('%x', 123))
14876efafbaSBram Moolenaar  call assert_equal('7B', printf('%X', 123))
14921e551ccSBram Moolenaar
15021e551ccSBram Moolenaar  call assert_equal('123', printf('%hd', 123))
15121e551ccSBram Moolenaar  call assert_equal('-123', printf('%hd', -123))
15221e551ccSBram Moolenaar  call assert_equal('-1', printf('%hd', 0xFFFF))
15321e551ccSBram Moolenaar  call assert_equal('-1', printf('%hd', 0x1FFFFF))
15421e551ccSBram Moolenaar
15521e551ccSBram Moolenaar  call assert_equal('123', printf('%hu', 123))
15621e551ccSBram Moolenaar  call assert_equal('65413', printf('%hu', -123))
15721e551ccSBram Moolenaar  call assert_equal('65535', printf('%hu', 0xFFFF))
15821e551ccSBram Moolenaar  call assert_equal('65535', printf('%hu', 0x1FFFFF))
15921e551ccSBram Moolenaar
16021e551ccSBram Moolenaar  call assert_equal('123', printf('%ld', 123))
16121e551ccSBram Moolenaar  call assert_equal('-123', printf('%ld', -123))
16221e551ccSBram Moolenaar  call assert_equal('65535', printf('%ld', 0xFFFF))
16321e551ccSBram Moolenaar  call assert_equal('131071', printf('%ld', 0x1FFFF))
16421e551ccSBram Moolenaar
16576efafbaSBram Moolenaar  if has('ebcdic')
16676efafbaSBram Moolenaar    call assert_equal('#', printf('%c', 123))
16776efafbaSBram Moolenaar  else
16876efafbaSBram Moolenaar    call assert_equal('{', printf('%c', 123))
16976efafbaSBram Moolenaar  endif
17076efafbaSBram Moolenaar  call assert_equal('abc', printf('%s', 'abc'))
17176efafbaSBram Moolenaar  call assert_equal('abc', printf('%S', 'abc'))
17276efafbaSBram Moolenaar
17376efafbaSBram Moolenaar  call assert_equal('+123', printf('%+d', 123))
17476efafbaSBram Moolenaar  call assert_equal('-123', printf('%+d', -123))
17576efafbaSBram Moolenaar  call assert_equal('+123', printf('%+ d', 123))
17676efafbaSBram Moolenaar  call assert_equal(' 123', printf('% d', 123))
17776efafbaSBram Moolenaar  call assert_equal(' 123', printf('%  d', 123))
17876efafbaSBram Moolenaar  call assert_equal('-123', printf('% d', -123))
17976efafbaSBram Moolenaar
180e999782eSBram Moolenaar  call assert_equal('123', printf('%2d', 123))
181e999782eSBram Moolenaar  call assert_equal('   123', printf('%6d', 123))
182e999782eSBram Moolenaar  call assert_equal('000123', printf('%06d', 123))
183e999782eSBram Moolenaar  call assert_equal('+00123', printf('%+06d', 123))
184e999782eSBram Moolenaar  call assert_equal(' 00123', printf('% 06d', 123))
185e999782eSBram Moolenaar  call assert_equal('  +123', printf('%+6d', 123))
186e999782eSBram Moolenaar  call assert_equal('   123', printf('% 6d', 123))
187e999782eSBram Moolenaar  call assert_equal('  -123', printf('% 6d', -123))
18804186095SBram Moolenaar
18904186095SBram Moolenaar  " Test left adjusted.
19004186095SBram Moolenaar  call assert_equal('123   ', printf('%-6d', 123))
191e999782eSBram Moolenaar  call assert_equal('+123  ', printf('%-+6d', 123))
192e999782eSBram Moolenaar  call assert_equal(' 123  ', printf('%- 6d', 123))
193e999782eSBram Moolenaar  call assert_equal('-123  ', printf('%- 6d', -123))
194e999782eSBram Moolenaar
19504186095SBram Moolenaar  call assert_equal('  00123', printf('%7.5d', 123))
19604186095SBram Moolenaar  call assert_equal(' -00123', printf('%7.5d', -123))
19704186095SBram Moolenaar  call assert_equal(' +00123', printf('%+7.5d', 123))
19804186095SBram Moolenaar  " Precision field should not be used when combined with %0
19904186095SBram Moolenaar  call assert_equal('  00123', printf('%07.5d', 123))
20004186095SBram Moolenaar  call assert_equal(' -00123', printf('%07.5d', -123))
20104186095SBram Moolenaar
20204186095SBram Moolenaar  call assert_equal('  123', printf('%*d', 5, 123))
20304186095SBram Moolenaar  call assert_equal('123  ', printf('%*d', -5, 123))
20476efafbaSBram Moolenaar  call assert_equal('00123', printf('%.*d', 5, 123))
20576efafbaSBram Moolenaar  call assert_equal('  123', printf('% *d', 5, 123))
20676efafbaSBram Moolenaar  call assert_equal(' +123', printf('%+ *d', 5, 123))
20776efafbaSBram Moolenaar
20821e551ccSBram Moolenaar  call assert_equal('foobar', printf('%.*s',  9, 'foobar'))
20921e551ccSBram Moolenaar  call assert_equal('foo',    printf('%.*s',  3, 'foobar'))
21021e551ccSBram Moolenaar  call assert_equal('',       printf('%.*s',  0, 'foobar'))
21121e551ccSBram Moolenaar  call assert_equal('foobar', printf('%.*s', -1, 'foobar'))
21221e551ccSBram Moolenaar
21304186095SBram Moolenaar  " Simple quote (thousand grouping char) is ignored.
21404186095SBram Moolenaar  call assert_equal('+00123456', printf("%+'09d", 123456))
21504186095SBram Moolenaar
21604186095SBram Moolenaar  " Unrecognized format specifier kept as-is.
21704186095SBram Moolenaar  call assert_equal('_123', printf("%_%d", 123))
21804186095SBram Moolenaar
21904186095SBram Moolenaar  " Test alternate forms.
22076efafbaSBram Moolenaar  call assert_equal('0x7b', printf('%#x', 123))
22176efafbaSBram Moolenaar  call assert_equal('0X7B', printf('%#X', 123))
22276efafbaSBram Moolenaar  call assert_equal('0173', printf('%#o', 123))
22376efafbaSBram Moolenaar  call assert_equal('0173', printf('%#O', 123))
22476efafbaSBram Moolenaar  call assert_equal('abc', printf('%#s', 'abc'))
22576efafbaSBram Moolenaar  call assert_equal('abc', printf('%#S', 'abc'))
22604186095SBram Moolenaar  call assert_equal('  0173', printf('%#6o', 123))
22704186095SBram Moolenaar  call assert_equal(' 00173', printf('%#6.5o', 123))
22804186095SBram Moolenaar  call assert_equal('  0173', printf('%#6.2o', 123))
22904186095SBram Moolenaar  call assert_equal('  0173', printf('%#6.2o', 123))
23004186095SBram Moolenaar  call assert_equal('0173', printf('%#2.2o', 123))
23176efafbaSBram Moolenaar
23276efafbaSBram Moolenaar  call assert_equal(' 00123', printf('%6.5d', 123))
23376efafbaSBram Moolenaar  call assert_equal(' 0007b', printf('%6.5x', 123))
23476efafbaSBram Moolenaar
23521e551ccSBram Moolenaar  call assert_equal('123', printf('%.2d', 123))
23621e551ccSBram Moolenaar  call assert_equal('0123', printf('%.4d', 123))
23721e551ccSBram Moolenaar  call assert_equal('0000000123', printf('%.10d', 123))
23821e551ccSBram Moolenaar  call assert_equal('123', printf('%.0d', 123))
23921e551ccSBram Moolenaar
24076efafbaSBram Moolenaar  call assert_equal('abc', printf('%2s', 'abc'))
24176efafbaSBram Moolenaar  call assert_equal('abc', printf('%2S', 'abc'))
24276efafbaSBram Moolenaar  call assert_equal('abc', printf('%.4s', 'abc'))
24376efafbaSBram Moolenaar  call assert_equal('abc', printf('%.4S', 'abc'))
24476efafbaSBram Moolenaar  call assert_equal('ab', printf('%.2s', 'abc'))
24576efafbaSBram Moolenaar  call assert_equal('ab', printf('%.2S', 'abc'))
24676efafbaSBram Moolenaar  call assert_equal('', printf('%.0s', 'abc'))
24776efafbaSBram Moolenaar  call assert_equal('', printf('%.s', 'abc'))
24876efafbaSBram Moolenaar  call assert_equal(' abc', printf('%4s', 'abc'))
24976efafbaSBram Moolenaar  call assert_equal(' abc', printf('%4S', 'abc'))
25076efafbaSBram Moolenaar  call assert_equal('0abc', printf('%04s', 'abc'))
25176efafbaSBram Moolenaar  call assert_equal('0abc', printf('%04S', 'abc'))
25276efafbaSBram Moolenaar  call assert_equal('abc ', printf('%-4s', 'abc'))
25376efafbaSBram Moolenaar  call assert_equal('abc ', printf('%-4S', 'abc'))
25476efafbaSBram Moolenaar
255ce0fac28SBram Moolenaar  call assert_equal('��', printf('%.2S', '����'))
256ce0fac28SBram Moolenaar  call assert_equal('', printf('%.1S', '����'))
257ce0fac28SBram Moolenaar
25876efafbaSBram Moolenaar  call assert_equal('1%', printf('%d%%', 1))
25976efafbaSBram Moolenaarendfunc
26076efafbaSBram Moolenaar
26176efafbaSBram Moolenaarfunction Test_printf_float()
26276efafbaSBram Moolenaar  if has('float')
26304186095SBram Moolenaar    call assert_equal('1.000000', printf('%f', 1))
26476efafbaSBram Moolenaar    call assert_equal('1.230000', printf('%f', 1.23))
26576efafbaSBram Moolenaar    call assert_equal('1.230000', printf('%F', 1.23))
266e999782eSBram Moolenaar    call assert_equal('9999999.9', printf('%g', 9999999.9))
267e999782eSBram Moolenaar    call assert_equal('9999999.9', printf('%G', 9999999.9))
268e999782eSBram Moolenaar    call assert_equal('1.00000001e7', printf('%.8g', 10000000.1))
269e999782eSBram Moolenaar    call assert_equal('1.00000001E7', printf('%.8G', 10000000.1))
27076efafbaSBram Moolenaar    call assert_equal('1.230000e+00', printf('%e', 1.23))
27176efafbaSBram Moolenaar    call assert_equal('1.230000E+00', printf('%E', 1.23))
27276efafbaSBram Moolenaar    call assert_equal('1.200000e-02', printf('%e', 0.012))
27376efafbaSBram Moolenaar    call assert_equal('-1.200000e-02', printf('%e', -0.012))
274e999782eSBram Moolenaar    call assert_equal('0.33', printf('%.2f', 1.0/3.0))
275e999782eSBram Moolenaar    call assert_equal('  0.33', printf('%6.2f', 1.0/3.0))
276e999782eSBram Moolenaar    call assert_equal(' -0.33', printf('%6.2f', -1.0/3.0))
277e999782eSBram Moolenaar    call assert_equal('000.33', printf('%06.2f', 1.0/3.0))
27804186095SBram Moolenaar    call assert_equal('-00.33', printf('%06.2f', -1.0/3.0))
27904186095SBram Moolenaar    call assert_equal('-00.33', printf('%+06.2f', -1.0/3.0))
28004186095SBram Moolenaar    call assert_equal('+00.33', printf('%+06.2f', 1.0/3.0))
28104186095SBram Moolenaar    call assert_equal(' 00.33', printf('% 06.2f', 1.0/3.0))
28204186095SBram Moolenaar    call assert_equal('000.33', printf('%06.2g', 1.0/3.0))
28304186095SBram Moolenaar    call assert_equal('-00.33', printf('%06.2g', -1.0/3.0))
28404186095SBram Moolenaar    call assert_equal('0.33', printf('%3.2f', 1.0/3.0))
28504186095SBram Moolenaar    call assert_equal('003.33e-01', printf('%010.2e', 1.0/3.0))
28604186095SBram Moolenaar    call assert_equal(' 03.33e-01', printf('% 010.2e', 1.0/3.0))
28704186095SBram Moolenaar    call assert_equal('+03.33e-01', printf('%+010.2e', 1.0/3.0))
28804186095SBram Moolenaar    call assert_equal('-03.33e-01', printf('%010.2e', -1.0/3.0))
28904186095SBram Moolenaar
29004186095SBram Moolenaar    " When precision is 0, the dot should be omitted.
29104186095SBram Moolenaar    call assert_equal('  2', printf('%3.f', 7.0/3.0))
29204186095SBram Moolenaar    call assert_equal('  2', printf('%3.g', 7.0/3.0))
29304186095SBram Moolenaar    call assert_equal('  2e+00', printf('%7.e', 7.0/3.0))
29404186095SBram Moolenaar
29504186095SBram Moolenaar    " Float zero can be signed.
29604186095SBram Moolenaar    call assert_equal('+0.000000', printf('%+f', 0.0))
29704186095SBram Moolenaar    call assert_equal('0.000000', printf('%f', 1.0/(1.0/0.0)))
29804186095SBram Moolenaar    call assert_equal('-0.000000', printf('%f', 1.0/(-1.0/0.0)))
29904186095SBram Moolenaar    call assert_equal('0.0', printf('%s', 1.0/(1.0/0.0)))
30004186095SBram Moolenaar    call assert_equal('-0.0', printf('%s', 1.0/(-1.0/0.0)))
30104186095SBram Moolenaar    call assert_equal('0.0', printf('%S', 1.0/(1.0/0.0)))
30204186095SBram Moolenaar    call assert_equal('-0.0', printf('%S', 1.0/(-1.0/0.0)))
30376efafbaSBram Moolenaar
304e999782eSBram Moolenaar    " Float infinity can be signed.
30576efafbaSBram Moolenaar    call assert_equal('inf', printf('%f', 1.0/0.0))
306e999782eSBram Moolenaar    call assert_equal('-inf', printf('%f', -1.0/0.0))
307e999782eSBram Moolenaar    call assert_equal('inf', printf('%g', 1.0/0.0))
308e999782eSBram Moolenaar    call assert_equal('-inf', printf('%g', -1.0/0.0))
309e999782eSBram Moolenaar    call assert_equal('inf', printf('%e', 1.0/0.0))
310e999782eSBram Moolenaar    call assert_equal('-inf', printf('%e', -1.0/0.0))
31104186095SBram Moolenaar    call assert_equal('INF', printf('%F', 1.0/0.0))
31204186095SBram Moolenaar    call assert_equal('-INF', printf('%F', -1.0/0.0))
313e999782eSBram Moolenaar    call assert_equal('INF', printf('%E', 1.0/0.0))
314e999782eSBram Moolenaar    call assert_equal('-INF', printf('%E', -1.0/0.0))
315e999782eSBram Moolenaar    call assert_equal('INF', printf('%E', 1.0/0.0))
316e999782eSBram Moolenaar    call assert_equal('-INF', printf('%G', -1.0/0.0))
317e999782eSBram Moolenaar    call assert_equal('+inf', printf('%+f', 1.0/0.0))
318e999782eSBram Moolenaar    call assert_equal('-inf', printf('%+f', -1.0/0.0))
319e999782eSBram Moolenaar    call assert_equal(' inf', printf('% f',  1.0/0.0))
320e999782eSBram Moolenaar    call assert_equal('   inf', printf('%6f', 1.0/0.0))
321e999782eSBram Moolenaar    call assert_equal('  -inf', printf('%6f', -1.0/0.0))
322e999782eSBram Moolenaar    call assert_equal('   inf', printf('%6g', 1.0/0.0))
323e999782eSBram Moolenaar    call assert_equal('  -inf', printf('%6g', -1.0/0.0))
324e999782eSBram Moolenaar    call assert_equal('  +inf', printf('%+6f', 1.0/0.0))
325e999782eSBram Moolenaar    call assert_equal('   inf', printf('% 6f', 1.0/0.0))
326e999782eSBram Moolenaar    call assert_equal('  +inf', printf('%+06f', 1.0/0.0))
327e999782eSBram Moolenaar    call assert_equal('inf   ', printf('%-6f', 1.0/0.0))
328e999782eSBram Moolenaar    call assert_equal('-inf  ', printf('%-6f', -1.0/0.0))
329e999782eSBram Moolenaar    call assert_equal('+inf  ', printf('%-+6f', 1.0/0.0))
330e999782eSBram Moolenaar    call assert_equal(' inf  ', printf('%- 6f', 1.0/0.0))
33104186095SBram Moolenaar    call assert_equal('-INF  ', printf('%-6F', -1.0/0.0))
33204186095SBram Moolenaar    call assert_equal('+INF  ', printf('%-+6F', 1.0/0.0))
33304186095SBram Moolenaar    call assert_equal(' INF  ', printf('%- 6F', 1.0/0.0))
334e999782eSBram Moolenaar    call assert_equal('INF   ', printf('%-6G', 1.0/0.0))
335e999782eSBram Moolenaar    call assert_equal('-INF  ', printf('%-6G', -1.0/0.0))
336e999782eSBram Moolenaar    call assert_equal('INF   ', printf('%-6E', 1.0/0.0))
337e999782eSBram Moolenaar    call assert_equal('-INF  ', printf('%-6E', -1.0/0.0))
338e999782eSBram Moolenaar    call assert_equal('inf', printf('%s', 1.0/0.0))
339e999782eSBram Moolenaar    call assert_equal('-inf', printf('%s', -1.0/0.0))
34076efafbaSBram Moolenaar
34121e551ccSBram Moolenaar    " Test special case where max precision is truncated at 340.
34221e551ccSBram Moolenaar    call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.330f', 1.0))
34321e551ccSBram Moolenaar    call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.340f', 1.0))
34421e551ccSBram Moolenaar    call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.350f', 1.0))
34521e551ccSBram Moolenaar
346e999782eSBram Moolenaar    " Float nan (not a number) has no sign.
347e999782eSBram Moolenaar    call assert_equal('nan', printf('%f', sqrt(-1.0)))
348e999782eSBram Moolenaar    call assert_equal('nan', printf('%f', 0.0/0.0))
349e999782eSBram Moolenaar    call assert_equal('nan', printf('%f', -0.0/0.0))
350e999782eSBram Moolenaar    call assert_equal('nan', printf('%g', 0.0/0.0))
351e999782eSBram Moolenaar    call assert_equal('nan', printf('%e', 0.0/0.0))
35204186095SBram Moolenaar    call assert_equal('NAN', printf('%F', 0.0/0.0))
353e999782eSBram Moolenaar    call assert_equal('NAN', printf('%G', 0.0/0.0))
354e999782eSBram Moolenaar    call assert_equal('NAN', printf('%E', 0.0/0.0))
35504186095SBram Moolenaar    call assert_equal('NAN', printf('%F', -0.0/0.0))
356e999782eSBram Moolenaar    call assert_equal('NAN', printf('%G', -0.0/0.0))
357e999782eSBram Moolenaar    call assert_equal('NAN', printf('%E', -0.0/0.0))
358e999782eSBram Moolenaar    call assert_equal('   nan', printf('%6f', 0.0/0.0))
359e999782eSBram Moolenaar    call assert_equal('   nan', printf('%06f', 0.0/0.0))
360e999782eSBram Moolenaar    call assert_equal('nan   ', printf('%-6f', 0.0/0.0))
361e999782eSBram Moolenaar    call assert_equal('nan   ', printf('%- 6f', 0.0/0.0))
362e999782eSBram Moolenaar    call assert_equal('nan', printf('%s', 0.0/0.0))
363e999782eSBram Moolenaar    call assert_equal('nan', printf('%s', -0.0/0.0))
364e999782eSBram Moolenaar    call assert_equal('nan', printf('%S', 0.0/0.0))
365e999782eSBram Moolenaar    call assert_equal('nan', printf('%S', -0.0/0.0))
36676efafbaSBram Moolenaar
36776efafbaSBram Moolenaar    call assert_fails('echo printf("%f", "a")', 'E807:')
36876efafbaSBram Moolenaar  endif
36976efafbaSBram Moolenaarendfunc
37076efafbaSBram Moolenaar
37176efafbaSBram Moolenaarfunction Test_printf_errors()
37276efafbaSBram Moolenaar  call assert_fails('echo printf("%d", {})', 'E728:')
37376efafbaSBram Moolenaar  call assert_fails('echo printf("%d", [])', 'E745:')
37476efafbaSBram Moolenaar  call assert_fails('echo printf("%d", 1, 2)', 'E767:')
37576efafbaSBram Moolenaar  call assert_fails('echo printf("%*d", 1)', 'E766:')
3765feabe00SBram Moolenaar  if has('float')
37776efafbaSBram Moolenaar    call assert_fails('echo printf("%d", 1.2)', 'E805:')
3785feabe00SBram Moolenaar  endif
37976efafbaSBram Moolenaarendfunc
38076efafbaSBram Moolenaar
38126b84339SBram Moolenaarfunction Test_max_min_errors()
38226b84339SBram Moolenaar  call assert_fails('call max(v:true)', 'E712:')
38326b84339SBram Moolenaar  call assert_fails('call max(v:true)', 'max()')
38426b84339SBram Moolenaar  call assert_fails('call min(v:true)', 'E712:')
38526b84339SBram Moolenaar  call assert_fails('call min(v:true)', 'min()')
38626b84339SBram Moolenaarendfunc
38726b84339SBram Moolenaar
38838ee6b04SBram Moolenaarfunction Test_printf_64bit()
38938ee6b04SBram Moolenaar  call assert_equal("123456789012345", printf('%d', 123456789012345))
39038ee6b04SBram Moolenaarendfunc
39172ab729cSBram Moolenaar
392e5a8f35bSBram Moolenaarfunction Test_printf_spec_s()
393e5a8f35bSBram Moolenaar  " number
394e5a8f35bSBram Moolenaar  call assert_equal("1234567890", printf('%s', 1234567890))
395e5a8f35bSBram Moolenaar
396e5a8f35bSBram Moolenaar  " string
397e5a8f35bSBram Moolenaar  call assert_equal("abcdefgi", printf('%s', "abcdefgi"))
398e5a8f35bSBram Moolenaar
399e5a8f35bSBram Moolenaar  " float
400e5a8f35bSBram Moolenaar  if has('float')
401e5a8f35bSBram Moolenaar    call assert_equal("1.23", printf('%s', 1.23))
402e5a8f35bSBram Moolenaar  endif
403e5a8f35bSBram Moolenaar
404e5a8f35bSBram Moolenaar  " list
405e5a8f35bSBram Moolenaar  let value = [1, 'two', ['three', 4]]
406e5a8f35bSBram Moolenaar  call assert_equal(string(value), printf('%s', value))
407e5a8f35bSBram Moolenaar
408e5a8f35bSBram Moolenaar  " dict
409e5a8f35bSBram Moolenaar  let value = {'key1' : 'value1', 'key2' : ['list', 'value'], 'key3' : {'dict' : 'value'}}
410e5a8f35bSBram Moolenaar  call assert_equal(string(value), printf('%s', value))
411e5a8f35bSBram Moolenaar
412e5a8f35bSBram Moolenaar  " funcref
413a4208966SBram Moolenaar  call assert_equal('printf', printf('%s', 'printf'->function()))
414e5a8f35bSBram Moolenaar
415e5a8f35bSBram Moolenaar  " partial
416e5a8f35bSBram Moolenaar  call assert_equal(string(function('printf', ['%s'])), printf('%s', function('printf', ['%s'])))
417e5a8f35bSBram Moolenaarendfunc
418e5a8f35bSBram Moolenaar
41991984b90SBram Moolenaarfunction Test_printf_spec_b()
42091984b90SBram Moolenaar  call assert_equal("0", printf('%b', 0))
42191984b90SBram Moolenaar  call assert_equal("00001100", printf('%08b', 12))
42291984b90SBram Moolenaar  call assert_equal("11111111", printf('%08b', 0xff))
42391984b90SBram Moolenaar  call assert_equal("   1111011", printf('%10b', 123))
42491984b90SBram Moolenaar  call assert_equal("0001111011", printf('%010b', 123))
42591984b90SBram Moolenaar  call assert_equal(" 0b1111011", printf('%#10b', 123))
42691984b90SBram Moolenaar  call assert_equal("0B01111011", printf('%#010B', 123))
42791984b90SBram Moolenaar  call assert_equal("1001001100101100000001011010010", printf('%b', 1234567890))
42891984b90SBram Moolenaar  call assert_equal("11100000100100010000110000011011101111101111001", printf('%b', 123456789012345))
42991984b90SBram Moolenaar  call assert_equal("1111111111111111111111111111111111111111111111111111111111111111", printf('%b', -1))
43091984b90SBram Moolenaarendfunc
43191984b90SBram Moolenaar
43272ab729cSBram Moolenaarfunc Test_substitute_expr()
43372ab729cSBram Moolenaar  let g:val = 'XXX'
43472ab729cSBram Moolenaar  call assert_equal('XXX', substitute('yyy', 'y*', '\=g:val', ''))
43572ab729cSBram Moolenaar  call assert_equal('XXX', substitute('yyy', 'y*', {-> g:val}, ''))
43672ab729cSBram Moolenaar  call assert_equal("-\u1b \uf2-", substitute("-%1b %f2-", '%\(\x\x\)',
43772ab729cSBram Moolenaar			   \ '\=nr2char("0x" . submatch(1))', 'g'))
43872ab729cSBram Moolenaar  call assert_equal("-\u1b \uf2-", substitute("-%1b %f2-", '%\(\x\x\)',
43972ab729cSBram Moolenaar			   \ {-> nr2char("0x" . submatch(1))}, 'g'))
44072ab729cSBram Moolenaar
44172ab729cSBram Moolenaar  call assert_equal('231', substitute('123', '\(.\)\(.\)\(.\)',
44272ab729cSBram Moolenaar	\ {-> submatch(2) . submatch(3) . submatch(1)}, ''))
44372ab729cSBram Moolenaar
44472ab729cSBram Moolenaar  func Recurse()
4456100d02aSBram Moolenaar    return substitute('yyy', 'y\(.\)y', {-> submatch(1)}, '')
44672ab729cSBram Moolenaar  endfunc
4476100d02aSBram Moolenaar  " recursive call works
4486100d02aSBram Moolenaar  call assert_equal('-y-x-', substitute('xxx', 'x\(.\)x', {-> '-' . Recurse() . '-' . submatch(1) . '-'}, ''))
4490e05de46SBram Moolenaar
4500e05de46SBram Moolenaar  call assert_fails("let s=submatch([])", 'E745:')
4510e05de46SBram Moolenaar  call assert_fails("let s=submatch(2, [])", 'E745:')
45272ab729cSBram Moolenaarendfunc
453df48fb45SBram Moolenaar
454989f592fSBram Moolenaarfunc Test_invalid_submatch()
455989f592fSBram Moolenaar  " This was causing invalid memory access in Vim-7.4.2232 and older
456989f592fSBram Moolenaar  call assert_fails("call substitute('x', '.', {-> submatch(10)}, '')", 'E935:')
457989f592fSBram Moolenaarendfunc
458989f592fSBram Moolenaar
459df48fb45SBram Moolenaarfunc Test_substitute_expr_arg()
460df48fb45SBram Moolenaar  call assert_equal('123456789-123456789=', substitute('123456789',
461df48fb45SBram Moolenaar	\ '\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)',
462df48fb45SBram Moolenaar	\ {m -> m[0] . '-' . m[1] . m[2] . m[3] . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, ''))
463df48fb45SBram Moolenaar
464df48fb45SBram Moolenaar  call assert_equal('123456-123456=789', substitute('123456789',
465df48fb45SBram Moolenaar	\ '\(.\)\(.\)\(.\)\(a*\)\(n*\)\(.\)\(.\)\(.\)\(x*\)',
466df48fb45SBram Moolenaar	\ {m -> m[0] . '-' . m[1] . m[2] . m[3] . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, ''))
467df48fb45SBram Moolenaar
468df48fb45SBram Moolenaar  call assert_equal('123456789-123456789x=', substitute('123456789',
469df48fb45SBram Moolenaar	\ '\(.\)\(.\)\(.*\)',
470df48fb45SBram Moolenaar	\ {m -> m[0] . '-' . m[1] . m[2] . m[3] . 'x' . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, ''))
471df48fb45SBram Moolenaar
472df48fb45SBram Moolenaar  call assert_fails("call substitute('xxx', '.', {m -> string(add(m, 'x'))}, '')", 'E742:')
473df48fb45SBram Moolenaar  call assert_fails("call substitute('xxx', '.', {m -> string(insert(m, 'x'))}, '')", 'E742:')
474df48fb45SBram Moolenaar  call assert_fails("call substitute('xxx', '.', {m -> string(extend(m, ['x']))}, '')", 'E742:')
475df48fb45SBram Moolenaar  call assert_fails("call substitute('xxx', '.', {m -> string(remove(m, 1))}, '')", 'E742:')
476df48fb45SBram Moolenaarendfunc
477b54c3ff3SBram Moolenaar
478b54c3ff3SBram Moolenaarfunc Test_function_with_funcref()
479b54c3ff3SBram Moolenaar  let s:f = function('type')
480b54c3ff3SBram Moolenaar  let s:fref = function(s:f)
481b54c3ff3SBram Moolenaar  call assert_equal(v:t_string, s:fref('x'))
482b54c3ff3SBram Moolenaar  call assert_fails("call function('s:f')", 'E700:')
4835582ef14SBram Moolenaar
4845582ef14SBram Moolenaar  call assert_fails("call function('foo()')", 'E475:')
4855582ef14SBram Moolenaar  call assert_fails("call function('foo()')", 'foo()')
4868b633135SBram Moolenaar  call assert_fails("function('')", 'E129:')
487b54c3ff3SBram Moolenaarendfunc
488437bafe4SBram Moolenaar
489437bafe4SBram Moolenaarfunc Test_funcref()
490437bafe4SBram Moolenaar  func! One()
491437bafe4SBram Moolenaar    return 1
492437bafe4SBram Moolenaar  endfunc
493437bafe4SBram Moolenaar  let OneByName = function('One')
494437bafe4SBram Moolenaar  let OneByRef = funcref('One')
495437bafe4SBram Moolenaar  func! One()
496437bafe4SBram Moolenaar    return 2
497437bafe4SBram Moolenaar  endfunc
498437bafe4SBram Moolenaar  call assert_equal(2, OneByName())
499437bafe4SBram Moolenaar  call assert_equal(1, OneByRef())
500a4208966SBram Moolenaar  let OneByRef = 'One'->funcref()
501437bafe4SBram Moolenaar  call assert_equal(2, OneByRef())
502843b8844SBram Moolenaar  call assert_fails('echo funcref("{")', 'E475:')
5034c054e9fSBram Moolenaar  let OneByRef = funcref("One", repeat(["foo"], 20))
5044c054e9fSBram Moolenaar  call assert_fails('let OneByRef = funcref("One", repeat(["foo"], 21))', 'E118:')
505*ee4e0c1eSBram Moolenaar  call assert_fails('echo function("min") =~ function("min")', 'E694:')
506437bafe4SBram Moolenaarendfunc
5077dc5e2e4SBram Moolenaar
5087dc5e2e4SBram Moolenaarfunc Test_setmatches()
5097dc5e2e4SBram Moolenaar  hi def link 1 Comment
5107dc5e2e4SBram Moolenaar  hi def link 2 PreProc
5117ab6defcSBram Moolenaar  let set = [{"group": 1, "pattern": 2, "id": 3, "priority": 4}]
5127ab6defcSBram Moolenaar  let exp = [{"group": '1', "pattern": '2', "id": 3, "priority": 4}]
5137ab6defcSBram Moolenaar  if has('conceal')
5147ab6defcSBram Moolenaar    let set[0]['conceal'] = 5
5157ab6defcSBram Moolenaar    let exp[0]['conceal'] = '5'
5167ab6defcSBram Moolenaar  endif
517aad222c9SBram Moolenaar  eval set->setmatches()
5187dc5e2e4SBram Moolenaar  call assert_equal(exp, getmatches())
5197dc5e2e4SBram Moolenaarendfunc
52021842689SBram Moolenaar
52121842689SBram Moolenaarfunc Test_empty_concatenate()
52221842689SBram Moolenaar  call assert_equal('b', 'a'[4:0] . 'b')
52321842689SBram Moolenaar  call assert_equal('b', 'b' . 'a'[4:0])
52421842689SBram Moolenaarendfunc
52516e9b851SBram Moolenaar
52616e9b851SBram Moolenaarfunc Test_broken_number()
52716e9b851SBram Moolenaar  let X = 'bad'
52816e9b851SBram Moolenaar  call assert_fails('echo 1X', 'E15:')
52916e9b851SBram Moolenaar  call assert_fails('echo 0b1X', 'E15:')
53016e9b851SBram Moolenaar  call assert_fails('echo 0b12', 'E15:')
53116e9b851SBram Moolenaar  call assert_fails('echo 0x1X', 'E15:')
53216e9b851SBram Moolenaar  call assert_fails('echo 011X', 'E15:')
53316e9b851SBram Moolenaar  call assert_equal(2, str2nr('2a'))
53416e9b851SBram Moolenaar  call assert_fails('inoremap <Char-0b1z> b', 'E474:')
53516e9b851SBram Moolenaarendfunc
536a76b3154SBram Moolenaar
537a76b3154SBram Moolenaarfunc Test_eval_after_if()
538a76b3154SBram Moolenaar  let s:val = ''
539a76b3154SBram Moolenaar  func SetVal(x)
540a76b3154SBram Moolenaar    let s:val ..= a:x
541a76b3154SBram Moolenaar  endfunc
542a76b3154SBram Moolenaar  if 0 | eval SetVal('a') | endif | call SetVal('b')
543a76b3154SBram Moolenaar  call assert_equal('b', s:val)
544a76b3154SBram Moolenaarendfunc
5458b633135SBram Moolenaar
5468b633135SBram Moolenaar" Test for command-line completion of expressions
5478b633135SBram Moolenaarfunc Test_expr_completion()
5488b633135SBram Moolenaar  if !has('cmdline_compl')
5498b633135SBram Moolenaar    return
5508b633135SBram Moolenaar  endif
5518b633135SBram Moolenaar  for cmd in [
5528b633135SBram Moolenaar	\ 'let a = ',
5538b633135SBram Moolenaar	\ 'const a = ',
5548b633135SBram Moolenaar	\ 'if',
5558b633135SBram Moolenaar	\ 'elseif',
5568b633135SBram Moolenaar	\ 'while',
5578b633135SBram Moolenaar	\ 'for',
5588b633135SBram Moolenaar	\ 'echo',
5598b633135SBram Moolenaar	\ 'echon',
5608b633135SBram Moolenaar	\ 'execute',
5618b633135SBram Moolenaar	\ 'echomsg',
5628b633135SBram Moolenaar	\ 'echoerr',
5638b633135SBram Moolenaar	\ 'call',
5648b633135SBram Moolenaar	\ 'return',
5658b633135SBram Moolenaar	\ 'cexpr',
5668b633135SBram Moolenaar	\ 'caddexpr',
5678b633135SBram Moolenaar	\ 'cgetexpr',
5688b633135SBram Moolenaar	\ 'lexpr',
5698b633135SBram Moolenaar	\ 'laddexpr',
5708b633135SBram Moolenaar	\ 'lgetexpr']
5718b633135SBram Moolenaar    call feedkeys(":" . cmd . " getl\<Tab>\<Home>\"\<CR>", 'xt')
5728b633135SBram Moolenaar    call assert_equal('"' . cmd . ' getline(', getreg(':'))
5738b633135SBram Moolenaar  endfor
5748b633135SBram Moolenaar
5758b633135SBram Moolenaar  " completion for the expression register
5768b633135SBram Moolenaar  call feedkeys(":\"\<C-R>=float2\t\"\<C-B>\"\<CR>", 'xt')
5778b633135SBram Moolenaar  call assert_equal('"float2nr("', @=)
5788b633135SBram Moolenaar
5798b633135SBram Moolenaar  " completion for window local variables
5808b633135SBram Moolenaar  let w:wvar1 = 10
5818b633135SBram Moolenaar  let w:wvar2 = 10
5828b633135SBram Moolenaar  call feedkeys(":echo w:wvar\<C-A>\<C-B>\"\<CR>", 'xt')
5838b633135SBram Moolenaar  call assert_equal('"echo w:wvar1 w:wvar2', @:)
5848b633135SBram Moolenaar  unlet w:wvar1 w:wvar2
5858b633135SBram Moolenaar
5868b633135SBram Moolenaar  " completion for tab local variables
5878b633135SBram Moolenaar  let t:tvar1 = 10
5888b633135SBram Moolenaar  let t:tvar2 = 10
5898b633135SBram Moolenaar  call feedkeys(":echo t:tvar\<C-A>\<C-B>\"\<CR>", 'xt')
5908b633135SBram Moolenaar  call assert_equal('"echo t:tvar1 t:tvar2', @:)
5918b633135SBram Moolenaar  unlet t:tvar1 t:tvar2
5928b633135SBram Moolenaar
5938b633135SBram Moolenaar  " completion for variables
5948b633135SBram Moolenaar  let g:tvar1 = 1
5958b633135SBram Moolenaar  let g:tvar2 = 2
5968b633135SBram Moolenaar  call feedkeys(":let g:tv\<C-A>\<C-B>\"\<CR>", 'xt')
5978b633135SBram Moolenaar  call assert_equal('"let g:tvar1 g:tvar2', @:)
5988b633135SBram Moolenaar  " completion for variables after a ||
5998b633135SBram Moolenaar  call feedkeys(":echo 1 || g:tv\<C-A>\<C-B>\"\<CR>", 'xt')
6008b633135SBram Moolenaar  call assert_equal('"echo 1 || g:tvar1 g:tvar2', @:)
6018b633135SBram Moolenaar
6028b633135SBram Moolenaar  " completion for options
6038b633135SBram Moolenaar  call feedkeys(":echo &compat\<C-A>\<C-B>\"\<CR>", 'xt')
6048b633135SBram Moolenaar  call assert_equal('"echo &compatible', @:)
6058b633135SBram Moolenaar  call feedkeys(":echo 1 && &compat\<C-A>\<C-B>\"\<CR>", 'xt')
6068b633135SBram Moolenaar  call assert_equal('"echo 1 && &compatible', @:)
6078b633135SBram Moolenaar  call feedkeys(":echo &g:equala\<C-A>\<C-B>\"\<CR>", 'xt')
6088b633135SBram Moolenaar  call assert_equal('"echo &g:equalalways', @:)
6098b633135SBram Moolenaar
6108b633135SBram Moolenaar  " completion for string
6118b633135SBram Moolenaar  call feedkeys(":echo \"Hello\\ World\"\<C-A>\<C-B>\"\<CR>", 'xt')
6128b633135SBram Moolenaar  call assert_equal("\"echo \"Hello\\ World\"\<C-A>", @:)
6138b633135SBram Moolenaar  call feedkeys(":echo 'Hello World'\<C-A>\<C-B>\"\<CR>", 'xt')
6148b633135SBram Moolenaar  call assert_equal("\"echo 'Hello World'\<C-A>", @:)
6158b633135SBram Moolenaar
6168b633135SBram Moolenaar  " completion for command after a |
6178b633135SBram Moolenaar  call feedkeys(":echo 'Hello' | cwin\<C-A>\<C-B>\"\<CR>", 'xt')
6188b633135SBram Moolenaar  call assert_equal("\"echo 'Hello' | cwindow", @:)
6198b633135SBram Moolenaar
6208b633135SBram Moolenaar  " completion for environment variable
6218b633135SBram Moolenaar  let $X_VIM_TEST_COMPLETE_ENV = 'foo'
6228b633135SBram Moolenaar  call feedkeys(":let $X_VIM_TEST_COMPLETE_E\<C-A>\<C-B>\"\<CR>", 'tx')
6238b633135SBram Moolenaar  call assert_match('"let $X_VIM_TEST_COMPLETE_ENV', @:)
6248b633135SBram Moolenaar  unlet $X_VIM_TEST_COMPLETE_ENV
6258b633135SBram Moolenaarendfunc
6268b633135SBram Moolenaar
6278b633135SBram Moolenaar" Test for errors in expression evaluation
6288b633135SBram Moolenaarfunc Test_expr_eval_error()
6298b633135SBram Moolenaar  call assert_fails("let i = 'abc' . []", 'E730:')
6308b633135SBram Moolenaar  call assert_fails("let l = [] + 10", 'E745:')
6318b633135SBram Moolenaar  call assert_fails("let v = 10 + []", 'E745:')
6328b633135SBram Moolenaar  call assert_fails("let v = 10 / []", 'E745:')
6338b633135SBram Moolenaar  call assert_fails("let v = -{}", 'E728:')
6348b633135SBram Moolenaarendfunc
6358b633135SBram Moolenaar
6368b633135SBram Moolenaar" vim: shiftwidth=2 sts=2 expandtab
637