annotate src/testdir/test_ga.vim @ 18742:e9b2ade1adbd v8.1.2361

patch 8.1.2361: MS-Windows: test failures related to VIMDLL Commit: https://github.com/vim/vim/commit/310c32e8920140f0db747c6c6eb06b1ee53cdb5a Author: Bram Moolenaar <Bram@vim.org> Date: Fri Nov 29 23:15:25 2019 +0100 patch 8.1.2361: MS-Windows: test failures related to VIMDLL Problem: MS-Windows: test failures related to VIMDLL. Solution: Adjust code and tests. (Ken Takata, closes https://github.com/vim/vim/issues/5283)
author Bram Moolenaar <Bram@vim.org>
date Fri, 29 Nov 2019 23:30:04 +0100
parents 2dcaa860e3fc
children b8fd7364befd
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10799
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Test ga normal command, and :ascii Ex command.
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2 func Do_ga(c)
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 call setline(1, a:c)
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 let l:a = execute("norm 1goga")
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 let l:b = execute("ascii")
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 call assert_equal(l:a, l:b)
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 return l:a
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 endfunc
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 func Test_ga_command()
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 new
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 set display=uhex
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 call assert_equal("\nNUL", Do_ga(''))
13359
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
14 call assert_equal("\n<<01>> 1, Hex 01, Oct 001, Digr SH", Do_ga("\x01"))
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
15 call assert_equal("\n<<09>> 9, Hex 09, Oct 011, Digr HT", Do_ga("\t"))
10799
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 set display=
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 call assert_equal("\nNUL", Do_ga(''))
13359
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
19 call assert_equal("\n<^A> 1, Hex 01, Oct 001, Digr SH", Do_ga("\x01"))
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
20 call assert_equal("\n<^I> 9, Hex 09, Oct 011, Digr HT", Do_ga("\t"))
10799
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 call assert_equal("\n<e> 101, Hex 65, Octal 145", Do_ga('e'))
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 " Test a few multi-bytes characters.
13359
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
25 call assert_equal("\n<é> 233, Hex 00e9, Oct 351, Digr e'", Do_ga('é'))
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 10799
diff changeset
26 call assert_equal("\n<ẻ> 7867, Hex 1ebb, Oct 17273, Digr e2", Do_ga('ẻ'))
10799
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 " Test with combining characters.
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 call assert_equal("\n<e> 101, Hex 65, Octal 145 < ́> 769, Hex 0301, Octal 1401", Do_ga("e\u0301"))
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call assert_equal("\n<e> 101, Hex 65, Octal 145 < ́> 769, Hex 0301, Octal 1401 < ̱> 817, Hex 0331, Octal 1461", Do_ga("e\u0301\u0331"))
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 call assert_equal("\n<e> 101, Hex 65, Octal 145 < ́> 769, Hex 0301, Octal 1401 < ̱> 817, Hex 0331, Octal 1461 < ̸> 824, Hex 0338, Octal 1470", Do_ga("e\u0301\u0331\u0338"))
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 bwipe!
8c117418aea9 patch 8.0.0289: no test for "ga" and :ascii
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 endfunc