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)) 6258de0e2dSBram Moolenaarendfunc 6358de0e2dSBram Moolenaar 6458de0e2dSBram Moolenaarfunc Test_strcharpart() 6558de0e2dSBram Moolenaar call assert_equal('a', strcharpart('axb', 0, 1)) 66f6ed61e1SBram Moolenaar call assert_equal('x', 'axb'->strcharpart(1, 1)) 6758de0e2dSBram Moolenaar call assert_equal('b', strcharpart('axb', 2, 1)) 6858de0e2dSBram Moolenaar call assert_equal('xb', strcharpart('axb', 1)) 6958de0e2dSBram Moolenaar 7058de0e2dSBram Moolenaar call assert_equal('', strcharpart('axb', 1, 0)) 7158de0e2dSBram Moolenaar call assert_equal('', strcharpart('axb', 1, -1)) 7258de0e2dSBram Moolenaar call assert_equal('', strcharpart('axb', -1, 1)) 7358de0e2dSBram Moolenaar call assert_equal('', strcharpart('axb', -2, 2)) 7458de0e2dSBram Moolenaar 7558de0e2dSBram Moolenaar call assert_equal('a', strcharpart('axb', -1, 2)) 7658de0e2dSBram Moolenaarendfunc 77517ffbeeSBram Moolenaar 78517ffbeeSBram Moolenaarfunc Test_getreg_empty_list() 79517ffbeeSBram Moolenaar call assert_equal('', getreg('x')) 80517ffbeeSBram Moolenaar call assert_equal([], getreg('x', 1, 1)) 81517ffbeeSBram Moolenaar let x = getreg('x', 1, 1) 82517ffbeeSBram Moolenaar let y = x 83517ffbeeSBram Moolenaar call add(x, 'foo') 84517ffbeeSBram Moolenaar call assert_equal(['foo'], y) 85517ffbeeSBram Moolenaarendfunc 86d8585edeSBram Moolenaar 87d8585edeSBram Moolenaarfunc Test_loop_over_null_list() 88574860b5SBram Moolenaar let null_list = test_null_list() 89d8585edeSBram Moolenaar for i in null_list 9037175409SBram Moolenaar call assert_report('should not get here') 91d8585edeSBram Moolenaar endfor 92d8585edeSBram Moolenaarendfunc 9313ddc5c3SBram Moolenaar 9413ddc5c3SBram Moolenaarfunc Test_compare_null_dict() 9513ddc5c3SBram Moolenaar call assert_fails('let x = test_null_dict()[10]') 9613ddc5c3SBram Moolenaar call assert_equal({}, {}) 9713ddc5c3SBram Moolenaar call assert_equal(test_null_dict(), test_null_dict()) 9813ddc5c3SBram Moolenaar call assert_notequal({}, test_null_dict()) 9913ddc5c3SBram Moolenaarendfunc 10013ddc5c3SBram Moolenaar 10113ddc5c3SBram Moolenaarfunc Test_set_reg_null_list() 10213ddc5c3SBram Moolenaar call setreg('x', test_null_list()) 10313ddc5c3SBram Moolenaarendfunc 1041d90a5a5SBram Moolenaar 1051d90a5a5SBram Moolenaarfunc Test_special_char() 1061d90a5a5SBram Moolenaar " The failure is only visible using valgrind. 1071d90a5a5SBram Moolenaar call assert_fails('echo "\<C-">') 1081d90a5a5SBram Moolenaarendfunc 1092acfbed9SBram Moolenaar 1102acfbed9SBram Moolenaarfunc Test_option_value() 1112acfbed9SBram Moolenaar " boolean 1122acfbed9SBram Moolenaar set bri 1132acfbed9SBram Moolenaar call assert_equal(1, &bri) 1142acfbed9SBram Moolenaar set nobri 1152acfbed9SBram Moolenaar call assert_equal(0, &bri) 1162acfbed9SBram Moolenaar 1172acfbed9SBram Moolenaar " number 1182acfbed9SBram Moolenaar set ts=1 1192acfbed9SBram Moolenaar call assert_equal(1, &ts) 1202acfbed9SBram Moolenaar set ts=8 1212acfbed9SBram Moolenaar call assert_equal(8, &ts) 1222acfbed9SBram Moolenaar 1232acfbed9SBram Moolenaar " string 1242acfbed9SBram Moolenaar exe "set cedit=\<Esc>" 1252acfbed9SBram Moolenaar call assert_equal("\<Esc>", &cedit) 1262acfbed9SBram Moolenaar set cpo= 1272acfbed9SBram Moolenaar call assert_equal("", &cpo) 1282acfbed9SBram Moolenaar set cpo=abcdefgi 1292acfbed9SBram Moolenaar call assert_equal("abcdefgi", &cpo) 1302acfbed9SBram Moolenaar set cpo&vim 1312acfbed9SBram Moolenaarendfunc 13238ee6b04SBram Moolenaar 13376efafbaSBram Moolenaarfunction Test_printf_misc() 134c71807dbSBram Moolenaar call assert_equal('123', printf('123')) 135c71807dbSBram Moolenaar call assert_fails("call printf('123', 3)", "E767:") 136c71807dbSBram Moolenaar 13776efafbaSBram Moolenaar call assert_equal('123', printf('%d', 123)) 13876efafbaSBram Moolenaar call assert_equal('123', printf('%i', 123)) 13976efafbaSBram Moolenaar call assert_equal('123', printf('%D', 123)) 14076efafbaSBram Moolenaar call assert_equal('123', printf('%U', 123)) 14176efafbaSBram Moolenaar call assert_equal('173', printf('%o', 123)) 14276efafbaSBram Moolenaar call assert_equal('173', printf('%O', 123)) 14376efafbaSBram Moolenaar call assert_equal('7b', printf('%x', 123)) 14476efafbaSBram Moolenaar call assert_equal('7B', printf('%X', 123)) 14521e551ccSBram Moolenaar 14621e551ccSBram Moolenaar call assert_equal('123', printf('%hd', 123)) 14721e551ccSBram Moolenaar call assert_equal('-123', printf('%hd', -123)) 14821e551ccSBram Moolenaar call assert_equal('-1', printf('%hd', 0xFFFF)) 14921e551ccSBram Moolenaar call assert_equal('-1', printf('%hd', 0x1FFFFF)) 15021e551ccSBram Moolenaar 15121e551ccSBram Moolenaar call assert_equal('123', printf('%hu', 123)) 15221e551ccSBram Moolenaar call assert_equal('65413', printf('%hu', -123)) 15321e551ccSBram Moolenaar call assert_equal('65535', printf('%hu', 0xFFFF)) 15421e551ccSBram Moolenaar call assert_equal('65535', printf('%hu', 0x1FFFFF)) 15521e551ccSBram Moolenaar 15621e551ccSBram Moolenaar call assert_equal('123', printf('%ld', 123)) 15721e551ccSBram Moolenaar call assert_equal('-123', printf('%ld', -123)) 15821e551ccSBram Moolenaar call assert_equal('65535', printf('%ld', 0xFFFF)) 15921e551ccSBram Moolenaar call assert_equal('131071', printf('%ld', 0x1FFFF)) 16021e551ccSBram Moolenaar 16176efafbaSBram Moolenaar if has('ebcdic') 16276efafbaSBram Moolenaar call assert_equal('#', printf('%c', 123)) 16376efafbaSBram Moolenaar else 16476efafbaSBram Moolenaar call assert_equal('{', printf('%c', 123)) 16576efafbaSBram Moolenaar endif 16676efafbaSBram Moolenaar call assert_equal('abc', printf('%s', 'abc')) 16776efafbaSBram Moolenaar call assert_equal('abc', printf('%S', 'abc')) 16876efafbaSBram Moolenaar 16976efafbaSBram Moolenaar call assert_equal('+123', printf('%+d', 123)) 17076efafbaSBram Moolenaar call assert_equal('-123', printf('%+d', -123)) 17176efafbaSBram Moolenaar call assert_equal('+123', printf('%+ d', 123)) 17276efafbaSBram Moolenaar call assert_equal(' 123', printf('% d', 123)) 17376efafbaSBram Moolenaar call assert_equal(' 123', printf('% d', 123)) 17476efafbaSBram Moolenaar call assert_equal('-123', printf('% d', -123)) 17576efafbaSBram Moolenaar 176e999782eSBram Moolenaar call assert_equal('123', printf('%2d', 123)) 177e999782eSBram Moolenaar call assert_equal(' 123', printf('%6d', 123)) 178e999782eSBram Moolenaar call assert_equal('000123', printf('%06d', 123)) 179e999782eSBram Moolenaar call assert_equal('+00123', printf('%+06d', 123)) 180e999782eSBram Moolenaar call assert_equal(' 00123', printf('% 06d', 123)) 181e999782eSBram Moolenaar call assert_equal(' +123', printf('%+6d', 123)) 182e999782eSBram Moolenaar call assert_equal(' 123', printf('% 6d', 123)) 183e999782eSBram Moolenaar call assert_equal(' -123', printf('% 6d', -123)) 18404186095SBram Moolenaar 18504186095SBram Moolenaar " Test left adjusted. 18604186095SBram Moolenaar call assert_equal('123 ', printf('%-6d', 123)) 187e999782eSBram Moolenaar call assert_equal('+123 ', printf('%-+6d', 123)) 188e999782eSBram Moolenaar call assert_equal(' 123 ', printf('%- 6d', 123)) 189e999782eSBram Moolenaar call assert_equal('-123 ', printf('%- 6d', -123)) 190e999782eSBram Moolenaar 19104186095SBram Moolenaar call assert_equal(' 00123', printf('%7.5d', 123)) 19204186095SBram Moolenaar call assert_equal(' -00123', printf('%7.5d', -123)) 19304186095SBram Moolenaar call assert_equal(' +00123', printf('%+7.5d', 123)) 19404186095SBram Moolenaar " Precision field should not be used when combined with %0 19504186095SBram Moolenaar call assert_equal(' 00123', printf('%07.5d', 123)) 19604186095SBram Moolenaar call assert_equal(' -00123', printf('%07.5d', -123)) 19704186095SBram Moolenaar 19804186095SBram Moolenaar call assert_equal(' 123', printf('%*d', 5, 123)) 19904186095SBram Moolenaar call assert_equal('123 ', printf('%*d', -5, 123)) 20076efafbaSBram Moolenaar call assert_equal('00123', printf('%.*d', 5, 123)) 20176efafbaSBram Moolenaar call assert_equal(' 123', printf('% *d', 5, 123)) 20276efafbaSBram Moolenaar call assert_equal(' +123', printf('%+ *d', 5, 123)) 20376efafbaSBram Moolenaar 20421e551ccSBram Moolenaar call assert_equal('foobar', printf('%.*s', 9, 'foobar')) 20521e551ccSBram Moolenaar call assert_equal('foo', printf('%.*s', 3, 'foobar')) 20621e551ccSBram Moolenaar call assert_equal('', printf('%.*s', 0, 'foobar')) 20721e551ccSBram Moolenaar call assert_equal('foobar', printf('%.*s', -1, 'foobar')) 20821e551ccSBram Moolenaar 20904186095SBram Moolenaar " Simple quote (thousand grouping char) is ignored. 21004186095SBram Moolenaar call assert_equal('+00123456', printf("%+'09d", 123456)) 21104186095SBram Moolenaar 21204186095SBram Moolenaar " Unrecognized format specifier kept as-is. 21304186095SBram Moolenaar call assert_equal('_123', printf("%_%d", 123)) 21404186095SBram Moolenaar 21504186095SBram Moolenaar " Test alternate forms. 21676efafbaSBram Moolenaar call assert_equal('0x7b', printf('%#x', 123)) 21776efafbaSBram Moolenaar call assert_equal('0X7B', printf('%#X', 123)) 21876efafbaSBram Moolenaar call assert_equal('0173', printf('%#o', 123)) 21976efafbaSBram Moolenaar call assert_equal('0173', printf('%#O', 123)) 22076efafbaSBram Moolenaar call assert_equal('abc', printf('%#s', 'abc')) 22176efafbaSBram Moolenaar call assert_equal('abc', printf('%#S', 'abc')) 22204186095SBram Moolenaar call assert_equal(' 0173', printf('%#6o', 123)) 22304186095SBram Moolenaar call assert_equal(' 00173', printf('%#6.5o', 123)) 22404186095SBram Moolenaar call assert_equal(' 0173', printf('%#6.2o', 123)) 22504186095SBram Moolenaar call assert_equal(' 0173', printf('%#6.2o', 123)) 22604186095SBram Moolenaar call assert_equal('0173', printf('%#2.2o', 123)) 22776efafbaSBram Moolenaar 22876efafbaSBram Moolenaar call assert_equal(' 00123', printf('%6.5d', 123)) 22976efafbaSBram Moolenaar call assert_equal(' 0007b', printf('%6.5x', 123)) 23076efafbaSBram Moolenaar 23121e551ccSBram Moolenaar call assert_equal('123', printf('%.2d', 123)) 23221e551ccSBram Moolenaar call assert_equal('0123', printf('%.4d', 123)) 23321e551ccSBram Moolenaar call assert_equal('0000000123', printf('%.10d', 123)) 23421e551ccSBram Moolenaar call assert_equal('123', printf('%.0d', 123)) 23521e551ccSBram Moolenaar 23676efafbaSBram Moolenaar call assert_equal('abc', printf('%2s', 'abc')) 23776efafbaSBram Moolenaar call assert_equal('abc', printf('%2S', 'abc')) 23876efafbaSBram Moolenaar call assert_equal('abc', printf('%.4s', 'abc')) 23976efafbaSBram Moolenaar call assert_equal('abc', printf('%.4S', 'abc')) 24076efafbaSBram Moolenaar call assert_equal('ab', printf('%.2s', 'abc')) 24176efafbaSBram Moolenaar call assert_equal('ab', printf('%.2S', 'abc')) 24276efafbaSBram Moolenaar call assert_equal('', printf('%.0s', 'abc')) 24376efafbaSBram Moolenaar call assert_equal('', printf('%.s', 'abc')) 24476efafbaSBram Moolenaar call assert_equal(' abc', printf('%4s', 'abc')) 24576efafbaSBram Moolenaar call assert_equal(' abc', printf('%4S', 'abc')) 24676efafbaSBram Moolenaar call assert_equal('0abc', printf('%04s', 'abc')) 24776efafbaSBram Moolenaar call assert_equal('0abc', printf('%04S', 'abc')) 24876efafbaSBram Moolenaar call assert_equal('abc ', printf('%-4s', 'abc')) 24976efafbaSBram Moolenaar call assert_equal('abc ', printf('%-4S', 'abc')) 25076efafbaSBram Moolenaar 251ce0fac28SBram Moolenaar call assert_equal('��', printf('%.2S', '����')) 252ce0fac28SBram Moolenaar call assert_equal('', printf('%.1S', '����')) 253ce0fac28SBram Moolenaar 25476efafbaSBram Moolenaar call assert_equal('1%', printf('%d%%', 1)) 25576efafbaSBram Moolenaarendfunc 25676efafbaSBram Moolenaar 25776efafbaSBram Moolenaarfunction Test_printf_float() 25876efafbaSBram Moolenaar if has('float') 25904186095SBram Moolenaar call assert_equal('1.000000', printf('%f', 1)) 26076efafbaSBram Moolenaar call assert_equal('1.230000', printf('%f', 1.23)) 26176efafbaSBram Moolenaar call assert_equal('1.230000', printf('%F', 1.23)) 262e999782eSBram Moolenaar call assert_equal('9999999.9', printf('%g', 9999999.9)) 263e999782eSBram Moolenaar call assert_equal('9999999.9', printf('%G', 9999999.9)) 264e999782eSBram Moolenaar call assert_equal('1.00000001e7', printf('%.8g', 10000000.1)) 265e999782eSBram Moolenaar call assert_equal('1.00000001E7', printf('%.8G', 10000000.1)) 26676efafbaSBram Moolenaar call assert_equal('1.230000e+00', printf('%e', 1.23)) 26776efafbaSBram Moolenaar call assert_equal('1.230000E+00', printf('%E', 1.23)) 26876efafbaSBram Moolenaar call assert_equal('1.200000e-02', printf('%e', 0.012)) 26976efafbaSBram Moolenaar call assert_equal('-1.200000e-02', printf('%e', -0.012)) 270e999782eSBram Moolenaar call assert_equal('0.33', printf('%.2f', 1.0/3.0)) 271e999782eSBram Moolenaar call assert_equal(' 0.33', printf('%6.2f', 1.0/3.0)) 272e999782eSBram Moolenaar call assert_equal(' -0.33', printf('%6.2f', -1.0/3.0)) 273e999782eSBram Moolenaar call assert_equal('000.33', printf('%06.2f', 1.0/3.0)) 27404186095SBram Moolenaar call assert_equal('-00.33', printf('%06.2f', -1.0/3.0)) 27504186095SBram Moolenaar call assert_equal('-00.33', printf('%+06.2f', -1.0/3.0)) 27604186095SBram Moolenaar call assert_equal('+00.33', printf('%+06.2f', 1.0/3.0)) 27704186095SBram Moolenaar call assert_equal(' 00.33', printf('% 06.2f', 1.0/3.0)) 27804186095SBram Moolenaar call assert_equal('000.33', printf('%06.2g', 1.0/3.0)) 27904186095SBram Moolenaar call assert_equal('-00.33', printf('%06.2g', -1.0/3.0)) 28004186095SBram Moolenaar call assert_equal('0.33', printf('%3.2f', 1.0/3.0)) 28104186095SBram Moolenaar call assert_equal('003.33e-01', printf('%010.2e', 1.0/3.0)) 28204186095SBram Moolenaar call assert_equal(' 03.33e-01', printf('% 010.2e', 1.0/3.0)) 28304186095SBram Moolenaar call assert_equal('+03.33e-01', printf('%+010.2e', 1.0/3.0)) 28404186095SBram Moolenaar call assert_equal('-03.33e-01', printf('%010.2e', -1.0/3.0)) 28504186095SBram Moolenaar 28604186095SBram Moolenaar " When precision is 0, the dot should be omitted. 28704186095SBram Moolenaar call assert_equal(' 2', printf('%3.f', 7.0/3.0)) 28804186095SBram Moolenaar call assert_equal(' 2', printf('%3.g', 7.0/3.0)) 28904186095SBram Moolenaar call assert_equal(' 2e+00', printf('%7.e', 7.0/3.0)) 29004186095SBram Moolenaar 29104186095SBram Moolenaar " Float zero can be signed. 29204186095SBram Moolenaar call assert_equal('+0.000000', printf('%+f', 0.0)) 29304186095SBram Moolenaar call assert_equal('0.000000', printf('%f', 1.0/(1.0/0.0))) 29404186095SBram Moolenaar call assert_equal('-0.000000', printf('%f', 1.0/(-1.0/0.0))) 29504186095SBram Moolenaar call assert_equal('0.0', printf('%s', 1.0/(1.0/0.0))) 29604186095SBram Moolenaar call assert_equal('-0.0', printf('%s', 1.0/(-1.0/0.0))) 29704186095SBram Moolenaar call assert_equal('0.0', printf('%S', 1.0/(1.0/0.0))) 29804186095SBram Moolenaar call assert_equal('-0.0', printf('%S', 1.0/(-1.0/0.0))) 29976efafbaSBram Moolenaar 300e999782eSBram Moolenaar " Float infinity can be signed. 30176efafbaSBram Moolenaar call assert_equal('inf', printf('%f', 1.0/0.0)) 302e999782eSBram Moolenaar call assert_equal('-inf', printf('%f', -1.0/0.0)) 303e999782eSBram Moolenaar call assert_equal('inf', printf('%g', 1.0/0.0)) 304e999782eSBram Moolenaar call assert_equal('-inf', printf('%g', -1.0/0.0)) 305e999782eSBram Moolenaar call assert_equal('inf', printf('%e', 1.0/0.0)) 306e999782eSBram Moolenaar call assert_equal('-inf', printf('%e', -1.0/0.0)) 30704186095SBram Moolenaar call assert_equal('INF', printf('%F', 1.0/0.0)) 30804186095SBram Moolenaar call assert_equal('-INF', printf('%F', -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)) 311e999782eSBram Moolenaar call assert_equal('INF', printf('%E', 1.0/0.0)) 312e999782eSBram Moolenaar call assert_equal('-INF', printf('%G', -1.0/0.0)) 313e999782eSBram Moolenaar call assert_equal('+inf', printf('%+f', 1.0/0.0)) 314e999782eSBram Moolenaar call assert_equal('-inf', printf('%+f', -1.0/0.0)) 315e999782eSBram Moolenaar call assert_equal(' inf', printf('% f', 1.0/0.0)) 316e999782eSBram Moolenaar call assert_equal(' inf', printf('%6f', 1.0/0.0)) 317e999782eSBram Moolenaar call assert_equal(' -inf', printf('%6f', -1.0/0.0)) 318e999782eSBram Moolenaar call assert_equal(' inf', printf('%6g', 1.0/0.0)) 319e999782eSBram Moolenaar call assert_equal(' -inf', printf('%6g', -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('%+06f', 1.0/0.0)) 323e999782eSBram Moolenaar call assert_equal('inf ', printf('%-6f', 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('%- 6f', 1.0/0.0)) 32704186095SBram Moolenaar call assert_equal('-INF ', printf('%-6F', -1.0/0.0)) 32804186095SBram Moolenaar call assert_equal('+INF ', printf('%-+6F', 1.0/0.0)) 32904186095SBram Moolenaar call assert_equal(' INF ', printf('%- 6F', 1.0/0.0)) 330e999782eSBram Moolenaar call assert_equal('INF ', printf('%-6G', 1.0/0.0)) 331e999782eSBram Moolenaar call assert_equal('-INF ', printf('%-6G', -1.0/0.0)) 332e999782eSBram Moolenaar call assert_equal('INF ', printf('%-6E', 1.0/0.0)) 333e999782eSBram Moolenaar call assert_equal('-INF ', printf('%-6E', -1.0/0.0)) 334e999782eSBram Moolenaar call assert_equal('inf', printf('%s', 1.0/0.0)) 335e999782eSBram Moolenaar call assert_equal('-inf', printf('%s', -1.0/0.0)) 33676efafbaSBram Moolenaar 33721e551ccSBram Moolenaar " Test special case where max precision is truncated at 340. 33821e551ccSBram Moolenaar call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.330f', 1.0)) 33921e551ccSBram Moolenaar call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.340f', 1.0)) 34021e551ccSBram Moolenaar call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%.350f', 1.0)) 34121e551ccSBram Moolenaar 342e999782eSBram Moolenaar " Float nan (not a number) has no sign. 343e999782eSBram Moolenaar call assert_equal('nan', printf('%f', sqrt(-1.0))) 344e999782eSBram Moolenaar call assert_equal('nan', printf('%f', 0.0/0.0)) 345e999782eSBram Moolenaar call assert_equal('nan', printf('%f', -0.0/0.0)) 346e999782eSBram Moolenaar call assert_equal('nan', printf('%g', 0.0/0.0)) 347e999782eSBram Moolenaar call assert_equal('nan', printf('%e', 0.0/0.0)) 34804186095SBram Moolenaar call assert_equal('NAN', printf('%F', 0.0/0.0)) 349e999782eSBram Moolenaar call assert_equal('NAN', printf('%G', 0.0/0.0)) 350e999782eSBram Moolenaar call assert_equal('NAN', printf('%E', 0.0/0.0)) 35104186095SBram Moolenaar call assert_equal('NAN', printf('%F', -0.0/0.0)) 352e999782eSBram Moolenaar call assert_equal('NAN', printf('%G', -0.0/0.0)) 353e999782eSBram Moolenaar call assert_equal('NAN', printf('%E', -0.0/0.0)) 354e999782eSBram Moolenaar call assert_equal(' nan', printf('%6f', 0.0/0.0)) 355e999782eSBram Moolenaar call assert_equal(' nan', printf('%06f', 0.0/0.0)) 356e999782eSBram Moolenaar call assert_equal('nan ', printf('%-6f', 0.0/0.0)) 357e999782eSBram Moolenaar call assert_equal('nan ', printf('%- 6f', 0.0/0.0)) 358e999782eSBram Moolenaar call assert_equal('nan', printf('%s', 0.0/0.0)) 359e999782eSBram Moolenaar call assert_equal('nan', printf('%s', -0.0/0.0)) 360e999782eSBram Moolenaar call assert_equal('nan', printf('%S', 0.0/0.0)) 361e999782eSBram Moolenaar call assert_equal('nan', printf('%S', -0.0/0.0)) 36276efafbaSBram Moolenaar 36376efafbaSBram Moolenaar call assert_fails('echo printf("%f", "a")', 'E807:') 36476efafbaSBram Moolenaar endif 36576efafbaSBram Moolenaarendfunc 36676efafbaSBram Moolenaar 36776efafbaSBram Moolenaarfunction Test_printf_errors() 36876efafbaSBram Moolenaar call assert_fails('echo printf("%d", {})', 'E728:') 36976efafbaSBram Moolenaar call assert_fails('echo printf("%d", [])', 'E745:') 37076efafbaSBram Moolenaar call assert_fails('echo printf("%d", 1, 2)', 'E767:') 37176efafbaSBram Moolenaar call assert_fails('echo printf("%*d", 1)', 'E766:') 37276efafbaSBram Moolenaar call assert_fails('echo printf("%d", 1.2)', 'E805:') 37376efafbaSBram Moolenaarendfunc 37476efafbaSBram Moolenaar 37526b84339SBram Moolenaarfunction Test_max_min_errors() 37626b84339SBram Moolenaar call assert_fails('call max(v:true)', 'E712:') 37726b84339SBram Moolenaar call assert_fails('call max(v:true)', 'max()') 37826b84339SBram Moolenaar call assert_fails('call min(v:true)', 'E712:') 37926b84339SBram Moolenaar call assert_fails('call min(v:true)', 'min()') 38026b84339SBram Moolenaarendfunc 38126b84339SBram Moolenaar 38238ee6b04SBram Moolenaarfunction Test_printf_64bit() 38338ee6b04SBram Moolenaar if has('num64') 38438ee6b04SBram Moolenaar call assert_equal("123456789012345", printf('%d', 123456789012345)) 38538ee6b04SBram Moolenaar endif 38638ee6b04SBram Moolenaarendfunc 38772ab729cSBram Moolenaar 388e5a8f35bSBram Moolenaarfunction Test_printf_spec_s() 389e5a8f35bSBram Moolenaar " number 390e5a8f35bSBram Moolenaar call assert_equal("1234567890", printf('%s', 1234567890)) 391e5a8f35bSBram Moolenaar 392e5a8f35bSBram Moolenaar " string 393e5a8f35bSBram Moolenaar call assert_equal("abcdefgi", printf('%s', "abcdefgi")) 394e5a8f35bSBram Moolenaar 395e5a8f35bSBram Moolenaar " float 396e5a8f35bSBram Moolenaar if has('float') 397e5a8f35bSBram Moolenaar call assert_equal("1.23", printf('%s', 1.23)) 398e5a8f35bSBram Moolenaar endif 399e5a8f35bSBram Moolenaar 400e5a8f35bSBram Moolenaar " list 401e5a8f35bSBram Moolenaar let value = [1, 'two', ['three', 4]] 402e5a8f35bSBram Moolenaar call assert_equal(string(value), printf('%s', value)) 403e5a8f35bSBram Moolenaar 404e5a8f35bSBram Moolenaar " dict 405e5a8f35bSBram Moolenaar let value = {'key1' : 'value1', 'key2' : ['list', 'value'], 'key3' : {'dict' : 'value'}} 406e5a8f35bSBram Moolenaar call assert_equal(string(value), printf('%s', value)) 407e5a8f35bSBram Moolenaar 408e5a8f35bSBram Moolenaar " funcref 409a4208966SBram Moolenaar call assert_equal('printf', printf('%s', 'printf'->function())) 410e5a8f35bSBram Moolenaar 411e5a8f35bSBram Moolenaar " partial 412e5a8f35bSBram Moolenaar call assert_equal(string(function('printf', ['%s'])), printf('%s', function('printf', ['%s']))) 413e5a8f35bSBram Moolenaarendfunc 414e5a8f35bSBram Moolenaar 41591984b90SBram Moolenaarfunction Test_printf_spec_b() 41691984b90SBram Moolenaar call assert_equal("0", printf('%b', 0)) 41791984b90SBram Moolenaar call assert_equal("00001100", printf('%08b', 12)) 41891984b90SBram Moolenaar call assert_equal("11111111", printf('%08b', 0xff)) 41991984b90SBram Moolenaar call assert_equal(" 1111011", printf('%10b', 123)) 42091984b90SBram Moolenaar call assert_equal("0001111011", printf('%010b', 123)) 42191984b90SBram Moolenaar call assert_equal(" 0b1111011", printf('%#10b', 123)) 42291984b90SBram Moolenaar call assert_equal("0B01111011", printf('%#010B', 123)) 42391984b90SBram Moolenaar call assert_equal("1001001100101100000001011010010", printf('%b', 1234567890)) 42491984b90SBram Moolenaar if has('num64') 42591984b90SBram Moolenaar call assert_equal("11100000100100010000110000011011101111101111001", printf('%b', 123456789012345)) 42691984b90SBram Moolenaar call assert_equal("1111111111111111111111111111111111111111111111111111111111111111", printf('%b', -1)) 42791984b90SBram Moolenaar else 42891984b90SBram Moolenaar call assert_equal("11111111111111111111111111111111", printf('%b', -1)) 42991984b90SBram Moolenaar endif 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) . '-'}, '')) 44972ab729cSBram Moolenaarendfunc 450df48fb45SBram Moolenaar 451989f592fSBram Moolenaarfunc Test_invalid_submatch() 452989f592fSBram Moolenaar " This was causing invalid memory access in Vim-7.4.2232 and older 453989f592fSBram Moolenaar call assert_fails("call substitute('x', '.', {-> submatch(10)}, '')", 'E935:') 454989f592fSBram Moolenaarendfunc 455989f592fSBram Moolenaar 456df48fb45SBram Moolenaarfunc Test_substitute_expr_arg() 457df48fb45SBram Moolenaar call assert_equal('123456789-123456789=', substitute('123456789', 458df48fb45SBram Moolenaar \ '\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)', 459df48fb45SBram Moolenaar \ {m -> m[0] . '-' . m[1] . m[2] . m[3] . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, '')) 460df48fb45SBram Moolenaar 461df48fb45SBram Moolenaar call assert_equal('123456-123456=789', substitute('123456789', 462df48fb45SBram Moolenaar \ '\(.\)\(.\)\(.\)\(a*\)\(n*\)\(.\)\(.\)\(.\)\(x*\)', 463df48fb45SBram Moolenaar \ {m -> m[0] . '-' . m[1] . m[2] . m[3] . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, '')) 464df48fb45SBram Moolenaar 465df48fb45SBram Moolenaar call assert_equal('123456789-123456789x=', substitute('123456789', 466df48fb45SBram Moolenaar \ '\(.\)\(.\)\(.*\)', 467df48fb45SBram Moolenaar \ {m -> m[0] . '-' . m[1] . m[2] . m[3] . 'x' . m[4] . m[5] . m[6] . m[7] . m[8] . m[9] . '='}, '')) 468df48fb45SBram Moolenaar 469df48fb45SBram Moolenaar call assert_fails("call substitute('xxx', '.', {m -> string(add(m, 'x'))}, '')", 'E742:') 470df48fb45SBram Moolenaar call assert_fails("call substitute('xxx', '.', {m -> string(insert(m, 'x'))}, '')", 'E742:') 471df48fb45SBram Moolenaar call assert_fails("call substitute('xxx', '.', {m -> string(extend(m, ['x']))}, '')", 'E742:') 472df48fb45SBram Moolenaar call assert_fails("call substitute('xxx', '.', {m -> string(remove(m, 1))}, '')", 'E742:') 473df48fb45SBram Moolenaarendfunc 474b54c3ff3SBram Moolenaar 475b54c3ff3SBram Moolenaarfunc Test_function_with_funcref() 476b54c3ff3SBram Moolenaar let s:f = function('type') 477b54c3ff3SBram Moolenaar let s:fref = function(s:f) 478b54c3ff3SBram Moolenaar call assert_equal(v:t_string, s:fref('x')) 479b54c3ff3SBram Moolenaar call assert_fails("call function('s:f')", 'E700:') 4805582ef14SBram Moolenaar 4815582ef14SBram Moolenaar call assert_fails("call function('foo()')", 'E475:') 4825582ef14SBram Moolenaar call assert_fails("call function('foo()')", 'foo()') 483b54c3ff3SBram Moolenaarendfunc 484437bafe4SBram Moolenaar 485437bafe4SBram Moolenaarfunc Test_funcref() 486437bafe4SBram Moolenaar func! One() 487437bafe4SBram Moolenaar return 1 488437bafe4SBram Moolenaar endfunc 489437bafe4SBram Moolenaar let OneByName = function('One') 490437bafe4SBram Moolenaar let OneByRef = funcref('One') 491437bafe4SBram Moolenaar func! One() 492437bafe4SBram Moolenaar return 2 493437bafe4SBram Moolenaar endfunc 494437bafe4SBram Moolenaar call assert_equal(2, OneByName()) 495437bafe4SBram Moolenaar call assert_equal(1, OneByRef()) 496a4208966SBram Moolenaar let OneByRef = 'One'->funcref() 497437bafe4SBram Moolenaar call assert_equal(2, OneByRef()) 498843b8844SBram Moolenaar call assert_fails('echo funcref("{")', 'E475:') 499*4c054e9fSBram Moolenaar let OneByRef = funcref("One", repeat(["foo"], 20)) 500*4c054e9fSBram Moolenaar call assert_fails('let OneByRef = funcref("One", repeat(["foo"], 21))', 'E118:') 501437bafe4SBram Moolenaarendfunc 5027dc5e2e4SBram Moolenaar 5037dc5e2e4SBram Moolenaarfunc Test_setmatches() 5047dc5e2e4SBram Moolenaar hi def link 1 Comment 5057dc5e2e4SBram Moolenaar hi def link 2 PreProc 5067ab6defcSBram Moolenaar let set = [{"group": 1, "pattern": 2, "id": 3, "priority": 4}] 5077ab6defcSBram Moolenaar let exp = [{"group": '1', "pattern": '2', "id": 3, "priority": 4}] 5087ab6defcSBram Moolenaar if has('conceal') 5097ab6defcSBram Moolenaar let set[0]['conceal'] = 5 5107ab6defcSBram Moolenaar let exp[0]['conceal'] = '5' 5117ab6defcSBram Moolenaar endif 512aad222c9SBram Moolenaar eval set->setmatches() 5137dc5e2e4SBram Moolenaar call assert_equal(exp, getmatches()) 5147dc5e2e4SBram Moolenaarendfunc 51521842689SBram Moolenaar 51621842689SBram Moolenaarfunc Test_empty_concatenate() 51721842689SBram Moolenaar call assert_equal('b', 'a'[4:0] . 'b') 51821842689SBram Moolenaar call assert_equal('b', 'b' . 'a'[4:0]) 51921842689SBram Moolenaarendfunc 52016e9b851SBram Moolenaar 52116e9b851SBram Moolenaarfunc Test_broken_number() 52216e9b851SBram Moolenaar let X = 'bad' 52316e9b851SBram Moolenaar call assert_fails('echo 1X', 'E15:') 52416e9b851SBram Moolenaar call assert_fails('echo 0b1X', 'E15:') 52516e9b851SBram Moolenaar call assert_fails('echo 0b12', 'E15:') 52616e9b851SBram Moolenaar call assert_fails('echo 0x1X', 'E15:') 52716e9b851SBram Moolenaar call assert_fails('echo 011X', 'E15:') 52816e9b851SBram Moolenaar call assert_equal(2, str2nr('2a')) 52916e9b851SBram Moolenaar call assert_fails('inoremap <Char-0b1z> b', 'E474:') 53016e9b851SBram Moolenaarendfunc 531