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
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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