annotate src/testdir/test_arabic.vim @ 14213:762bd604e3b3

Added tag v8.1.0123 for changeset 2bebc49116fdb6bcbeb9789c24a4fb49a49a0db6
author Christian Brabandt <cb@256bit.org>
date Thu, 28 Jun 2018 15:30:08 +0200
parents 81c348d40312
children 2dcaa860e3fc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Simplistic testing of Arabic mode.
11221
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
2 " NOTE: This just checks if the code works. If you know Arabic please add
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
3 " functional tests that check the shaping works with real text.
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
5 if !has('arabic') || !has('multi_byte')
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 finish
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 endif
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
9 source view_util.vim
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
11 " Return list of Unicode characters at line lnum.
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 " Combining characters are treated as a single item.
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
13 func s:get_chars(lnum)
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 call cursor(a:lnum, 1)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 let chars = []
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 let numchars = strchars(getline('.'), 1)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 for i in range(1, numchars)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 exe 'norm ' i . '|'
13359
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 11221
diff changeset
19 let c = execute('ascii')
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 11221
diff changeset
20 let c = substitute(c, '\n\?<.\{-}Hex\s*', 'U+', 'g')
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character
Christian Brabandt <cb@256bit.org>
parents: 11221
diff changeset
21 let c = substitute(c, ',\s*Oct\(al\)\=\s\d*\(, Digr ..\)\=', '', 'g')
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
22 call add(chars, c)
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 endfor
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 return chars
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 func Test_arabic_toggle()
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 call assert_equal(1, &rightleft)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call assert_equal(1, &arabicshape)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 call assert_equal('arabic', &keymap)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 call assert_equal(1, &delcombine)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 set iminsert=1 imsearch=1
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 call assert_equal(0, &rightleft)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 call assert_equal(1, &arabicshape)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 call assert_equal('arabic', &keymap)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 call assert_equal(1, &delcombine)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 call assert_equal(0, &iminsert)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 call assert_equal(-1, &imsearch)
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 set arabicshape& keymap= delcombine&
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 func Test_arabic_input()
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 new
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
49 " Typing sghl in Arabic insert mode should show the
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
50 " Arabic word 'Salaam' i.e. 'peace', spelled:
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
51 " SEEN, LAM, ALEF, MEEM.
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
52 " See: https://www.mediawiki.org/wiki/VisualEditor/Typing/Right-to-left
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
53 call feedkeys('isghl!', 'tx')
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
54 call assert_match("^ *!\uFEE1\uFEFC\uFEB3$", ScreenLines(1, &columns)[0])
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
55 call assert_equal([
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
56 \ 'U+0633',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
57 \ 'U+0644 U+0627',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
58 \ 'U+0645',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
59 \ 'U+21'], s:get_chars(1))
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
60
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 " Without shaping, it should give individual Arabic letters.
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 set noarabicshape
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
63 call assert_match("^ *!\u0645\u0627\u0644\u0633$", ScreenLines(1, &columns)[0])
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 call assert_equal([
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
65 \ 'U+0633',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
66 \ 'U+0644',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
67 \ 'U+0627',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
68 \ 'U+0645',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
69 \ 'U+21'], s:get_chars(1))
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
70
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
71 set arabic& arabicshape&
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
72 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
73 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
74
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
75 func Test_arabic_toggle_keymap()
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
76 new
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
77 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
78 call feedkeys("i12\<C-^>12\<C-^>12", 'tx')
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
79 call assert_match("^ *٢١21٢١$", ScreenLines(1, &columns)[0])
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
80 call assert_equal('١٢12١٢', getline('.'))
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
84
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
85 func Test_delcombine()
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
86 new
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
88 call feedkeys("isghl\<BS>\<BS>", 'tx')
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
89 call assert_match("^ *\uFEDE\uFEB3$", ScreenLines(1, &columns)[0])
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
90 call assert_equal(['U+0633', 'U+0644'], s:get_chars(1))
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
92 " Now the same with 'nodelcombine'
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
93 set nodelcombine
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
94 %d
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 call feedkeys("isghl\<BS>\<BS>", 'tx')
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
96 call assert_match("^ *\uFEB1$", ScreenLines(1, &columns)[0])
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
97 call assert_equal(['U+0633'], s:get_chars(1))
10992
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
100 endfunc
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
101
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
102 " Values from src/arabic.h (not all used yet)
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
103 let s:a_COMMA = "\u060C"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
104 let s:a_SEMICOLON = "\u061B"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
105 let s:a_QUESTION = "\u061F"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
106 let s:a_HAMZA = "\u0621"
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
107 let s:a_ALEF_MADDA = "\u0622"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
108 let s:a_ALEF_HAMZA_ABOVE = "\u0623"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
109 let s:a_WAW_HAMZA = "\u0624"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
110 let s:a_ALEF_HAMZA_BELOW = "\u0625"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
111 let s:a_YEH_HAMZA = "\u0626"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
112 let s:a_ALEF = "\u0627"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
113 let s:a_BEH = "\u0628"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
114 let s:a_TEH_MARBUTA = "\u0629"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
115 let s:a_TEH = "\u062a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
116 let s:a_THEH = "\u062b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
117 let s:a_JEEM = "\u062c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
118 let s:a_HAH = "\u062d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
119 let s:a_KHAH = "\u062e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
120 let s:a_DAL = "\u062f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
121 let s:a_THAL = "\u0630"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
122 let s:a_REH = "\u0631"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
123 let s:a_ZAIN = "\u0632"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
124 let s:a_SEEN = "\u0633"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
125 let s:a_SHEEN = "\u0634"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
126 let s:a_SAD = "\u0635"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
127 let s:a_DAD = "\u0636"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
128 let s:a_TAH = "\u0637"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
129 let s:a_ZAH = "\u0638"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
130 let s:a_AIN = "\u0639"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
131 let s:a_GHAIN = "\u063a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
132 let s:a_TATWEEL = "\u0640"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
133 let s:a_FEH = "\u0641"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
134 let s:a_QAF = "\u0642"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
135 let s:a_KAF = "\u0643"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
136 let s:a_LAM = "\u0644"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
137 let s:a_MEEM = "\u0645"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
138 let s:a_NOON = "\u0646"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
139 let s:a_HEH = "\u0647"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
140 let s:a_WAW = "\u0648"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
141 let s:a_ALEF_MAKSURA = "\u0649"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
142 let s:a_YEH = "\u064a"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
143
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
144 let s:a_FATHATAN = "\u064b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
145 let s:a_DAMMATAN = "\u064c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
146 let s:a_KASRATAN = "\u064d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
147 let s:a_FATHA = "\u064e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
148 let s:a_DAMMA = "\u064f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
149 let s:a_KASRA = "\u0650"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
150 let s:a_SHADDA = "\u0651"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
151 let s:a_SUKUN = "\u0652"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
152
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
153 let s:a_MADDA_ABOVE = "\u0653"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
154 let s:a_HAMZA_ABOVE = "\u0654"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
155 let s:a_HAMZA_BELOW = "\u0655"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
156
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
157 let s:a_ZERO = "\u0660"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
158 let s:a_ONE = "\u0661"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
159 let s:a_TWO = "\u0662"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
160 let s:a_THREE = "\u0663"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
161 let s:a_FOUR = "\u0664"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
162 let s:a_FIVE = "\u0665"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
163 let s:a_SIX = "\u0666"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
164 let s:a_SEVEN = "\u0667"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
165 let s:a_EIGHT = "\u0668"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
166 let s:a_NINE = "\u0669"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
167 let s:a_PERCENT = "\u066a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
168 let s:a_DECIMAL = "\u066b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
169 let s:a_THOUSANDS = "\u066c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
170 let s:a_STAR = "\u066d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
171 let s:a_MINI_ALEF = "\u0670"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
172
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
173 let s:a_s_FATHATAN = "\ufe70"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
174 let s:a_m_TATWEEL_FATHATAN = "\ufe71"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
175 let s:a_s_DAMMATAN = "\ufe72"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
176
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
177 let s:a_s_KASRATAN = "\ufe74"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
178
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
179 let s:a_s_FATHA = "\ufe76"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
180 let s:a_m_FATHA = "\ufe77"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
181 let s:a_s_DAMMA = "\ufe78"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
182 let s:a_m_DAMMA = "\ufe79"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
183 let s:a_s_KASRA = "\ufe7a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
184 let s:a_m_KASRA = "\ufe7b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
185 let s:a_s_SHADDA = "\ufe7c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
186 let s:a_m_SHADDA = "\ufe7d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
187 let s:a_s_SUKUN = "\ufe7e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
188 let s:a_m_SUKUN = "\ufe7f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
189
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
190 let s:a_s_HAMZA = "\ufe80"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
191 let s:a_s_ALEF_MADDA = "\ufe81"
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
192 let s:a_f_ALEF_MADDA = "\ufe82"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
193 let s:a_s_ALEF_HAMZA_ABOVE = "\ufe83"
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
194 let s:a_f_ALEF_HAMZA_ABOVE = "\ufe84"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
195 let s:a_s_WAW_HAMZA = "\ufe85"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
196 let s:a_f_WAW_HAMZA = "\ufe86"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
197 let s:a_s_ALEF_HAMZA_BELOW = "\ufe87"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
198 let s:a_f_ALEF_HAMZA_BELOW = "\ufe88"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
199 let s:a_s_YEH_HAMZA = "\ufe89"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
200 let s:a_f_YEH_HAMZA = "\ufe8a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
201 let s:a_i_YEH_HAMZA = "\ufe8b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
202 let s:a_m_YEH_HAMZA = "\ufe8c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
203 let s:a_s_ALEF = "\ufe8d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
204 let s:a_f_ALEF = "\ufe8e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
205 let s:a_s_BEH = "\ufe8f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
206 let s:a_f_BEH = "\ufe90"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
207 let s:a_i_BEH = "\ufe91"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
208 let s:a_m_BEH = "\ufe92"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
209 let s:a_s_TEH_MARBUTA = "\ufe93"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
210 let s:a_f_TEH_MARBUTA = "\ufe94"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
211 let s:a_s_TEH = "\ufe95"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
212 let s:a_f_TEH = "\ufe96"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
213 let s:a_i_TEH = "\ufe97"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
214 let s:a_m_TEH = "\ufe98"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
215 let s:a_s_THEH = "\ufe99"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
216 let s:a_f_THEH = "\ufe9a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
217 let s:a_i_THEH = "\ufe9b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
218 let s:a_m_THEH = "\ufe9c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
219 let s:a_s_JEEM = "\ufe9d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
220 let s:a_f_JEEM = "\ufe9e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
221 let s:a_i_JEEM = "\ufe9f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
222 let s:a_m_JEEM = "\ufea0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
223 let s:a_s_HAH = "\ufea1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
224 let s:a_f_HAH = "\ufea2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
225 let s:a_i_HAH = "\ufea3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
226 let s:a_m_HAH = "\ufea4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
227 let s:a_s_KHAH = "\ufea5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
228 let s:a_f_KHAH = "\ufea6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
229 let s:a_i_KHAH = "\ufea7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
230 let s:a_m_KHAH = "\ufea8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
231 let s:a_s_DAL = "\ufea9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
232 let s:a_f_DAL = "\ufeaa"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
233 let s:a_s_THAL = "\ufeab"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
234 let s:a_f_THAL = "\ufeac"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
235 let s:a_s_REH = "\ufead"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
236 let s:a_f_REH = "\ufeae"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
237 let s:a_s_ZAIN = "\ufeaf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
238 let s:a_f_ZAIN = "\ufeb0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
239 let s:a_s_SEEN = "\ufeb1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
240 let s:a_f_SEEN = "\ufeb2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
241 let s:a_i_SEEN = "\ufeb3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
242 let s:a_m_SEEN = "\ufeb4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
243 let s:a_s_SHEEN = "\ufeb5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
244 let s:a_f_SHEEN = "\ufeb6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
245 let s:a_i_SHEEN = "\ufeb7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
246 let s:a_m_SHEEN = "\ufeb8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
247 let s:a_s_SAD = "\ufeb9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
248 let s:a_f_SAD = "\ufeba"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
249 let s:a_i_SAD = "\ufebb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
250 let s:a_m_SAD = "\ufebc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
251 let s:a_s_DAD = "\ufebd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
252 let s:a_f_DAD = "\ufebe"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
253 let s:a_i_DAD = "\ufebf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
254 let s:a_m_DAD = "\ufec0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
255 let s:a_s_TAH = "\ufec1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
256 let s:a_f_TAH = "\ufec2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
257 let s:a_i_TAH = "\ufec3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
258 let s:a_m_TAH = "\ufec4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
259 let s:a_s_ZAH = "\ufec5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
260 let s:a_f_ZAH = "\ufec6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
261 let s:a_i_ZAH = "\ufec7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
262 let s:a_m_ZAH = "\ufec8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
263 let s:a_s_AIN = "\ufec9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
264 let s:a_f_AIN = "\ufeca"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
265 let s:a_i_AIN = "\ufecb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
266 let s:a_m_AIN = "\ufecc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
267 let s:a_s_GHAIN = "\ufecd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
268 let s:a_f_GHAIN = "\ufece"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
269 let s:a_i_GHAIN = "\ufecf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
270 let s:a_m_GHAIN = "\ufed0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
271 let s:a_s_FEH = "\ufed1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
272 let s:a_f_FEH = "\ufed2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
273 let s:a_i_FEH = "\ufed3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
274 let s:a_m_FEH = "\ufed4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
275 let s:a_s_QAF = "\ufed5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
276 let s:a_f_QAF = "\ufed6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
277 let s:a_i_QAF = "\ufed7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
278 let s:a_m_QAF = "\ufed8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
279 let s:a_s_KAF = "\ufed9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
280 let s:a_f_KAF = "\ufeda"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
281 let s:a_i_KAF = "\ufedb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
282 let s:a_m_KAF = "\ufedc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
283 let s:a_s_LAM = "\ufedd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
284 let s:a_f_LAM = "\ufede"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
285 let s:a_i_LAM = "\ufedf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
286 let s:a_m_LAM = "\ufee0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
287 let s:a_s_MEEM = "\ufee1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
288 let s:a_f_MEEM = "\ufee2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
289 let s:a_i_MEEM = "\ufee3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
290 let s:a_m_MEEM = "\ufee4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
291 let s:a_s_NOON = "\ufee5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
292 let s:a_f_NOON = "\ufee6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
293 let s:a_i_NOON = "\ufee7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
294 let s:a_m_NOON = "\ufee8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
295 let s:a_s_HEH = "\ufee9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
296 let s:a_f_HEH = "\ufeea"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
297 let s:a_i_HEH = "\ufeeb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
298 let s:a_m_HEH = "\ufeec"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
299 let s:a_s_WAW = "\ufeed"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
300 let s:a_f_WAW = "\ufeee"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
301 let s:a_s_ALEF_MAKSURA = "\ufeef"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
302 let s:a_f_ALEF_MAKSURA = "\ufef0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
303 let s:a_s_YEH = "\ufef1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
304 let s:a_f_YEH = "\ufef2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
305 let s:a_i_YEH = "\ufef3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
306 let s:a_m_YEH = "\ufef4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
307 let s:a_s_LAM_ALEF_MADDA_ABOVE = "\ufef5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
308 let s:a_f_LAM_ALEF_MADDA_ABOVE = "\ufef6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
309 let s:a_s_LAM_ALEF_HAMZA_ABOVE = "\ufef7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
310 let s:a_f_LAM_ALEF_HAMZA_ABOVE = "\ufef8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
311 let s:a_s_LAM_ALEF_HAMZA_BELOW = "\ufef9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
312 let s:a_f_LAM_ALEF_HAMZA_BELOW = "\ufefa"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
313 let s:a_s_LAM_ALEF = "\ufefb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
314 let s:a_f_LAM_ALEF = "\ufefc"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
315
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
316 let s:a_BYTE_ORDER_MARK = "\ufeff"
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
317
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
318 func Test_shape_initial()
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
319 new
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
320 set arabicshape
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
321
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
322 " Shaping arabic {testchar} non-arabic Tests chg_c_a2i().
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
323 " pair[0] = testchar, pair[1] = next-result, pair[2] = current-result
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
324 for pair in [[s:a_YEH_HAMZA, s:a_f_GHAIN, s:a_i_YEH_HAMZA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
325 \ [s:a_HAMZA, s:a_s_GHAIN, s:a_s_HAMZA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
326 \ [s:a_ALEF_MADDA, s:a_s_GHAIN, s:a_s_ALEF_MADDA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
327 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_GHAIN, s:a_s_ALEF_HAMZA_ABOVE],
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
328 \ [s:a_WAW_HAMZA, s:a_s_GHAIN, s:a_s_WAW_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
329 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_GHAIN, s:a_s_ALEF_HAMZA_BELOW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
330 \ [s:a_ALEF, s:a_s_GHAIN, s:a_s_ALEF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
331 \ [s:a_TEH_MARBUTA, s:a_s_GHAIN, s:a_s_TEH_MARBUTA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
332 \ [s:a_DAL, s:a_s_GHAIN, s:a_s_DAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
333 \ [s:a_THAL, s:a_s_GHAIN, s:a_s_THAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
334 \ [s:a_REH, s:a_s_GHAIN, s:a_s_REH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
335 \ [s:a_ZAIN, s:a_s_GHAIN, s:a_s_ZAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
336 \ [s:a_TATWEEL, s:a_f_GHAIN, s:a_TATWEEL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
337 \ [s:a_WAW, s:a_s_GHAIN, s:a_s_WAW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
338 \ [s:a_ALEF_MAKSURA, s:a_s_GHAIN, s:a_s_ALEF_MAKSURA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
339 \ [s:a_BEH, s:a_f_GHAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
340 \ [s:a_TEH, s:a_f_GHAIN, s:a_i_TEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
341 \ [s:a_THEH, s:a_f_GHAIN, s:a_i_THEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
342 \ [s:a_JEEM, s:a_f_GHAIN, s:a_i_JEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
343 \ [s:a_HAH, s:a_f_GHAIN, s:a_i_HAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
344 \ [s:a_KHAH, s:a_f_GHAIN, s:a_i_KHAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
345 \ [s:a_SEEN, s:a_f_GHAIN, s:a_i_SEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
346 \ [s:a_SHEEN, s:a_f_GHAIN, s:a_i_SHEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
347 \ [s:a_SAD, s:a_f_GHAIN, s:a_i_SAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
348 \ [s:a_DAD, s:a_f_GHAIN, s:a_i_DAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
349 \ [s:a_TAH, s:a_f_GHAIN, s:a_i_TAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
350 \ [s:a_ZAH, s:a_f_GHAIN, s:a_i_ZAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
351 \ [s:a_AIN, s:a_f_GHAIN, s:a_i_AIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
352 \ [s:a_GHAIN, s:a_f_GHAIN, s:a_i_GHAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
353 \ [s:a_FEH, s:a_f_GHAIN, s:a_i_FEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
354 \ [s:a_QAF, s:a_f_GHAIN, s:a_i_QAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
355 \ [s:a_KAF, s:a_f_GHAIN, s:a_i_KAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
356 \ [s:a_LAM, s:a_f_GHAIN, s:a_i_LAM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
357 \ [s:a_MEEM, s:a_f_GHAIN, s:a_i_MEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
358 \ [s:a_NOON, s:a_f_GHAIN, s:a_i_NOON],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
359 \ [s:a_HEH, s:a_f_GHAIN, s:a_i_HEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
360 \ [s:a_YEH, s:a_f_GHAIN, s:a_i_YEH],
11000
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
361 \ ]
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
362 call setline(1, s:a_GHAIN . pair[0] . ' ')
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
363 call assert_equal([pair[1] . pair[2] . ' '], ScreenLines(1, 3))
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
364 endfor
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
365
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
366 set arabicshape&
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
367 bwipe!
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed
Christian Brabandt <cb@256bit.org>
parents: 10992
diff changeset
368 endfunc
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
369
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
370 func Test_shape_isolated()
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
371 new
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
372 set arabicshape
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
373
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
374 " Shaping non-arabic {testchar} non-arabic Tests chg_c_a2s().
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
375 " pair[0] = testchar, pair[1] = current-result
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
376 for pair in [[s:a_HAMZA, s:a_s_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
377 \ [s:a_ALEF_MADDA, s:a_s_ALEF_MADDA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
378 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_ALEF_HAMZA_ABOVE],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
379 \ [s:a_WAW_HAMZA, s:a_s_WAW_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
380 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_ALEF_HAMZA_BELOW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
381 \ [s:a_YEH_HAMZA, s:a_s_YEH_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
382 \ [s:a_ALEF, s:a_s_ALEF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
383 \ [s:a_TEH_MARBUTA, s:a_s_TEH_MARBUTA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
384 \ [s:a_DAL, s:a_s_DAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
385 \ [s:a_THAL, s:a_s_THAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
386 \ [s:a_REH, s:a_s_REH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
387 \ [s:a_ZAIN, s:a_s_ZAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
388 \ [s:a_TATWEEL, s:a_TATWEEL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
389 \ [s:a_WAW, s:a_s_WAW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
390 \ [s:a_ALEF_MAKSURA, s:a_s_ALEF_MAKSURA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
391 \ [s:a_BEH, s:a_s_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
392 \ [s:a_TEH, s:a_s_TEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
393 \ [s:a_THEH, s:a_s_THEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
394 \ [s:a_JEEM, s:a_s_JEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
395 \ [s:a_HAH, s:a_s_HAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
396 \ [s:a_KHAH, s:a_s_KHAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
397 \ [s:a_SEEN, s:a_s_SEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
398 \ [s:a_SHEEN, s:a_s_SHEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
399 \ [s:a_SAD, s:a_s_SAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
400 \ [s:a_DAD, s:a_s_DAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
401 \ [s:a_TAH, s:a_s_TAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
402 \ [s:a_ZAH, s:a_s_ZAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
403 \ [s:a_AIN, s:a_s_AIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
404 \ [s:a_GHAIN, s:a_s_GHAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
405 \ [s:a_FEH, s:a_s_FEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
406 \ [s:a_QAF, s:a_s_QAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
407 \ [s:a_KAF, s:a_s_KAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
408 \ [s:a_LAM, s:a_s_LAM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
409 \ [s:a_MEEM, s:a_s_MEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
410 \ [s:a_NOON, s:a_s_NOON],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
411 \ [s:a_HEH, s:a_s_HEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
412 \ [s:a_YEH, s:a_s_YEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
413 \ ]
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
414 call setline(1, ' ' . pair[0] . ' ')
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
415 call assert_equal([' ' . pair[1] . ' '], ScreenLines(1, 3))
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
416 endfor
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
417
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
418 set arabicshape&
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
419 bwipe!
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
420 endfunc
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
421
11221
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
422 func Test_shape_iso_to_medial()
11004
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
423 new
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
424 set arabicshape
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
425
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
426 " Shaping arabic {testchar} arabic Tests chg_c_a2m().
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
427 " pair[0] = testchar, pair[1] = next-result, pair[2] = current-result,
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
428 " pair[3] = previous-result
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
429 for pair in [[s:a_HAMZA, s:a_s_GHAIN, s:a_s_HAMZA, s:a_s_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
430 \[s:a_ALEF_MADDA, s:a_s_GHAIN, s:a_f_ALEF_MADDA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
431 \[s:a_ALEF_HAMZA_ABOVE, s:a_s_GHAIN, s:a_f_ALEF_HAMZA_ABOVE, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
432 \[s:a_WAW_HAMZA, s:a_s_GHAIN, s:a_f_WAW_HAMZA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
433 \[s:a_ALEF_HAMZA_BELOW, s:a_s_GHAIN, s:a_f_ALEF_HAMZA_BELOW, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
434 \[s:a_YEH_HAMZA, s:a_f_GHAIN, s:a_m_YEH_HAMZA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
435 \[s:a_ALEF, s:a_s_GHAIN, s:a_f_ALEF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
436 \[s:a_BEH, s:a_f_GHAIN, s:a_m_BEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
437 \[s:a_TEH_MARBUTA, s:a_s_GHAIN, s:a_f_TEH_MARBUTA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
438 \[s:a_TEH, s:a_f_GHAIN, s:a_m_TEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
439 \[s:a_THEH, s:a_f_GHAIN, s:a_m_THEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
440 \[s:a_JEEM, s:a_f_GHAIN, s:a_m_JEEM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
441 \[s:a_HAH, s:a_f_GHAIN, s:a_m_HAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
442 \[s:a_KHAH, s:a_f_GHAIN, s:a_m_KHAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
443 \[s:a_DAL, s:a_s_GHAIN, s:a_f_DAL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
444 \[s:a_THAL, s:a_s_GHAIN, s:a_f_THAL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
445 \[s:a_REH, s:a_s_GHAIN, s:a_f_REH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
446 \[s:a_ZAIN, s:a_s_GHAIN, s:a_f_ZAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
447 \[s:a_SEEN, s:a_f_GHAIN, s:a_m_SEEN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
448 \[s:a_SHEEN, s:a_f_GHAIN, s:a_m_SHEEN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
449 \[s:a_SAD, s:a_f_GHAIN, s:a_m_SAD, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
450 \[s:a_DAD, s:a_f_GHAIN, s:a_m_DAD, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
451 \[s:a_TAH, s:a_f_GHAIN, s:a_m_TAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
452 \[s:a_ZAH, s:a_f_GHAIN, s:a_m_ZAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
453 \[s:a_AIN, s:a_f_GHAIN, s:a_m_AIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
454 \[s:a_GHAIN, s:a_f_GHAIN, s:a_m_GHAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
455 \[s:a_TATWEEL, s:a_f_GHAIN, s:a_TATWEEL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
456 \[s:a_FEH, s:a_f_GHAIN, s:a_m_FEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
457 \[s:a_QAF, s:a_f_GHAIN, s:a_m_QAF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
458 \[s:a_KAF, s:a_f_GHAIN, s:a_m_KAF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
459 \[s:a_LAM, s:a_f_GHAIN, s:a_m_LAM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
460 \[s:a_MEEM, s:a_f_GHAIN, s:a_m_MEEM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
461 \[s:a_NOON, s:a_f_GHAIN, s:a_m_NOON, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
462 \[s:a_HEH, s:a_f_GHAIN, s:a_m_HEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
463 \[s:a_WAW, s:a_s_GHAIN, s:a_f_WAW, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
464 \[s:a_ALEF_MAKSURA, s:a_s_GHAIN, s:a_f_ALEF_MAKSURA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
465 \[s:a_YEH, s:a_f_GHAIN, s:a_m_YEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
466 \ ]
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
467 call setline(1, s:a_GHAIN . pair[0] . s:a_BEH)
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
468 call assert_equal([pair[1] . pair[2] . pair[3]], ScreenLines(1, 3))
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
469 endfor
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
470
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
471 set arabicshape&
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
472 bwipe!
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
473 endfunc
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested
Christian Brabandt <cb@256bit.org>
parents: 11000
diff changeset
474
11221
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
475 func Test_shape_final()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
476 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
477 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
478
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
479 " Shaping arabic {testchar} arabic Tests chg_c_a2f().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
480 " pair[0] = testchar, pair[1] = current-result, pair[2] = previous-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
481 for pair in [[s:a_HAMZA, s:a_s_HAMZA, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
482 \[s:a_ALEF_MADDA, s:a_f_ALEF_MADDA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
483 \[s:a_ALEF_HAMZA_ABOVE, s:a_f_ALEF_HAMZA_ABOVE, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
484 \[s:a_WAW_HAMZA, s:a_f_WAW_HAMZA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
485 \[s:a_ALEF_HAMZA_BELOW, s:a_f_ALEF_HAMZA_BELOW, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
486 \[s:a_YEH_HAMZA, s:a_f_YEH_HAMZA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
487 \[s:a_ALEF, s:a_f_ALEF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
488 \[s:a_BEH, s:a_f_BEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
489 \[s:a_TEH_MARBUTA, s:a_f_TEH_MARBUTA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
490 \[s:a_TEH, s:a_f_TEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
491 \[s:a_THEH, s:a_f_THEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
492 \[s:a_JEEM, s:a_f_JEEM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
493 \[s:a_HAH, s:a_f_HAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
494 \[s:a_KHAH, s:a_f_KHAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
495 \[s:a_DAL, s:a_f_DAL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
496 \[s:a_THAL, s:a_f_THAL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
497 \[s:a_REH, s:a_f_REH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
498 \[s:a_ZAIN, s:a_f_ZAIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
499 \[s:a_SEEN, s:a_f_SEEN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
500 \[s:a_SHEEN, s:a_f_SHEEN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
501 \[s:a_SAD, s:a_f_SAD, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
502 \[s:a_DAD, s:a_f_DAD, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
503 \[s:a_TAH, s:a_f_TAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
504 \[s:a_ZAH, s:a_f_ZAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
505 \[s:a_AIN, s:a_f_AIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
506 \[s:a_GHAIN, s:a_f_GHAIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
507 \[s:a_TATWEEL, s:a_TATWEEL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
508 \[s:a_FEH, s:a_f_FEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
509 \[s:a_QAF, s:a_f_QAF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
510 \[s:a_KAF, s:a_f_KAF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
511 \[s:a_LAM, s:a_f_LAM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
512 \[s:a_MEEM, s:a_f_MEEM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
513 \[s:a_NOON, s:a_f_NOON, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
514 \[s:a_HEH, s:a_f_HEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
515 \[s:a_WAW, s:a_f_WAW, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
516 \[s:a_ALEF_MAKSURA, s:a_f_ALEF_MAKSURA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
517 \[s:a_YEH, s:a_f_YEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
518 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
519 call setline(1, ' ' . pair[0] . s:a_BEH)
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
520 call assert_equal([' ' . pair[1] . pair[2]], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
521 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
522
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
523 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
524 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
525 endfunc
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
526
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
527 func Test_shape_final_to_medial()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
528 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
529 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
530
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
531 " Shaping arabic {testchar} arabic Tests chg_c_f2m().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
532 " This does not test much...
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
533 " pair[0] = testchar, pair[1] = current-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
534 for pair in [[s:a_f_YEH_HAMZA, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
535 \[s:a_f_WAW_HAMZA, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
536 \[s:a_f_ALEF, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
537 \[s:a_f_TEH_MARBUTA, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
538 \[s:a_f_DAL, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
539 \[s:a_f_THAL, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
540 \[s:a_f_REH, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
541 \[s:a_f_ZAIN, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
542 \[s:a_f_WAW, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
543 \[s:a_f_ALEF_MAKSURA, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
544 \[s:a_f_BEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
545 \[s:a_f_TEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
546 \[s:a_f_THEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
547 \[s:a_f_JEEM, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
548 \[s:a_f_HAH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
549 \[s:a_f_KHAH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
550 \[s:a_f_SEEN, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
551 \[s:a_f_SHEEN, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
552 \[s:a_f_SAD, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
553 \[s:a_f_DAD, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
554 \[s:a_f_TAH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
555 \[s:a_f_ZAH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
556 \[s:a_f_AIN, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
557 \[s:a_f_GHAIN, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
558 \[s:a_f_FEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
559 \[s:a_f_QAF, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
560 \[s:a_f_KAF, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
561 \[s:a_f_LAM, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
562 \[s:a_f_MEEM, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
563 \[s:a_f_NOON, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
564 \[s:a_f_HEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
565 \[s:a_f_YEH, s:a_f_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
566 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
567 call setline(1, ' ' . s:a_BEH . pair[0])
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
568 call assert_equal([' ' . pair[1] . pair[0]], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
569 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
570
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
571 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
572 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
573 endfunc
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
574
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
575 func Test_shape_combination_final()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
576 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
577 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
578
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
579 " Shaping arabic {testchar} arabic Tests chg_c_laa2f().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
580 " pair[0] = testchar, pair[1] = current-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
581 for pair in [[s:a_ALEF_MADDA, s:a_f_LAM_ALEF_MADDA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
582 \ [s:a_ALEF_HAMZA_ABOVE, s:a_f_LAM_ALEF_HAMZA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
583 \ [s:a_ALEF_HAMZA_BELOW, s:a_f_LAM_ALEF_HAMZA_BELOW],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
584 \ [s:a_ALEF, s:a_f_LAM_ALEF],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
585 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
586 " The test char is a composing char, put on s:a_LAM.
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
587 call setline(1, ' ' . s:a_LAM . pair[0] . s:a_BEH)
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
588 call assert_equal([' ' . pair[1] . s:a_i_BEH], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
589 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
590
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
591 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
592 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
593 endfunc
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
594
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
595 func Test_shape_combination_isolated()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
596 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
597 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
598
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
599 " Shaping arabic {testchar} arabic Tests chg_c_laa2i().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
600 " pair[0] = testchar, pair[1] = current-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
601 for pair in [[s:a_ALEF_MADDA, s:a_s_LAM_ALEF_MADDA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
602 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_LAM_ALEF_HAMZA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
603 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_LAM_ALEF_HAMZA_BELOW],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
604 \ [s:a_ALEF, s:a_s_LAM_ALEF],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
605 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
606 " The test char is a composing char, put on s:a_LAM.
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
607 call setline(1, ' ' . s:a_LAM . pair[0] . ' ')
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
608 call assert_equal([' ' . pair[1] . ' '], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
609 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
610
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
611 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
612 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested
Christian Brabandt <cb@256bit.org>
parents: 11004
diff changeset
613 endfunc