Mercurial > vim
annotate src/testdir/test_functions.vim @ 10706:056e32b99e93 v8.0.0243
patch 8.0.0243: tolower() does not work if the byte count changes
commit https://github.com/vim/vim/commit/cc5b22b3bfdc0e9e835cf7871166badda31447bd
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Jan 26 22:51:56 2017 +0100
patch 8.0.0243: tolower() does not work if the byte count changes
Problem: When making a character lower case with tolower() changes the byte
cound, it is not made lower case.
Solution: Add strlow_save(). (Dominique Pelle, closes #1406)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 26 Jan 2017 23:00:05 +0100 |
parents | fff45421182b |
children | 8779b4b2e958 |
rev | line source |
---|---|
10555
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
1 " Tests for various functions. |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
2 |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
3 func Test_str2nr() |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
4 call assert_equal(0, str2nr('')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
5 call assert_equal(1, str2nr('1')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
6 call assert_equal(1, str2nr(' 1 ')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
7 |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
8 call assert_equal(1, str2nr('+1')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
9 call assert_equal(1, str2nr('+ 1')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
10 call assert_equal(1, str2nr(' + 1 ')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
11 |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
12 call assert_equal(-1, str2nr('-1')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
13 call assert_equal(-1, str2nr('- 1')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
14 call assert_equal(-1, str2nr(' - 1 ')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
15 |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
16 call assert_equal(123456789, str2nr('123456789')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
17 call assert_equal(-123456789, str2nr('-123456789')) |
fff45421182b
patch 8.0.0167: str2nr()/str2float() fail with negative values
Christian Brabandt <cb@256bit.org>
parents:
diff
changeset
|
18 endfunc |
10706
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
19 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
20 func Test_tolower() |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
21 call assert_equal("", tolower("")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
22 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
23 " Test with all printable ASCII characters. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
24 call assert_equal(' !"#$%&''()*+,-./0123456789:;<=>?@abcdefghijklmnopqrstuvwxyz[\]^_`abcdefghijklmnopqrstuvwxyz{|}~', |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
25 \ tolower(' !"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~')) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
26 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
27 if !has('multi_byte') |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
28 return |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
29 endif |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
30 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
31 " Test with a few uppercase diacritics. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
32 call assert_equal("aàáâãäåāăąǎǟǡả", tolower("AÀÁÂÃÄÅĀĂĄǍǞǠẢ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
33 call assert_equal("bḃḇ", tolower("BḂḆ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
34 call assert_equal("cçćĉċč", tolower("CÇĆĈĊČ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
35 call assert_equal("dďđḋḏḑ", tolower("DĎĐḊḎḐ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
36 call assert_equal("eèéêëēĕėęěẻẽ", tolower("EÈÉÊËĒĔĖĘĚẺẼ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
37 call assert_equal("fḟ ", tolower("FḞ ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
38 call assert_equal("gĝğġģǥǧǵḡ", tolower("GĜĞĠĢǤǦǴḠ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
39 call assert_equal("hĥħḣḧḩ", tolower("HĤĦḢḦḨ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
40 call assert_equal("iìíîïĩīĭįiǐỉ", tolower("IÌÍÎÏĨĪĬĮİǏỈ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
41 call assert_equal("jĵ", tolower("JĴ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
42 call assert_equal("kķǩḱḵ", tolower("KĶǨḰḴ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
43 call assert_equal("lĺļľŀłḻ", tolower("LĹĻĽĿŁḺ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
44 call assert_equal("mḿṁ", tolower("MḾṀ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
45 call assert_equal("nñńņňṅṉ", tolower("NÑŃŅŇṄṈ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
46 call assert_equal("oòóôõöøōŏőơǒǫǭỏ", tolower("OÒÓÔÕÖØŌŎŐƠǑǪǬỎ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
47 call assert_equal("pṕṗ", tolower("PṔṖ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
48 call assert_equal("q", tolower("Q")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
49 call assert_equal("rŕŗřṙṟ", tolower("RŔŖŘṘṞ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
50 call assert_equal("sśŝşšṡ", tolower("SŚŜŞŠṠ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
51 call assert_equal("tţťŧṫṯ", tolower("TŢŤŦṪṮ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
52 call assert_equal("uùúûüũūŭůűųưǔủ", tolower("UÙÚÛÜŨŪŬŮŰŲƯǓỦ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
53 call assert_equal("vṽ", tolower("VṼ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
54 call assert_equal("wŵẁẃẅẇ", tolower("WŴẀẂẄẆ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
55 call assert_equal("xẋẍ", tolower("XẊẌ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
56 call assert_equal("yýŷÿẏỳỷỹ", tolower("YÝŶŸẎỲỶỸ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
57 call assert_equal("zźżžƶẑẕ", tolower("ZŹŻŽƵẐẔ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
58 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
59 " Test with a few lowercase diacritics, which should remain unchanged. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
60 call assert_equal("aàáâãäåāăąǎǟǡả", tolower("aàáâãäåāăąǎǟǡả")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
61 call assert_equal("bḃḇ", tolower("bḃḇ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
62 call assert_equal("cçćĉċč", tolower("cçćĉċč")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
63 call assert_equal("dďđḋḏḑ", tolower("dďđḋḏḑ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
64 call assert_equal("eèéêëēĕėęěẻẽ", tolower("eèéêëēĕėęěẻẽ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
65 call assert_equal("fḟ", tolower("fḟ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
66 call assert_equal("gĝğġģǥǧǵḡ", tolower("gĝğġģǥǧǵḡ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
67 call assert_equal("hĥħḣḧḩẖ", tolower("hĥħḣḧḩẖ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
68 call assert_equal("iìíîïĩīĭįǐỉ", tolower("iìíîïĩīĭįǐỉ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
69 call assert_equal("jĵǰ", tolower("jĵǰ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
70 call assert_equal("kķǩḱḵ", tolower("kķǩḱḵ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
71 call assert_equal("lĺļľŀłḻ", tolower("lĺļľŀłḻ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
72 call assert_equal("mḿṁ ", tolower("mḿṁ ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
73 call assert_equal("nñńņňʼnṅṉ", tolower("nñńņňʼnṅṉ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
74 call assert_equal("oòóôõöøōŏőơǒǫǭỏ", tolower("oòóôõöøōŏőơǒǫǭỏ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
75 call assert_equal("pṕṗ", tolower("pṕṗ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
76 call assert_equal("q", tolower("q")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
77 call assert_equal("rŕŗřṙṟ", tolower("rŕŗřṙṟ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
78 call assert_equal("sśŝşšṡ", tolower("sśŝşšṡ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
79 call assert_equal("tţťŧṫṯẗ", tolower("tţťŧṫṯẗ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
80 call assert_equal("uùúûüũūŭůűųưǔủ", tolower("uùúûüũūŭůűųưǔủ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
81 call assert_equal("vṽ", tolower("vṽ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
82 call assert_equal("wŵẁẃẅẇẘ", tolower("wŵẁẃẅẇẘ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
83 call assert_equal("ẋẍ", tolower("ẋẍ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
84 call assert_equal("yýÿŷẏẙỳỷỹ", tolower("yýÿŷẏẙỳỷỹ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
85 call assert_equal("zźżžƶẑẕ", tolower("zźżžƶẑẕ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
86 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
87 " According to https://twitter.com/jifa/status/625776454479970304 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
88 " Ⱥ (U+023A) and Ⱦ (U+023E) are the *only* code points to increase |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
89 " in length (2 to 3 bytes) when lowercased. So let's test them. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
90 call assert_equal("ⱥ ⱦ", tolower("Ⱥ Ⱦ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
91 endfunc |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
92 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
93 func Test_toupper() |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
94 call assert_equal("", toupper("")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
95 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
96 " Test with all printable ASCII characters. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
97 call assert_equal(' !"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~', |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
98 \ toupper(' !"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~')) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
99 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
100 if !has('multi_byte') |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
101 return |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
102 endif |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
103 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
104 " Test with a few lowercase diacritics. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
105 call assert_equal("AÀÁÂÃÄÅĀĂĄǍǞǠẢ", toupper("aàáâãäåāăąǎǟǡả")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
106 call assert_equal("BḂḆ", toupper("bḃḇ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
107 call assert_equal("CÇĆĈĊČ", toupper("cçćĉċč")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
108 call assert_equal("DĎĐḊḎḐ", toupper("dďđḋḏḑ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
109 call assert_equal("EÈÉÊËĒĔĖĘĚẺẼ", toupper("eèéêëēĕėęěẻẽ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
110 call assert_equal("FḞ", toupper("fḟ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
111 call assert_equal("GĜĞĠĢǤǦǴḠ", toupper("gĝğġģǥǧǵḡ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
112 call assert_equal("HĤĦḢḦḨẖ", toupper("hĥħḣḧḩẖ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
113 call assert_equal("IÌÍÎÏĨĪĬĮǏỈ", toupper("iìíîïĩīĭįǐỉ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
114 call assert_equal("JĴǰ", toupper("jĵǰ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
115 call assert_equal("KĶǨḰḴ", toupper("kķǩḱḵ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
116 call assert_equal("LĹĻĽĿŁḺ", toupper("lĺļľŀłḻ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
117 call assert_equal("MḾṀ ", toupper("mḿṁ ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
118 call assert_equal("NÑŃŅŇʼnṄṈ", toupper("nñńņňʼnṅṉ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
119 call assert_equal("OÒÓÔÕÖØŌŎŐƠǑǪǬỎ", toupper("oòóôõöøōŏőơǒǫǭỏ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
120 call assert_equal("PṔṖ", toupper("pṕṗ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
121 call assert_equal("Q", toupper("q")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
122 call assert_equal("RŔŖŘṘṞ", toupper("rŕŗřṙṟ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
123 call assert_equal("SŚŜŞŠṠ", toupper("sśŝşšṡ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
124 call assert_equal("TŢŤŦṪṮẗ", toupper("tţťŧṫṯẗ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
125 call assert_equal("UÙÚÛÜŨŪŬŮŰŲƯǓỦ", toupper("uùúûüũūŭůűųưǔủ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
126 call assert_equal("VṼ", toupper("vṽ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
127 call assert_equal("WŴẀẂẄẆẘ", toupper("wŵẁẃẅẇẘ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
128 call assert_equal("ẊẌ", toupper("ẋẍ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
129 call assert_equal("YÝŸŶẎẙỲỶỸ", toupper("yýÿŷẏẙỳỷỹ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
130 call assert_equal("ZŹŻŽƵẐẔ", toupper("zźżžƶẑẕ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
131 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
132 " Test that uppercase diacritics, which should remain unchanged. |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
133 call assert_equal("AÀÁÂÃÄÅĀĂĄǍǞǠẢ", toupper("AÀÁÂÃÄÅĀĂĄǍǞǠẢ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
134 call assert_equal("BḂḆ", toupper("BḂḆ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
135 call assert_equal("CÇĆĈĊČ", toupper("CÇĆĈĊČ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
136 call assert_equal("DĎĐḊḎḐ", toupper("DĎĐḊḎḐ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
137 call assert_equal("EÈÉÊËĒĔĖĘĚẺẼ", toupper("EÈÉÊËĒĔĖĘĚẺẼ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
138 call assert_equal("FḞ ", toupper("FḞ ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
139 call assert_equal("GĜĞĠĢǤǦǴḠ", toupper("GĜĞĠĢǤǦǴḠ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
140 call assert_equal("HĤĦḢḦḨ", toupper("HĤĦḢḦḨ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
141 call assert_equal("IÌÍÎÏĨĪĬĮİǏỈ", toupper("IÌÍÎÏĨĪĬĮİǏỈ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
142 call assert_equal("JĴ", toupper("JĴ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
143 call assert_equal("KĶǨḰḴ", toupper("KĶǨḰḴ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
144 call assert_equal("LĹĻĽĿŁḺ", toupper("LĹĻĽĿŁḺ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
145 call assert_equal("MḾṀ", toupper("MḾṀ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
146 call assert_equal("NÑŃŅŇṄṈ", toupper("NÑŃŅŇṄṈ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
147 call assert_equal("OÒÓÔÕÖØŌŎŐƠǑǪǬỎ", toupper("OÒÓÔÕÖØŌŎŐƠǑǪǬỎ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
148 call assert_equal("PṔṖ", toupper("PṔṖ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
149 call assert_equal("Q", toupper("Q")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
150 call assert_equal("RŔŖŘṘṞ", toupper("RŔŖŘṘṞ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
151 call assert_equal("SŚŜŞŠṠ", toupper("SŚŜŞŠṠ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
152 call assert_equal("TŢŤŦṪṮ", toupper("TŢŤŦṪṮ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
153 call assert_equal("UÙÚÛÜŨŪŬŮŰŲƯǓỦ", toupper("UÙÚÛÜŨŪŬŮŰŲƯǓỦ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
154 call assert_equal("VṼ", toupper("VṼ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
155 call assert_equal("WŴẀẂẄẆ", toupper("WŴẀẂẄẆ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
156 call assert_equal("XẊẌ", toupper("XẊẌ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
157 call assert_equal("YÝŶŸẎỲỶỸ", toupper("YÝŶŸẎỲỶỸ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
158 call assert_equal("ZŹŻŽƵẐẔ", toupper("ZŹŻŽƵẐẔ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
159 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
160 call assert_equal("ⱥ ⱦ", tolower("Ⱥ Ⱦ")) |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
161 endfunc |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
162 |
056e32b99e93
patch 8.0.0243: tolower() does not work if the byte count changes
Christian Brabandt <cb@256bit.org>
parents:
10555
diff
changeset
|
163 |