annotate src/testdir/test_expr_utf8.vim @ 8911:460c8cc144f0 v7.4.1742

commit https://github.com/vim/vim/commit/5d18e0eca59ffbba22c7f7c91c9f99d672095728 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Apr 14 22:54:24 2016 +0200 patch 7.4.1742 Problem: strgetchar() does not work correctly. Solution: use mb_cptr2len(). Add a test. (Naruhiko Nishino)
author Christian Brabandt <cb@256bit.org>
date Thu, 14 Apr 2016 23:00:07 +0200
parents 6393ac6d7060
children 2085167ab1b0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8895
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for expressions using utf-8.
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2 if !has('multi_byte')
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 finish
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 endif
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 set encoding=utf-8
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 scriptencoding utf-8
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 func Test_strgetchar()
8909
6393ac6d7060 commit https://github.com/vim/vim/commit/b22bd46b9681d73d095f2eadff8163d3a6cf416b
Christian Brabandt <cb@256bit.org>
parents: 8895
diff changeset
9 call assert_equal(char2nr('á'), strgetchar('áxb', 0))
6393ac6d7060 commit https://github.com/vim/vim/commit/b22bd46b9681d73d095f2eadff8163d3a6cf416b
Christian Brabandt <cb@256bit.org>
parents: 8895
diff changeset
10 call assert_equal(char2nr('x'), strgetchar('áxb', 1))
8895
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11
8909
6393ac6d7060 commit https://github.com/vim/vim/commit/b22bd46b9681d73d095f2eadff8163d3a6cf416b
Christian Brabandt <cb@256bit.org>
parents: 8895
diff changeset
12 call assert_equal(char2nr('a'), strgetchar('àxb', 0))
6393ac6d7060 commit https://github.com/vim/vim/commit/b22bd46b9681d73d095f2eadff8163d3a6cf416b
Christian Brabandt <cb@256bit.org>
parents: 8895
diff changeset
13 call assert_equal(char2nr('̀'), strgetchar('àxb', 1))
6393ac6d7060 commit https://github.com/vim/vim/commit/b22bd46b9681d73d095f2eadff8163d3a6cf416b
Christian Brabandt <cb@256bit.org>
parents: 8895
diff changeset
14 call assert_equal(char2nr('x'), strgetchar('àxb', 2))
8911
460c8cc144f0 commit https://github.com/vim/vim/commit/5d18e0eca59ffbba22c7f7c91c9f99d672095728
Christian Brabandt <cb@256bit.org>
parents: 8909
diff changeset
15
460c8cc144f0 commit https://github.com/vim/vim/commit/5d18e0eca59ffbba22c7f7c91c9f99d672095728
Christian Brabandt <cb@256bit.org>
parents: 8909
diff changeset
16 call assert_equal(char2nr('あ'), strgetchar('あaい', 0))
460c8cc144f0 commit https://github.com/vim/vim/commit/5d18e0eca59ffbba22c7f7c91c9f99d672095728
Christian Brabandt <cb@256bit.org>
parents: 8909
diff changeset
17 call assert_equal(char2nr('a'), strgetchar('あaい', 1))
460c8cc144f0 commit https://github.com/vim/vim/commit/5d18e0eca59ffbba22c7f7c91c9f99d672095728
Christian Brabandt <cb@256bit.org>
parents: 8909
diff changeset
18 call assert_equal(char2nr('い'), strgetchar('あaい', 2))
8895
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 endfunc
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 func Test_strcharpart()
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 call assert_equal('áxb', strcharpart('áxb', 0))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 call assert_equal('á', strcharpart('áxb', 0, 1))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 call assert_equal('x', strcharpart('áxb', 1, 1))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 call assert_equal('a', strcharpart('àxb', 0, 1))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 call assert_equal('̀', strcharpart('àxb', 1, 1))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 call assert_equal('x', strcharpart('àxb', 2, 1))
7f29248d5789 commit https://github.com/vim/vim/commit/0f518a8f4d4be4cac10389680f6bd5e3781f94b0
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 endfunc